Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

lier un textbox à une cellule

ljoue

XLDnaute Junior
Bonjour à tous,

Je voudrais lier un Text Box (sur la feuille et non sur Userform) à une cellule.
En fait j'aimerais que le contenu du Text Box soit égal à la valeur d'une cellule (Chaine de charactères)

J'ai essayé avec ce code :

Sub Test()
ActiveSheet.Shapes("Text Box 1").Select
Selection.Characters.Text = Range("A1").Value
Range("A2").Select
End Sub

...Mais le problème est que dépassé un certains nombre de charactères la macro ne fonctionne pas et n'affiche rien dans le Text Box.
Comment faire pour afficher un Texte de plus de 50lignes par exemple.

Merci d'avance.
Laurent
 

ziopizza

XLDnaute Occasionnel
Re : lier un textbox à une cellule

Bonjour Laurent,
je te joins un petit exemple,mais pas sur d'avoir compris?
Salut
Yves
 

Pièces jointes

  • Test.xls
    26 KB · Affichages: 224
  • Test.xls
    26 KB · Affichages: 227
  • Test.xls
    26 KB · Affichages: 243

Moa

XLDnaute Occasionnel
Re : lier un textbox à une cellule

Salut Ljoue !

Tu n'a pas besoin de macro pour faire ça.

Il te suffit de lier ta cellule à ton "TextBox" via les propriétés de ce dernier avec la propriété "LinkedCell".

Quand tu écriras dans ta cellule, les données seront reportées dans ton "TextBox" automatiquement et vice versa.

@ +++

ChrisOne
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…