Saisir le même texte dans plusieurs cellules
Bonjour,
Sur une feuille vierge, je souhaite écrire le même texte dans plusieurs cellules.
Si je saisi le Nom d'une personne dans la cellule D3 par exemple, j'aimerais que ce nom s'inscrive dans les cellule H6, B12, F24, D48.
Peut-on programmer la feuille vide pour ne pas avoir à sélectionner les cellules au moment de la saisie ?
Merci
Bonjour GVQ
Inutile de sélectionner les cellules où copier D3, saisir une valeur (ou la modifier) dans D3 suffit.
Code à mettre dans le module de la feuille concernée :
Private Sub Worksheet_Change(ByVal Target As Range)
Const CelluleSource = "D3", CellulesCopie = "H6,B12,F24,D48"
If Not Intersect(Range(CelluleSource), Target) Is Nothing Then Range(CellulesCopie) = Target.Value
End SubMerci mafraise
je vais tester votre réponse.
Cordialement
Bonjour à tous !
Et sinon..... dans les cellules H6;B12,F24 et D48 mettre la formule :
=D3Petit clin d’œil au célèbre horticulteur : Plus court non ?
Bonjour JFL
Et sinon..... dans les cellules H6;B12,F24 et D48 mettre la formule : ...
Oui bien sûr
Merci GFL pour votre réponse.
J'ai commencé par cette solution, mais bizarrement ça ne fonctionne pas !?!
d'où ma question sur le site !
Merci JFL, c'est exactement je que je souhaite.
Mais, sur ma feuille, ça ne fonctionne pas.
lorsque je saisi le Nom du grand-père, je souhaite que ce Nom soit automatiquement écrit dans les cellules des AG pères, AAGP, AAAGP, etc...
Bonsoir à tous de nouveau !
En retour, votre classeur :
Il est nécessaire de passer les cellules recevant une formule en format "standard" (et non texte). Faute de quoi, la formule saisie serait interprétée comme du texte.
C'est sympa de me donner vos conseils.
Un grand merci. Ca explique pourquoi ça ne fonctionnait pas !
Cordialement
Bonsoir à tous de nouveau !
Bien...
Je vous remercie de ce retour.
Bonjour à tous !
----> Ne pas oublier de passer le sujet en mode résolu !