Bonjour la communauté,
Je me permets de vous solliciter pour une demande d'aide en VBA, comme le copiage en sélection multiple n'est pas possible, je souhaiterais à l'aide de la macro ci-dessous copier uniquement les cellules de couleur de la colonne (activecell). Merci d'avance pour votre aide.
Je me permets de vous solliciter pour une demande d'aide en VBA, comme le copiage en sélection multiple n'est pas possible, je souhaiterais à l'aide de la macro ci-dessous copier uniquement les cellules de couleur de la colonne (activecell). Merci d'avance pour votre aide.
VB:
Sub selectionCelluleParCouleur()
Dim couleur As Long
couleur = ActiveCell.Interior.Color
Dim plage As Range
Set plage = ActiveCell ' 1
For Each c In ActiveSheet.UsedRange ' 2
If c.Interior.Color = couleur Then ' 3
Set plage = Application.Union(plage, c) ' 4
End If
Next
plage.Select
End Sub