Hi an alle,
kurze Frage zur Excel UDF...ich öffne eine Excel Datei, um Daten in einer Variablen zu speichern. Das klappt auch soweit, aber das sauber schließen haut nicht hin, d.h. ich bekomme immer "Alerts" aus der Excel Marke "Es befindet sich schon eine Datei am Speicherort mit selben Namen" oder "soll die Datei ersetzt werden?" (wenn ich das Speichern force)...
liegt es daran, dass es eine xlsm ist? Damit gab es in der Vergangenheit ja Probleme....danke euch im Voraus
Lieben Gruß Thomas
Code
; Create application object
Local $bVisible = False
Local $oExcel = _Excel_Open($bVisible)
;Local $oExcel = _Excel_Open()
Local $bReadOnly = True
Local $bVisible = False
Local $var = 1
Local $sPassword = "Apfelmus22#"
Local $R = "D" & $var & ":" & "E" & $var
Local $sWorkbook = @ScriptDir & "\Subfiles\SkillDB.xlsm"
Local $oWorkbook = _Excel_BookOpen($oExcel, $sWorkbook, $bReadOnly, $bVisible, $sPassword)
Local $aResult = _Excel_RangeRead($oWorkbook)
For $i = 0 To UBound($aResult, 1) - 1
If $aResult[$i][0] = @UserName Then
Global $xName = StringSplit($aResult[$i][1], ",")
Global $varLogin = $aResult[$i][0]
Global $varName = $aResult[$i][1]
Global $varSchicht = $aResult[$i][2]
EndIf
Next
_Excel_BookClose($oWorkbook, True)
_Excel_Close($oExcel, 1, 0)
Alles anzeigen