Sub Macro1()
Dim cel As Range 'déclare la variable cel (CELlule)
Dim pl As Range 'déclare la variable pl (PLage)
For Each cel In ActiveSheet.UsedRange 'boucle sur toutes les cellules éditées cel
If cel.Interior.ColorIndex <> xlNone Then 'condition 1 : si la cellule est colorée
If pl Is Nothing Then 'condition 2 : si la plage pl n'a pas été définie
Set pl = cel 'définit la plage pl
Else 'sinon
Set pl = Application.Union(cel, pl) 'définit la plage pl
End If 'fin de la condition 2
End If 'fin de la condition 1
Next cel 'prochaine cellule cel de la boucle
pl.Select 'sélectionne la plage pl
End Sub
pas évident de te comprendre:Bonjour à tous,
Existe il une macro ou une formule pour sélectionner les cellule colorier ?
Merci.
dans ce cas ça se complique et sans un fichier exemple ça va être difficilePour sélection les cellules qui sont remplis de couleur grace a une mise en forme conditionnelle
Bonjour à tous,
Existe il une macro ou une formule pour sélectionner les cellule colorier ?
Merci.
Help, ................. on veut bien t'aider mais il faudrait re-préciser la questionHelp svp
le problème c'est que toutes tes cellules sont blanches, que tu le veuilles ou nonJe pourrais me débrouiller avec une formules du genre, =si(c3=colorié;ok;"")
a votre écoute
je le répète, il faudra effectuer la sélection en fonction des mêmes critères que les MFCPour sélection les cellules qui sont remplis de couleur grace a une mise en forme conditionnelle
je me désabonne de ce fil , j'ai mieux à faireBonjour, salut Robert et phlaurent,
Cette question a déjà été posée : https://www.excel-downloads.com/threads/sur-lignage-pour-tableaux.185338/
Une proposition a été faite (sous le message #14).
Elle se basait sur les formules des MFC.
Elle est restée sans suite.
La question me semblait résolue.
Il me semble qu'il serait bon de se tenir strictement aux recommandations de la charte de ce forum.