Mickmagmicmac
XLDnaute Nouveau
Bonsoir à tous,
et d'avance merci à ceux qui m'accorderont un peu de temps, ne serait-ce qu'en me lisant.
Je galère et là je tourne en rond.
Si vous pouviez me mettre sur la piste... Il s'agit d'une histoire de validation de travaux.
Par simple clic, une cellule se colore en vert : (je l'ai trouvé sur ce site, merci à l'auteur Pierrot93)
https://www.excel-downloads.com/threads/colorier-cellule-1-clic.118610/
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Interior.ColorIndex = IIf(Target.Interior.ColorIndex = xlNone, 4, xlNone)
End Sub
Pour faire la synthèse de différents travaux, je cherche à recopier avec liaison dans une nouvelle feuille cette cellule. J'ai bien fait la liaison mais le format (couleur verte) ne se copie jamais !
Donc si c'était juste du texte, j'y arriverais !
Après pas mal de recherches, il semble que "cette liaison de format" soit impossible. Est-ce vraiment le cas... J'ai bien trouvé "Photo" qui me donne l'image avec liaison du format et du texte". Mais comme je veux ensuite exploiter les données de cette photo, j'ai laisser tomber !
Alors je me disais que je ferai une liaison de texte et j'ajouterai une mise en forme conditionnelle sur mes deux feuilles selon le texte.
En espérant être sur la bonne piste.
D'où ma question (oui enfin !) :
comment puis-je modifier le code de Pierrot93 pour avoir un "mot" inscrit par simple clic ?
Ou encore mieux, plusieurs "mot1" "mot2" "mot3" qui s'inscrivent alternativement par clic successif ?
Est-ce au moins possible ?
Merci.
Mickmagmicmac
et d'avance merci à ceux qui m'accorderont un peu de temps, ne serait-ce qu'en me lisant.
Je galère et là je tourne en rond.
Si vous pouviez me mettre sur la piste... Il s'agit d'une histoire de validation de travaux.
Par simple clic, une cellule se colore en vert : (je l'ai trouvé sur ce site, merci à l'auteur Pierrot93)
https://www.excel-downloads.com/threads/colorier-cellule-1-clic.118610/
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Interior.ColorIndex = IIf(Target.Interior.ColorIndex = xlNone, 4, xlNone)
End Sub
Pour faire la synthèse de différents travaux, je cherche à recopier avec liaison dans une nouvelle feuille cette cellule. J'ai bien fait la liaison mais le format (couleur verte) ne se copie jamais !
Donc si c'était juste du texte, j'y arriverais !
Après pas mal de recherches, il semble que "cette liaison de format" soit impossible. Est-ce vraiment le cas... J'ai bien trouvé "Photo" qui me donne l'image avec liaison du format et du texte". Mais comme je veux ensuite exploiter les données de cette photo, j'ai laisser tomber !
Alors je me disais que je ferai une liaison de texte et j'ajouterai une mise en forme conditionnelle sur mes deux feuilles selon le texte.
En espérant être sur la bonne piste.
D'où ma question (oui enfin !) :
comment puis-je modifier le code de Pierrot93 pour avoir un "mot" inscrit par simple clic ?
Ou encore mieux, plusieurs "mot1" "mot2" "mot3" qui s'inscrivent alternativement par clic successif ?
Est-ce au moins possible ?
Merci.
Mickmagmicmac