Imprimer un userform

[alain]

Bonjour tout le monde

je cherche a savoir si il est possible d'imprimer un userform mais sans la couleur de fond, uniquement l'encadrement, les textbox ect ....

a partir d'une commande de genre userform.printout


qui peu me dire ?

 

[michel]

bonjour Alain

la macro ci dessous permet de passer le fond de l'USF en blanc le temps de l'impression , puis de reinitialiser la couleur d'origine . J'espere que cela pourra t'aider


Private Sub CommandButton1_Click()
Dim Couleur As String
Application.ScreenUpdating = False
Couleur = Me.BackColor
Me.BackColor = &H80000009
Me.PrintForm
Me.BackColor = Couleur
Application.ScreenUpdating = True
End Sub


bonne journée
michel

 

[alain]

Michel bonjour, bonjour à tous


Merci pour le code, je vais pouvoir le mettre en pratique

Bien à Toi

Alain