Signpad für Unterschrift in VBA Userform
@mumpel, ich kann denn Link gar nicht öffnen/herunterladen, wenn ich drauf klicke passiert nichts.
Signpad für Unterschrift in VBA Userform
@mumpel, ich kann denn Link gar nicht öffnen/herunterladen, wenn ich drauf klicke passiert nichts.
Mehrere Objekte konnten nicht geladen werden, da.........
und wenn ich da auf OK drücke kommt, "Kompilierungsfehler in ausgeblendetem Modul: mdWriteAndReadINI............."#If Win64 And VBA7 Then
Public Declare PtrSafe Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" _
(ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
Public Declare PtrSafe Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" _
(ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, _
ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Public Declare PtrSafe Function WritePrivateProfileSection Lib "kernel32" Alias "WritePrivateProfileSectionA" _
(ByVal lpAppName As String, ByVal lpString As String, ByVal lpFileName As String) As Long
Public Declare PtrSafe Function GetPrivateProfileSection Lib "kernel32" Alias "GetPrivateProfileSectionA" _
(ByVal lpAppName As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
#Else
Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" _
(ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" _
(ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, _
ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Public Declare Function WritePrivateProfileSection Lib "kernel32" Alias "WritePrivateProfileSectionA" _
(ByVal lpAppName As String, ByVal lpString As String, ByVal lpFileName As String) As Long
Public Declare Function GetPrivateProfileSection Lib "kernel32" Alias "GetPrivateProfileSectionA" _
(ByVal lpAppName As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
#End If
VBA/HTML-CodeConverter, AddIn für Excel 2002-2019 (32-bit) und Excel 365 (32-bit Desktop-Version)
In VBA geschrieben von Lukas Mosimann. Projektbetreuung: René Holtz
Code erstellt und getestet in Excel 365 32-bit Desktopversion
Codedarstellung mit VBAHTML 12.6.0 erstellt.
Wofür sind die ganzen str und var Variablen? Wenn ich die str richtig verstehe werden dort parameter aus der .ini, in meinerm Fall der sigmapad_config.ini eingelesen?
Was ist .STPadCapt1 für ein Objekt?
Was wird bei SignatureSaveAsFileEx mit den var1(0), var1(1), var1(2), var1(3), var1(4), gemacht?
mdWriteAndReadINI
Hier verstehe ich tatsächlich fast nur Bahnhof.......
Was macht If obtINI.Value = True Then InsertSignConfigINIForm in der Userform?