Structure With ... End With
Exécute une série d'instructions appliquées à un seul objet sans qualifier à chaque fois le nom de l'objet.

Syntaxe
With object

code : une ou plusieurs instructions (propriétés ou méthodes) relatives à object.

End With

Exemple
Ci-dessous, la selection fait référence à un objet Range :

With Selection

.Font.Bold = True

.Interior.ColorIndex = 35

End With