Partager via


Écriture d’instructions exécutables

Une instruction exécutable permet de lancer une action. Elle peut exécuter une méthode ou fonction et peut être lue en boucle ou créer des branches dans des blocs de code. Les instructions exécutables contiennent souvent des opérateurs mathématiques ou conditionnels.

L’exemple suivant utilise un For Each... Instruction suivante pour itérer dans chaque cellule d’une plage nommée MyRange on Sheet1 d’un classeur Microsoft Excel actif. La variable c est une cellule de la collection de cellules contenues dans MyRange.

Sub ApplyFormat() 
    Const limit As Integer = 33 
    For Each c In Worksheets("Sheet1").Range("MyRange").Cells 
        If c.Value > limit Then 
            With c.Font 
                .Bold = True 
                .Italic = True 
            End With 
        End If 
    Next c 
    MsgBox "All done!" 
End Sub

If ... Alors... L’instruction Else dans l’exemple vérifie la valeur de la cellule. Si elle est supérieure à 33, l'instruction With définit les propriétés Bold et Italic de l'objet Font de cette cellule. Les instructions If...Then...Else se terminent pas End If. L’instruction With peut enregistrer la saisie, car les instructions qu’elle contient sont automatiquement exécutées sur l’objet à la suite du mot clé With .

L'instruction Next appelle la cellule suivante de la collection de cellules figurant dans MyRange.

La fonction MsgBox (qui affiche une boîte de dialogue Visual Basic intégrée) affiche un message indiquant que l’exécution de la procédure Sub est terminée.

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.