Comment afficher le contenu d'une colonne dans le textbox

Résolu/Fermé
Lynda_123 - 8 déc. 2020 à 21:47
 Lynda_123 - 9 déc. 2020 à 20:23
Bonsoir,

Svp j'aimerais savoir comment afficher le contenu d'une colonne dans un textbox

Merci d'avance pour vos réponses

3 réponses

ptitpanda Messages postés 65 Date d'inscription dimanche 5 août 2012 Statut Membre Dernière intervention 8 avril 2023 8
8 déc. 2020 à 23:38
Bonsoir,

Voici un morceau de code pour réaliser ce que tu demandes:

Private Sub UserForm_Activate()
TextBox1.Value = ""
For Each valeur In Range("a1:a7") 'A adapter selon le nbre de lignes et la lettre de ta colonne
TextBox1.Value = TextBox1.Value & Cells(valeur.Row, 1) & vbCr
Next valeur

End Sub


ATTENTION: n'oublie pas de mettre "multiline" à TRUE dans les propriétés de ton textbox

En espérant que cela te convienne

Bonne nuit
1
Merci bien ptitpanda.
Svp vous pouvez m'expliquer ligne par ligne ce que fait votre code? Parceque il y a certaines fonctions que je ne comprends pas comme VbCr.
0
ptitpanda Messages postés 65 Date d'inscription dimanche 5 août 2012 Statut Membre Dernière intervention 8 avril 2023 8
Modifié le 9 déc. 2020 à 18:10
Bonjour,

voici l'explication:
Private Sub UserForm_Activate()

TextBox1.Value = "" 'vide la textbox à chaque chargement du userform (au - c'est toujours à jour)
For Each valeur In Range("a1:a7") 'A adapter selon le nbre de lignes et la lettre de ta colonne
TextBox1.Value = TextBox1.Value & Cells(valeur.Row, 1) & vbCr 'remplit 
'la textbox en reprenant la valeur s'y trouvant et en rajoutant la nouvelle 
'valeur(cellule suivante de la colonne "A") et ajoute un retour à la ligne (vbCr)
Next valeur

End Sub


Bonne soirée
0
Bien reçu. Merci beaucoup
0