Impression ou pas impression

[sten83]

Bonjour a tous, j'ai dans un USF un combo qui reprend la liste des onglets du classeur, un bouton en dessous pour imprimer la feuille sélectionnée dans le combo, j'aimerai si la feuille et vide annuler le démarrage de l'impression, et dire a l'aide d'un msgbox que la feuille et vide.
J'ai essayer un code que j'avais sans succès.
Merci pour votre aide.
(je joint le classeur)

 

[Compte Supprimé 979]

Re : Impression ou pas impression

Bonjour sten83

Il serait judicieux voir impératif d'enlever tout signe de marque ou de label avant d'envoyer des fichiers 😡

 

[Paf]

Re : Impression ou pas impression

Bonjour à tous,

je rajouterais que le nom des clients et le N° d'immatriculation ne devraient pas apparaître non plus !!

Quant au soucis d'impression une solution possible :

Private Sub CmdPrintSelection_Click()

If Me.ComboListeFeuille.ListIndex = -1 Then Exit Sub
If Worksheets(CStr(ComboListeFeuille)).Range("A6") <> "" Then
    Application.Dialogs(xlDialogPrinterSetup).Show
    Worksheets(CStr(ComboListeFeuille)).PrintOut , , 1
Else
    MsgBox "Aucune données enregistrées en feuille " & Worksheets(CStr(ComboListeFeuille)).Name, vbInformation, "Vide"
End If

ComboListeFeuille.ListIndex = -1

End Sub

A+

 

[sten83]

Re : Impression ou pas impression

Merci pour le code c'est exactement ce que je voulais.

 

[Staple1600]

Re : Impression ou pas impression

Bonsoir à tous

sten83
Et tu fais quoi des demandes d’anonymisation de ton fichier suggérées par BrunoM45 et Paf ?
Tu les zappes?
Ou tu attends que le modérateur du forum supprime ta pièce jointe ?

PS: Inscrit depuis février 2012, tu ne peux prétendre ne pas connaitre ce point de la charte du forum ...🙄

 

[sten83]

Re : Impression ou pas impression

Désoler pour le fichier mais je ne sais pas comment faire pour le supprimer!

 

[sten83]

Re : Impression ou pas impression

C'est bon j'ai trouve et j'ai supprimer la pièce jointe.