Recopier les dernières lignes d'un tableau

Bonjour à tous,

J'ai un logbook pour mes heures de vol, et on nous demande souvent d'envoyer la dernière page de ce carnet.

J'aimerais générer automatiquement cette page. J'ai un tableau "LOGBOOK", mais je ne parviens pas à renvoyer par exemple les 30 dernières lignes sur une autre feuille.

Merci pour votre aide

Ludovic

Bonjour,

vous pouvez déjà essayer de connaître la dernière ligne utilisée par cette instruction :

Dim DerLigne As Long
DerLigne = Sheets("MaFeuille").Range("A" & Rows.Count).End(XlUp).Row

Ensuite il suffit de prendre la plage de cellule de cette ligne vers la 30 ième vers "le haut" si cela est possible :

Range("A" & DerLigne-30 & ":H" & DerLigne).Copy Destination:=Sheets("MonExtract").Range("B2")

Donc à tester le DerLigne -30 ne doit pas être inférieur à 1 !

@ bientôt

LouReeD

Bonjour,

Merci, je vais essayer de créer cette macro.

Est-ce qu'il y a un moyen sinon de résoudre le problème avec des formules non VBA ?

Cordialement

Bonsoir,

Ci joint un fichier qui donne les 10 dernières valeurs de la colonne A, je vous laisse essayer de l'adapter à votre besoin.

Le fichier :

@ bientôt

LouReeD

Rechercher des sujets similaires à "recopier dernieres lignes tableau"