XL 2010 VBA Impression checkbox

[Yes28]

Bonjour,

Je galère un peu... beaucoup pour lancer une impression d'onglets suivant des cases cochées dans un userform.
Pour ajouter un peu de complexité le nom des onglets change avec un nom aléatoire (une date).

J'ai déjà un peu avancé sur le fichier mais ceci me bloque !

Si vous avez un bon conseil je suis preneur !!

et dans un second temps j'aimerai proteger un maximum le fichier mais avec les macros c'est compliqué non ?

Merci pour votre aide !
Bonne soirée

 

[Compte Supprimé 979]

Bonjour Yes28

Voici le code (inutile de sélectionner la feuille pour l'imprimer)

Private Sub CommandButton2_Click()
  Dim Ind As Integer
  For Ind = 1 To 7
    If Me("CheckBox" & Ind).Value = True Then
      Sheets(Sheets("Menu").Range("I" & 14 + Ind).Value).PrintOut Copies:=1
    End If
  Next Ind
End Sub

A+

 

[Yes28]

Merci Merci Merci !

Je n'y ai pas passé la nuit et ce matin ce petit code simple et efficace !
c'est super !

Je ne maitrise pas trop vba, et des fois je passe par 10.000 chemins.
Vite une formation !!!

merci beaucoup