Ecrire a la suite colonne après colonne

Résolu
cs_YVO22 Messages postés 14 Date d'inscription lundi 25 décembre 2000 Statut Membre Dernière intervention 17 mars 2009 - 25 févr. 2009 à 21:40
cs_YVO22 Messages postés 14 Date d'inscription lundi 25 décembre 2000 Statut Membre Dernière intervention 17 mars 2009 - 17 mars 2009 à 23:09
Bonsoir a tous.
A partir d'une userform(rectifil) j'ai un combobox (combobox1) qui a pour source la colonne A d'une feuille(basefil).
Sur la même userform j'ai aussi un textbox(textbox1) ou je renseigne une donnée qui doit s'ecrire dans la colonne voisine de la source de données.
ex:Si je selectionne un chiffre de la colonne A ,cellule A1, je doit ecrire la valeur du textbox dans la cellule B1 si celle-ci est vide ou scruter jusqu'a la premiere cellule que je vais trouver vide ceci sur la même ligne.
Quelqu'un aurai-t-il une solution ?
Merci
Bonne soirée

2 réponses

dedenet2 Messages postés 372 Date d'inscription vendredi 27 juillet 2007 Statut Membre Dernière intervention 22 juillet 2013 2
11 mars 2009 à 21:13
Bonsoir
Désolé , soit plus clair
Merci
A++
3
cs_YVO22 Messages postés 14 Date d'inscription lundi 25 décembre 2000 Statut Membre Dernière intervention 17 mars 2009
17 mars 2009 à 23:09
Bonsoir dedenet2,
Pour écrire dans une colonne a la suite et en scrutant les cellules,j'ai un code du type
Sheets("basefil").[a65536].End(xlUp).Offset(1, 0).Value = Me.combobox .Value
Je désire faire la même chose mais en scrutant colonne par colonne et non pas ligne par ligne comme dans l'exemple ci-dessus.
De plus il me faut définir une variable pour savoir de quelle ligne il s'agit.
Il s'agit de la colonne "A" dont j'utilise les données pour remplir ma combobox.
J'espère avoir été plus clair.
Merci
0
Rejoignez-nous