Userform - Copier l'userform en image

Re-bonjour tout le monde.

J'aimerai savoir s'il est possible, dans un formulaire, de cliquer sur un bouton pour que celui-ci fasse un screenshot de l'userform (avec les données encodées par l'utilisateur), pour pouvoir coller l'image quelque part d'autre dans la feuille.

Merci d'avance, et encore merci pour vos contributions et aides.

:ccool:

bonjour

tu devrais commencer par regarder dans la faq ou les sources avant de poster
tout est dans la faq

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)   Private Sub CommandButton1_Click()     'Copie d'écran de la forme active keybd_event vbKeySnapshot, 1, 0&, 0& DoEvents   colle l'image dans le premier sheets Sheets(1).Paste   End Sub

---

au plaisir