Macro pour definir une zone d impression - Page 2

Résolu
Précédent
  • 1
  • 2
Le Pingou Messages postés 12372 Date d'inscription   Statut Contributeur Dernière intervention   1 475
 
Bonjour,
Oui à un détail prêt, selon votre information: la colonne 16 contient les calculs les donnees sont rentrees sur une ligne de la colonne 1 à 15
J'ai pris la colonne 1 soit la [A] à la place de la 2
Donc la procédure est de :
Sub DefinirZoneImpr()
' recherhe dernière ligne colonne [A:A]
With ActiveSheet.PageSetup
.PrintTitleRows = "$5:$12"
.PrintArea = ("$A$1:$S$" & Cells(Rows.Count, 1).End(xlUp).Row)
End With
ActiveSheet.PrintOut
End Sub

0
marc41000 Messages postés 56 Date d'inscription   Statut Membre Dernière intervention  
 
merci j essai donc cela ce we

encore merci
0
marc41000 Messages postés 56 Date d'inscription   Statut Membre Dernière intervention  
 
bonjour

grand merci cela fonctionne

j aurai une requête d un utilisateur, est il possible que le bouton ne lance pas l impression mais qu il definisse uniquement la zone d impression

cordialement
0
Le Pingou Messages postés 12372 Date d'inscription   Statut Contributeur Dernière intervention   1 475
 
Bonjour,
Le mieux est d'insérer un choix imprimé oui ou non dans la procédure et comme cela vous avez un seul bouton.
Ce doit être réalisable pour vous.
0

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

Posez votre question
marc41000 Messages postés 56 Date d'inscription   Statut Membre Dernière intervention  
 
RE

laissez tomber le bouton d impression oui ou non le plus simple comme on me le demande est de definir que la zone d impression

cdt
0
Le Pingou Messages postés 12372 Date d'inscription   Statut Contributeur Dernière intervention   1 475
 
Bonjour,
Commencez par essayer ce que je vous ai proposé et ensuite vous revenez....!
0
marc41000 Messages postés 56 Date d'inscription   Statut Membre Dernière intervention  
 
les utilisateurs préfèrent imprimer eux meme

cdt
0
Le Pingou Messages postés 12372 Date d'inscription   Statut Contributeur Dernière intervention   1 475
 
Bonjour,
Merci c'est vraiment du n'importe quoi... !
Je quitte le poste.

0
marc41000 Messages postés 56 Date d'inscription   Statut Membre Dernière intervention  
 
pourquoi c est n importe quoi
0
Précédent
  • 1
  • 2