numero derniere ligne d'une feuille Résolu

Question

Bonjour, 
instruction VBA pour derniere ligne renseignée d'une feuille
merci



Configuration: Windows Vista /excel2002/ Internet Explorer 7.0

cousinhub29 · Answer

Bonjour,

Avec ce code, tu as la dernière ligne, ainsi que la dernière colonne...

Dim DerCell As Range
Dim DerLig As Long, DerCol As Long
Set DerCell = Cells.Find("*", , , , xlByRows, xlPrevious)
DerLig = DerCell.Row
DerCol = DerCell.Column


Bonne journée (et la prochaine fois, sois un peu plus "causant", dans tes questions....)

cousinhub29 · Answer

Re-,

Une petite erreur dans le code....

Tu n'obtiens que la dernière ligne, par ce code...
pour la dernière colonne il faut rajouter :

Dim DerCell As Range
Dim DerLig As Long, DerCol As Long
Set DerCell = Cells.Find("*", , , , xlByRows, xlPrevious)
DerLig = DerCell.Row
Set DerCell = Cells.Find("*", , , , xlByColumns, xlPrevious)
DerCol = DerCell.Column


Désolé....

Numero derniere ligne d'une feuille

2 réponses

Discussions similaires

Newsletters