Userform versenden
21.03.2018 22:01:06
Hendrik
ich würde gerne eine erstellte Userform via Mail versenden.
Nun ist die Frage, ob das nur als Bild (Screenshot) oder auch als Datei möglich ist.
Für beide Fälle habe ich leider bei der Suche im Internet nichts brauchbares gefunden.
Hat jemand von euch eine Idee?
Zum THema Userform als BIld speichern habe ich folgendes gefunden, weiß aber nicht wie ich das einfügen muss...:
Option Explicit
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal _
bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const KEYEVENTF_KEYUP = &H2
Private Const VK_SNAPSHOT = &H2C
Private Const VK_MENU = &H12
Sub AltPrintScreen()
keybd_event VK_MENU, 0, 0, 0
keybd_event VK_SNAPSHOT, 0, 0, 0
keybd_event VK_SNAPSHOT, 0, KEYEVENTF_KEYUP, 0
keybd_event VK_MENU, 0, KEYEVENTF_KEYUP, 0
End Sub
Private Sub cmdPrint_Click()
AltPrintScreen
End Sub
Vielen Dank vorab!
VG
Hendrik