Utilisation des instructions With

L’instruction With vous permet de spécifier un objet ou un type défini par l’utilisateur une seule fois pour une série entière d’instructions. Les instructions With permettent une exécution plus rapide des procédures et vous évite les frappes répétitives.

L’exemple suivant remplit une plage de cellules avec le nombre 30, applique une mise en forme gras et définit la couleur de l’intérieur des cellules sur jaune.

Sub FormatRange() 
 With Worksheets("Sheet1").Range("A1:C10") 
 .Value = 30 
 .Font.Bold = True 
 .Interior.Color = RGB(255, 255, 0) 
 End With 
End Sub

Pour plus d’efficacité, vous pouvez imbriquer les instructions With. L’exemple suivant insère une formule dans la cellule A1, et met en forme la police.

Sub MyInput() 
 With Workbooks("Book1").Worksheets("Sheet1").Cells(1, 1) 
 .Formula = "=SQRT(50)" 
 With .Font 
 .Name = "Arial" 
 .Bold = True 
 .Size = 8 
 End With 
 End With 
End Sub

Voir aussi

• Rubriques conceptuelles de Visual Basic

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.