Zone de texte "Dynamique"

Résolu
p.girard Messages postés 48 Date d'inscription   Statut Membre Dernière intervention   -  
p.girard Messages postés 48 Date d'inscription   Statut Membre Dernière intervention   -
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
A voir également:

3 réponses

via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
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


0
p.girard Messages postés 48 Date d'inscription   Statut Membre Dernière intervention  
 
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.
0
via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
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
0
p.girard Messages postés 48 Date d'inscription   Statut Membre Dernière intervention  
 
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.
0
via55 Messages postés 14512 Date d'inscription   Statut Membre Dernière intervention   2 746
 
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
0
p.girard Messages postés 48 Date d'inscription   Statut Membre Dernière intervention  
 
Je vous remercie encore pour cette autre solution !

Bien cordialement,

PG
0
p.girard Messages postés 48 Date d'inscription   Statut Membre Dernière intervention  
 
Merci beaucoup à toi Via55, j'ai tout compris et ça fonctionne très bien !

Passe une bonne fin de journée

Bien cordialement,

PG
0