Nombre d'impression

Résolu/Fermé
vielhom Messages postés 24 Date d'inscription mercredi 11 novembre 2015 Statut Membre Dernière intervention 30 décembre 2015 - 1 déc. 2015 à 10:49
vielhom Messages postés 24 Date d'inscription mercredi 11 novembre 2015 Statut Membre Dernière intervention 30 décembre 2015 - 1 déc. 2015 à 13:50
Bonjour,
J'ai fait cette macro en partie avec l'enregistreur de macros et ce que j'ai glané sur le net :
Sub Imprimer()
Application.ScreenUpdating = False
Range("C:C,G:G").Select
ActiveSheet.PageSetup.PrintArea = "$A:$F"
Selection.EntireColumn.Hidden = True

Sheets("Feuil2").PrintOut Copies:=Sheets("Feuil1").Range("L5")

Application.ScreenUpdating = True
' Call Afficher
End Sub

Mais ça ne fonctionne pas.
Je vous remercie de bien vouloir me corriger.


A voir également:

5 réponses

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
1 déc. 2015 à 11:00
bonjour

tu es sur quelle feuille quand tu lances la macro

Mais ça ne fonctionne pas.
et si tu nous en disais plus ?

tu appelles la macro "afficher"!: qu'il y a t il dans cette macro

au besoin reformules ta demande comme si tu n'avais pas écrit de macro
0
vielhom Messages postés 24 Date d'inscription mercredi 11 novembre 2015 Statut Membre Dernière intervention 30 décembre 2015 3
1 déc. 2015 à 11:24
Bonjour michel_m
Je suis sur la feuille nommée Liste qui en L5 indique le nombre d'impression par liste de choix et la macro Afficher, affiche les colonnes masquées. Je la met ci-dessous:
Sub Afficher()
Application.ScreenUpdating = False
Columns("A:H").Select
Selection.EntireColumn.Hidden = False
Range("A1").Select
ActiveWorkbook.Save
Application.ScreenUpdating = True
End Sub
0
vielhom Messages postés 24 Date d'inscription mercredi 11 novembre 2015 Statut Membre Dernière intervention 30 décembre 2015 3
1 déc. 2015 à 11:26
Je vous remercie de vous intéresser à ma demande, car je suis novice.
0
vielhom Messages postés 24 Date d'inscription mercredi 11 novembre 2015 Statut Membre Dernière intervention 30 décembre 2015 3
1 déc. 2015 à 13:27
Bonjour,
Je mets le lien du fichier :

https://www.cjoint.com/c/ELbmzUDGUhw

En vous remerciant de votre aide.
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
1 déc. 2015 à 13:37
Bonjour,

fichier modifie : https://www.cjoint.com/c/ELbmLz6OEbf
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
vielhom Messages postés 24 Date d'inscription mercredi 11 novembre 2015 Statut Membre Dernière intervention 30 décembre 2015 3
1 déc. 2015 à 13:50
Bonjour,
Je vous remercie beaucoup pour m'avoir gentiment offert ce code.
Je vous souhaite le meilleur.
0