Bonjour,
Pour imprimer sur l'imprimante définie par défaut, il faut :
- définir la zone d'impression
- lancer l'impression
Ce qui donnerait pour ton premier tableau 1
1 2 3 4
| With Sheets("TaFeuille")
.PageSetup.PrintArea = "$A$1:$AM$" & Range("AM189").End(xlUp).Row
.PrintOut Copies:=1, Collate:=True
End With |
et pour le tableau 2
1 2 3 4
| With Sheets(3)
.PageSetup.PrintArea = "$F$193:$AD$218"
.PrintOut Copies:=1, Collate:=True
End With |
Si tu veux lancer les impressions sur une autre imprimante que celle définie par défaut, un ptit truc tout simple, tu actionnes l'enregistreur de macro, tu lances une impression en modifiant tous les paramètres que tu veux, tu arrêtes l'enregistreur de macro et tu pourras voir dans cette nouvelle macro enregistrée les paramètres nom de l'imprimante, format de feuille, mise en page, etc...
Partager