[VBA-E] [debutant] demande de vérification SVP

bonjour j'aimerais avoir votre avis sur quelques lignes de codes. Les dates doivent etre inscritent les unes en dessous des autres et etre trié par ordre chronologique, elles proviennent d'un calendrier.

Code:

---

1 2 3 4 5 6 7 8

Private Sub Debit_Click() Range("c6").End(xlDown).Offset(1, 0).Value = Calendrier.Value   Range("c6").End(xlDown).Offset(1, 0).Select Selection.Sort Key1:=Range("C6"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal End Sub

---

Excel me renvoit l'erreur sur la 2e ligne or cela me semble bon !!!
Merci de votre aide

Si ta feuille est vide en dessous de la cellule C6, le .End va te positionner sur la dernière ligne.
Un Offset d'une ligne vers le bas te met en dehors des limites de la feuille.

Citation:

---

Envoyé par Jerez62

....
Excel me renvoit l'erreur sur la 2e ligne or cela me semble bon !!!
Merci de votre aide

---

ben cela dépends du contenu des Cellules C6 et C7 de la feuille active.. pour t'en convaincre place toi sur ta feuille en C6 ( je suppose que tu as des données en C7...) puis actionne la touche Fin puis fléche ves le bas .. équivalent à End(..) et ensuite descend d'une cellule ( équivalent à offset..) ...

fais ensuite la même chose avec cellules de C7...C65535 vides.....par exemple..

[Edit] oups ... Alain à été plus rapide... :aie: