Zone de texte "Dynamique" [Résolu/Fermé]

Signaler
Messages postés
48
Date d'inscription
mercredi 12 mars 2014
Statut
Membre
Dernière intervention
29 août 2014
-
Messages postés
48
Date d'inscription
mercredi 12 mars 2014
Statut
Membre
Dernière intervention
29 août 2014
-
Bonjour,


J'utilise excel pour pouvoir faire un fichier de suivi et je me retrouve face à un problème.

Je souhaite créer une zone de texte sur une de mes feuilles excel et que celle-ci soit aussi présente sur d'autres feuilles. La modification de la note sur la feuille 1 par exemple entrainerait la même modification de la note sur la feuille 2.

Finalement c'est un peu comme si je voulais que deux cellules soient toujours identiques mais cette fois ci avec une zone de texte.

En vous remerciant pour votre réponse,

Cordialement,

PG

3 réponses

Messages postés
13025
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
11 juin 2021
2 201
Bonjour

Tu vas dans l'onglet Developpeur, Inserer, Controle Active X, Zone de texte

Cette zone est en principe appelée TextBox1

Tu la copies et tu la colles dans seconde feuille

Tu reviens sur le Textbox de la 1ere feuille, et en mode création doubleclic pour afficher l'éditeur VBA et tu rentres ce code dans la Private Sub Change :

Private Sub TextBox1_Change()
Sheets("Feuil2").TextBox1.Value = TextBox1.Value
End Sub

Cdlmnt


Messages postés
48
Date d'inscription
mercredi 12 mars 2014
Statut
Membre
Dernière intervention
29 août 2014

Bonjour,
Merci de ta réponse.

J'ai essayé comme tu m'as dit mais je n'ai pas réussi. Pour le moment je voudrais que la zone de texte créée sur la feuille 2 et celle sur la feuille 5 soit la même.

Ensuite lorsque je vais dans l'éditeur VBA dois-je enlever ce qu'il y avait d'écrit avant et j'ajoute le code ou je l'ajoute ?

Merci à toi

Cordialement.
Messages postés
13025
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
11 juin 2021
2 201
Si tu veux que les modifications dans la zone de texte crée en feuille 2 se répercutent automatiquement dans la zone de texte de la feuille 5, quand tu ouvres l'éditeur à partir de la zone de texte de feuille 2 tu dois avoir affiché seulement
Private Sub TextBox1_Change()

End Sub

Tu ajoutes dedans la ligne
Sheets("Feuil5").TextBox1.Value = TextBox1.Value
en remplacement éventuellement Feuil5 par le nom de ta feuille 5 si celle-ci en a un

et cela doit suffire

Si tu n'y arrive pas tu peux poster un exemple allégé et anonymé de ton fichier sur transfernow.net ou c joint.com et m'indiquer ensuite ici me lien fourni, je regarderai ce qui cloche

Cdlmnt
Messages postés
48
Date d'inscription
mercredi 12 mars 2014
Statut
Membre
Dernière intervention
29 août 2014

J'ai encore une petite question : Lorsque je tape du texte dans cette zone je ne peux pas faire de retour à la ligne en appuyant sur "entrée". Comment modifier cela ?

Merci bien.
Messages postés
13025
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
11 juin 2021
2 201
Pour pouvoir mettre plusieurs lignes dans la zone :

1) En mode création clic droit sur la zone puis sur Propriétés et passer la propriété Multiline de False à True
2) Pour aller à la ligne dans la zone de texte faire Maj + Entrée

Cdlmnt
Messages postés
48
Date d'inscription
mercredi 12 mars 2014
Statut
Membre
Dernière intervention
29 août 2014

Je vous remercie encore pour cette autre solution !

Bien cordialement,

PG
Messages postés
48
Date d'inscription
mercredi 12 mars 2014
Statut
Membre
Dernière intervention
29 août 2014

Merci beaucoup à toi Via55, j'ai tout compris et ça fonctionne très bien !

Passe une bonne fin de journée

Bien cordialement,

PG