[VBA] Parcour de colonne + ecriture

Résolu
digsaw_- Messages postés 489 Date d'inscription   Statut Membre Dernière intervention   -  
digsaw_- Messages postés 489 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Mon problème parait bête comme sa mais je ne trouve pas quelque chose qui me conviendrais..

J'ai une feuille excel ou il y a 7 colonnes.. le nombres de lignes est indéfini car il peux y en avoir 10 comme 40.. J'aimerais créer une boucle qui parcour la colonne A de la feuille1 sans compter la premiere ligne, et qui en fonction du nombre de ligne quelle contient, ecrive dans la feuille2 un text précis ("C00001") au même nombre de ligne remplis de la feuille1.

Exemple :

Si dans la feuille1 colonne A (et uniquement cette colonne) il y a 9 lignes remplies sans compté la première ligne qui est un libéllé, dans la feuille2 il y aura dans la colonne A, à partir de la 2eme ligne, 9 fois le texte C00001 (une fois dans chaque cellule bien sur)

Merci d'avance pour votre aide !



A voir également:

2 réponses

Réponse 1 / 2
GardienDeMoutons
 
Sub ecritenFeuill2()
Dim derniereLigne As Integer
Dim monTexte As String

monTexte = "C00001"

derniereLigne = Sheets("Feuil1").Range("a1").End(xlDown).Row - 1
For i = 1 To derniereLigne
Sheets("feuil2").Range("A1").Offset(i, 0).Value = monTexte
Next


End Sub
1
Réponse 2 / 2
digsaw_- Messages postés 489 Date d'inscription   Statut Membre Dernière intervention   58
 
Super réponse rapide ! Et tout fonctionne au poil ! Merci beaucoup !
0

Discussions similaires

Bref. Je cherche la police d'écriture de Bref
Ratus -
Calo mnie -

10 réponses