|
|
|
|
Bonjour,
je suis débutant en VBa excel et je souhaite avoir un code VBA qui me permet d'imprimer des feuilles. ce code s'executerai sur le clique d'un bouton que je nomme "imprimer". J'ai commencé un code (voir ci dessous) j'essaie d'imprimer les 9 feuilles de mon classeur avec la fonction sheets array mais sans succés :
Sheets(Array("feuille 1", "feuille 2", "feuille 3", "feuille 4",_
"feuille 5", "feuille 6",_"feuille 7", "feuille 8", _
"feuille 9", "feuille 10", "feuille 11", "feuille 12",_)
)Select.
Sheets("feuille 1").Activate
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("feuille 2").Select
ActiveWindow.ScrollWorkbookTabs Position:=xlLast
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Sheets("feuille 1").Select
SVP aidez moi
Configuration: Windows XP Internet Explorer 7.0
Bonjour
liste = Array("feuille 1", "feuille 2", "feuille 3", "feuille 4", _
"feuille 5", "feuille 6", _
"feuille 7", "feuille 8", _
"feuille 9", "feuille 10", "feuille 11", "feuille 12")
For cptr = 0 To UBound(liste)
Sheets(liste(cptr)).PrintOut
Next
Cordialement, Michel |
Afeccter une macro sous excel Comment inserer un code vba excel Créer une macro sous excel Erreur si nom de feuille identique vba excel Excel 2007 macro pour afficher boite d'impression Excel combobox vba lire cellule Excel macro fonction remplacer Excel macro selection.copy Impression code barre Macro excel erreur 1004 Office mac 2008 excel vba Ouvrir vba sur excel en mac Renommer une feuille excel vba Récuperer bouton option excel valeur vba Trouver un code vba Vba appel fonction excel Vba excel activeworkbook Vba excel max
