claude.dasilva
XLDnaute Junior
Bonjour à tous,
J'ai besoin de votre aide.
Je souhaite imprimer plusieurs onglets différents selon les checkbox que je coche dans un onglet menu.
J'ai mis ce code :
Donc une fois que j'ai coché les ongles qui m'intéressent, j'appuie sur le bouton, il m'imprime les onglets que j'ai coché mais il m'affiche ce message d'erreur à la fin.
Quelqu'un a-t-il une idée ?
Merci.
J'ai besoin de votre aide.
Je souhaite imprimer plusieurs onglets différents selon les checkbox que je coche dans un onglet menu.
J'ai mis ce code :
Code:
Private Sub CommandButton1_Click()
For i = 1 To ActiveSheet.OLEObjects.Count
If ActiveSheet.OLEObjects("CheckBox" & i).Object.Value = "Vrai" Then
Sheets("" & Range("g" & i + 4) & "").PrintOut
End If
Next
End Sub
Donc une fois que j'ai coché les ongles qui m'intéressent, j'appuie sur le bouton, il m'imprime les onglets que j'ai coché mais il m'affiche ce message d'erreur à la fin.
Quelqu'un a-t-il une idée ?
Erreur d'exécution 1004
Impossible de lire la propriété OLEObjects de la classe Worksheet.
Merci.