Bonsoir, j'ai un bouton qui lance une macro. Cette macro selectionne toutes les feuilles du fichier et ouvre la boite de dialogue d'impression. Le problème est que mes feuilles sortent dans n'importe quel ordre, alors qu'en prévisualisation j'ai bien 1 de x, 2 de x etc...
Merci de votre aide
Merci de votre aide
Code:
Option Base 1
Sub Button15_Click()
Dim i As Integer, MonArray()
ReDim MonArray(Worksheets.Count)
For i = 1 To Worksheets.Count
MonArray(i) = Sheets(i).Name
Next i
Sheets(MonArray).Select
Application.Dialogs(xlDialogPrint).Show
End Sub