VBA: zone d'impression jusqu'a la dernière ligne de données

Résolu

Emi80110 Messages postés 69 Statut Membre -
Emi80110 Messages postés 69 Statut Membre - 8 avr. 2024 à 16:08

Bonjour,

Je cherche une macro me permettant de définir automatiquement ma zone d'impression (des colonnes a a F) jusqu'à la dernière ligne de données, sur une seule page en largeur et en automatique en longueur.

Sauriez-vous m'aider svp ?

fichier exemple ci-dessous

https://www.cjoint.com/c/NDimT5RBLkr

Par avance merci de votre aide :-)

Windows / Edge 123.0.0.0

Afficher la suite

1 réponse

Réponse 1 / 1
danielc0 Messages postés 2191 Date d'inscription Statut Membre Dernière intervention 287
Bonjour,

Essaie (ZI est la zone d'impression) :
```
Sub test()
  Dim Ligne As Long, ZI As Range
  Ligne = Range("A:F").Find("*", , , xlPart, xlByRows, xlPrevious).Row
  Set ZI = Range("A1:F" & Ligne)
End Sub
```
0
1. Emi80110 Messages postés 69 Statut Membre 2
  
  Merciiii j'ai finalement trouvé avant de voir votre réponse. Je pense que votre réponse et la clôture de mon message se sont croisés :-)
  
  Merci tout de même de votre aide :-D
  
  0

VBA: zone d'impression jusqu'a la dernière ligne de données

1 réponse

Discussions similaires

Newsletters