Derniere ligne a remplir

Résolu
titil64 Messages postés 67 Date d'inscription dimanche 25 avril 2004 Statut Membre Dernière intervention 5 février 2007 - 17 janv. 2007 à 10:05
titil64 Messages postés 67 Date d'inscription dimanche 25 avril 2004 Statut Membre Dernière intervention 5 février 2007 - 17 janv. 2007 à 11:08
Bonjour
voila mon probleme ,
je cherche a rentrer mes donner d'une textbox dans la derniere ligne d'un tableur excel
Voila ce que je fait mais je ne trouve po de condition d'arret

Dim i As Integer
Sheets("Screen").Range("A1").Select


For i = 1 To 22
   
    If Cells(i, 1) = "" Then
    Cells(i, 1) = TextBox1
    End If
   
Next i
en fait il parcours toutes les lignes et m'inscrit "textbox1" dans toutes les lignes vides et non pas dans seulement la derniere

merci

5 réponses

cs_casy Messages postés 7741 Date d'inscription mercredi 1 septembre 2004 Statut Membre Dernière intervention 24 septembre 2014 41
17 janv. 2007 à 11:05
En reprennat ton code et en partant de la fin :

'Recherche de la première cellule non vide depuis la
fin
For i = 22 To 1 Step -1
   
    If Cells(i, 1) <> "" Then
        ' Première cellule non vide : on rempli la cellule d'en
dessous
        Cells(i + 1, 1) = TextBox1
        Exit For ' et sort de la boucle, le
travail est fini
    End If
   
Next i

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #
3
jmfmarques Messages postés 7668 Date d'inscription samedi 5 novembre 2005 Statut Membre Dernière intervention 22 août 2014 27
17 janv. 2007 à 11:08
Regarde ce que fait ceci, par exemple :


For i = 10 To 1 Step -1


   MsgBox i


Next
3
jmfmarques Messages postés 7668 Date d'inscription samedi 5 novembre 2005 Statut Membre Dernière intervention 22 août 2014 27
17 janv. 2007 à 10:38
Commence par la fin et remonte ! Et arrête quand tu as trouvé une ligne vide !
0
titil64 Messages postés 67 Date d'inscription dimanche 25 avril 2004 Statut Membre Dernière intervention 5 février 2007
17 janv. 2007 à 10:49
Comment commence par la fin dsl je ne suis po trés doué
voila le resultat qui me rend
<colgroup><col style=\"WIDTH: 155pt; mso-width-source: userset; mso-width-alt: 7533\" width=\"206\" /></colgroup>----
,n,jh  >>>>>> 1er ligne , ----
bfgb>>>>>>>> 2nd ligne
, ----
kjhg>>>>>>>3 eme ligne (il commence ici mais la suite je n'en veux po ), ----
kjhg, ----
kjhg, ----
kjhg, ----
kjhg, ----
kjhg, ----
kjhg
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
titil64 Messages postés 67 Date d'inscription dimanche 25 avril 2004 Statut Membre Dernière intervention 5 février 2007
17 janv. 2007 à 11:08
Super merci beaucoup
0