Imprimer.....

Le
Denys
Bonjour tous,

Je cherche imprimer une slection prcise de cellules,
mais je n'y arrive pas Sauriez-vous ou est l'erreur?

Private Sub CommandButton6_Click()
With ActiveSheet
.PageSetup.PrintArea = "$A$107:$B$131,$U$107:$AK$131"
.Selection.PrintOut
End With
End Sub

Excel ne veut pas

Merci pour votre aide

Denys
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Nicolas B.
Le #1223568
Salut Denys,

Activesheet.Printout ou selection.printout à la place de
Activesheet.Selection.Printout.


A+
--
Nicolas B.


Bonjour à tous,

Je cherche à imprimer une sélection précise de cellules,
mais je n'y arrive pas... Sauriez-vous ou est l'erreur?

Private Sub CommandButton6_Click()
With ActiveSheet
.PageSetup.PrintArea = "$A$107:$B$131,$U$107:$AK$131"
.Selection.PrintOut
End With
End Sub

Excel ne veut pas...

Merci pour votre aide...

Denys


Denys
Le #1288971
Bonsoir Nicolas,

Merci, j'en prends bonne note..

Bonne soirée

Denys


-----Original Message-----
Salut Denys,

Activesheet.Printout ou selection.printout à la place de
Activesheet.Selection.Printout.


A+
--
Nicolas B.


Bonjour à tous,

Je cherche à imprimer une sélection précise de cellules,
mais je n'y arrive pas... Sauriez-vous ou est l'erreur?

Private Sub CommandButton6_Click()
With ActiveSheet
.PageSetup.PrintArea
= "$A$107:$B$131,$U$107:$AK$131"


.Selection.PrintOut
End With
End Sub

Excel ne veut pas...

Merci pour votre aide...

Denys



.




Publicité
Poster une réponse
Anonyme