Code vba
gobeaut
-
f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention -
f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
je voudrais connaître le code afin de demander à l'utilisateur via un bouton quel onglet il souhaite imprimer (mon fichier comprend : une feuille en page accueil où je souhaite positionner mon bouton, 2 feuilles de tri et 15 feuilles d'étiquettes)
je voudrais connaître le code afin de demander à l'utilisateur via un bouton quel onglet il souhaite imprimer (mon fichier comprend : une feuille en page accueil où je souhaite positionner mon bouton, 2 feuilles de tri et 15 feuilles d'étiquettes)
A voir également:
- Code vba
- Code ascii - Guide
- Code puk bloqué - Guide
- Code activation windows 10 - Guide
- Comment déverrouiller un téléphone quand on a oublié le code - Guide
- Code blocks - Télécharger - Langages
1 réponse
Bonjour,
Dim MySelect
MySelect = InputBox("Quel onglet voulez-vous imprimer?:")
If MySelect = "" Or MySelect = Null Then
MsgBox ("Entrez un numero d'onglet à imprimer!")
ElseIf CInt(MySelect) > 0 And CInt(MySelect) < 17 Then
With Worksheets(MySelect)
.PrintOut
End With
Else
MsgBox ("En dehors des limites")
End If
Ceci est un exemple de programmation pour ce que vous avez demande. Pour moi je nommerai les onglets a imprimer de 1 a 15 (onglets etiquettes). Inserez un bouton est copier le code.
Bonne suite
Dim MySelect
MySelect = InputBox("Quel onglet voulez-vous imprimer?:")
If MySelect = "" Or MySelect = Null Then
MsgBox ("Entrez un numero d'onglet à imprimer!")
ElseIf CInt(MySelect) > 0 And CInt(MySelect) < 17 Then
With Worksheets(MySelect)
.PrintOut
End With
Else
MsgBox ("En dehors des limites")
End If
Ceci est un exemple de programmation pour ce que vous avez demande. Pour moi je nommerai les onglets a imprimer de 1 a 15 (onglets etiquettes). Inserez un bouton est copier le code.
Bonne suite
