Pour selectionner plusieurs plage de cellules au meme moment, vous pouvez utiliser la méthode Union.
Sub SelecMultiPlage()
Dim Plage1 As Range, Plage2 As Range
Dim Plage3 As RangSelecMultiPlage()e, Plage4 As Range
Dim Unionplage As Range
Worksheets("Feuil1").Activate
Set Plage1 = Range("A1:A5")
Set Plage2 = Range("C1:C5")
Set Plage3 = Range("A10:A15")
Set Plage4 = Range("C10:C15")
Set Unionplage = Union(Plage1, Plage2, Plage3, Plage4)
Unionplage.Select
End Sub
Avec l’instruction Set, vous définissez d’abord les plages de cellules individuelles. Combinez ensuite ces zones individuelles en utilisant la méthode Union dans un bloc qui porte les zones de nom. Vous pouvez ensuite marquer complètement ce bloc à l’aide de la méthode Select.
Une autre façon d’aborder plusieurs plages à la fois consiste à utiliser la liste desplage. Dans la macro suivante, toutes les plages sont traitées l’une après l’autre.
Sub SelecMultiPlage() Dim Plage As Range Dim Cellule As Range For Each Plage In Selection.Areas For Each Cellule In Plage Plage.Interior.ColorIndex = 4 Next Next End Sub
Toutes cellules sont répertoriées dans l’objet de liste Zones. En boucle, parlez-leur les uns après les autres et coloriez-les avec la couleur verte.