Impression sous excel
fred
-
dudu134 Messages postés 2877 Statut Membre -
dudu134 Messages postés 2877 Statut Membre -
je souhaite savoir si il est possible sous excel d'imprimé en meme temps la feuil1 et la feuil2, je m'explique
la feuil1 est une feuille de calcul (pour faire des devis ou facture), la feuil2 est l'arriere plan de ma facture ( avec le nom de la boite et le logo)
ce serait interressant de savoir si une evntuelle macro pouvais executer en meme temps l'impression des pages
le but est de ne pas avoir besoin d'imprimer d'abord la feuil2 et de la repasser pour imprimer la feuil1
merci de vos reponse
Fred
la feuil1 est une feuille de calcul (pour faire des devis ou facture), la feuil2 est l'arriere plan de ma facture ( avec le nom de la boite et le logo)
ce serait interressant de savoir si une evntuelle macro pouvais executer en meme temps l'impression des pages
le but est de ne pas avoir besoin d'imprimer d'abord la feuil2 et de la repasser pour imprimer la feuil1
merci de vos reponse
Fred
A voir également:
- Impression sous excel
- Spouleur d'impression - Guide
- Liste déroulante excel - Guide
- Impression livret a5 - Guide
- Word et excel gratuit - Guide
- Si ou excel - Guide
1 réponse
Bonjour,
dans le vba -> modules, tu met ce code :
Sub Impression()
'
' Impression Macro
' Macro enregistrée le 09/02/2007 par dudu134
'
'Impression pour la feuille Entête
Sheets("feuil1").Select
Range("B2:h53").Select
Selection.PrintOut Copies:=2, Collate:=True
ActiveWindow.SmallScroll Down:=-9
Range("B2:h53").Select
End Sub
Sub Impression1()
'
' Impression1 Macro
' Macro enregistrée le 09/02/2007 par dudu134
'
'Impression pour la feuille Récapitulation
Sheets("feuil2").Select
Range("A1:K64").Select
Selection.PrintOut Copies:=2, Collate:=True
ActiveWindow.SmallScroll Down:=-9
Range("A1:K64").Select
End Sub
tu met ce code dans la feuille ou tu met ton bouton pour imprimer
Private Sub CommandButton3_Click()
Impression
Impression1
End Sub
dans le vba -> modules, tu met ce code :
Sub Impression()
'
' Impression Macro
' Macro enregistrée le 09/02/2007 par dudu134
'
'Impression pour la feuille Entête
Sheets("feuil1").Select
Range("B2:h53").Select
Selection.PrintOut Copies:=2, Collate:=True
ActiveWindow.SmallScroll Down:=-9
Range("B2:h53").Select
End Sub
Sub Impression1()
'
' Impression1 Macro
' Macro enregistrée le 09/02/2007 par dudu134
'
'Impression pour la feuille Récapitulation
Sheets("feuil2").Select
Range("A1:K64").Select
Selection.PrintOut Copies:=2, Collate:=True
ActiveWindow.SmallScroll Down:=-9
Range("A1:K64").Select
End Sub
tu met ce code dans la feuille ou tu met ton bouton pour imprimer
Private Sub CommandButton3_Click()
Impression
Impression1
End Sub
