Hallo zusammen,
irgendwie kann ich zwar spalten löschen, jedoch keine komplette Zeile...
Zur Erklärung, ich würde gerne, wenn in der Spalte F eine Artikel-Nr größer 9 Zeichen vorkommt, diese entsprechende komplette Zeile entfernen... jedoch bekomme ich immer den Error Code 2.
könnte da mal einer bitte drüber schauen? Excel-Datei hängt ebenfalls (als ZIP aufgrund der hier erlaubten Dateiendung) an...
Spoiler anzeigen
AutoIt
#include <Excel.au3>
#include <Array.au3>
$sInputFile = @scriptdir & "\input.xls"
$sExportFile = @scriptdir & "\export.xls"
Local $oExcel = _Excel_Open()
Local $workbook = _Excel_BookOpen($oExcel, $sInputFile)
Sleep(2000) ;Pause to let user view action
$Zeilenanzahl = $oExcel.ActiveSheet.Cells($oExcel.Rows.Count, 1).End(-4162).Row ; -4162 = xlUp
For $i = 3 to $Zeilenanzahl
$test = $oExcel.ActiveSheet.Range("F"& $i).Value
If StringLen($test) > 9 Then
_Excel_RangeDelete($workbook.Worksheets(1), '"' & $i & ":" & $i & '"')
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeDelete Example 2", "Error deleting rows." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
Consolewrite($test & @TAB & '"' & $i & ":" & $i & '"' & @CRLF)
EndIf
Next
Alles anzeigen