Petit probleme sous excel

ririwin Messages postés 5 Date d'inscription vendredi 27 décembre 2002 Statut Membre Dernière intervention 29 janvier 2003 - 29 janv. 2003 à 18:43
pelw Messages postés 148 Date d'inscription dimanche 12 janvier 2003 Statut Membre Dernière intervention 14 février 2005 - 29 janv. 2003 à 22:01
je veux me rendre a la derniere ligne paqs ecrite sur excel le seul moyen que g trouver c celui la, ya pas plus simple.Merci
Private Sub CmdEcrire_Click()
For i = 2 To 10000
If Cells(i, 1).Value <> "" Then
Cells(i + 1, 1).Select
Else: End
End If
Next i
DocExcel.ActiveCell.FormulaR1C1 = "le petit poucet"
End Sub

1 réponse

pelw Messages postés 148 Date d'inscription dimanche 12 janvier 2003 Statut Membre Dernière intervention 14 février 2005 6
29 janv. 2003 à 22:01
Par exemple pour sélectionner la 1ère cellule vide de la colonne "A" :

Columns("A").SpecialCells(xlLastCell).Offset(1, 0).Select

@+

pelw
Rejoignez-nous