Trouver la dernière cellule

Bonjour,

Je suis en train d'essayer de faire une macro pour faire une mise en page autmatique (Zone d'impression)
Le fichier n'a jamais le même nombre de ligne par jour.

J'ai reussi a trouver ma dernière ligne avec

DerniereLigneUtilisee = Range("F" & Rows.Count).End(xlUp).Row 'où X est la colonne donnée

Comment je dois faire pour dire que je veux par exemple selectionner de A1 à AD(Derniere ligne utilisée). Je ne sais pas comment l'écrire.

Merci pour votre aide.

Bonjour,

A+

Il n'est pas nécessaire de joindre le fichier réel mais un classeur fortement similaire indiquant notamment

La présentation de la zone d'impression ou la forme du tableau contenant des données esi c'est un tableau créé par Insertion > Tableau

Et la disposition du tableau dans la feuille. S'il y a des lignes d'entête ou des colonnes extérieures (Pourquoi tester colonne F et mettre une zone d'impression jusqu'à AD ?

A+

Bonjour à tous,

Comment je dois faire pour dire que je veux par exemple sélectionner de A1 à AD(Derniere ligne utilisée).

Comme ceci :

Range("A1:AD"&DerniereLigneUtilisee).Select

Bonjour,

Pas besoin de Select

ActiveSheet.PageSetup.PrintArea = "$A$1:$AD" & DernièreLigneUtilisée

A+

Re,
Oui, pour définir la zone d'impression