zone d'impression précise

bonjour à tous

voilà je voudrais créé un bouton qui me permettrait d'imprimer une partie d'un tableau je m'explique:

voilà j'ai un tableau composé de 10 colonnes pour l'exemple on prendra des numéros de colonne allant de 1 à 10. donc je voudrais un bouton qui m'imprime la colonne 1,2,3 et 7,8,9 mais sans qu'il y ai de blanc entre chaque en gros que mon tableau imprime et six colonnes 1,2,3,7,8,9
et je voudrais un autre bouton qui m'imprime mon tableau complet

voilà je voulais savoir si cela était possible et merci d'avance de votre aide

Hello,

Essaie cette macro, à placer dans un module.. Au fait, il s'agiz juste de masquer, puis réafficher les colonnes voulues...

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Sub Test()   Application.ScreenUpdating = False ' On ne voit rien à l'écran grâce à ce bout de code.   Range("D:F,J:J").Select Selection.EntireColumn.Hidden = True 'On masque les colonnes voulues. Range("A1").Select   ActiveSheet.PageSetup.PrintArea = "$A$1:$K$34" 'Zone d'impression -> A1:K34 = Feuille A4. ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1   Columns("C:K").Select Selection.EntireColumn.Hidden = False 'Puis on les affiche à nouveau. Range("A1").Select   End Sub

---

Bonne soirée, Anto.

J'ai essaye ton code mais là je patoge vu mon très faible niveau en vba donc je te mets mon fichier en exemple si tu peu m'aider, voilà je te remercie beaucoup

J'aimerai savoir si pour l'impression partiel il était possible de ne pas avoir de blanc entre les colonnes et aucune ligne vide
merci beaucoup

Re,

Voilà, peut-être ça te conviendra...

Bye.

wouahh!!! merci beaucoup c'est tout à fait ça qu'il me faut :ccool:
Par contre j'aimerais savoir ta méthode pour faire car je dois reproduire ça sur plusieurs tableaux et franchement je patauge un peu sur ton code. Si tu peux m'expliquer, tu m'ôterais une épine du pied. En tout cas grand merci à toi :D