Beiträge von eg-sat

Nö, nicht wirklich.

Also frag ich hier mal, gibts jemand der das gegen Bezahlung umbauen kann ?
Ich bin zu doof

Hehe, ja, oder jemand fragen der sich damit auskennt.
Kann man dich buchen?

Habe es auch schon so probiert:

 Local $oRange = $oWorkbook.ActiveSheet.UsedRange.SpecialCells($xlCellTypeLastCell)

Local $artikel_anz = StringTrimLeft($oRange, 1)

und dann

For $i = 1 To $artikel_anz[0][0]

Krieg aber immer die: Subscript used on non-accessible variable

Danke, habe es mit dem und anderen Posts hinbekommen.
(oder auch nicht, es kommt zumindest mal kein Fehler mehr).

So:

 Local $iLastUsedRow = $oWorkbook.ActiveSheet.UsedRange.Rows.Count

Ich nehme an, dass in der iLastUsedRow nun die Zahl der letzten Zeile steht.
Jetzt möchte ich mit einer For -next schleife bis dahin zählen.
Kommt aber immer :Subscript used on non-accessible variable
Muss ich die $iLastUsedRow dazu umwandlen ? Ich dachte es wäre schon eine Zahl. ?

Hallo zusammen,

ich möchte aus einer Excel Tabelle auslesen wie viele Zeilen beschrieben wurden.
Ein Python Script schreibt Daten aus einem Scanner in die Tabelle und ich brauche dann die Anzahl der Zeilen.

Wahrscheinlich kann ich das über UDF irgendwie rauskriegen, aber ich schaffe es nicht.

Das Ganze lief auch schon, wurde aber auf dem alten Rechner mit ;$artikel_anz = _ExcelReadSheetToArray($oExcel) gemacht.

Danke für Hilfe,

eg-sat

_push_listview("Öffne Ecxel Fenster")
		 Local $oExcel = _Excel_Open()
		 Local $workbook = @ScriptDir & "\Mappe1.xlsx"
		 Local $artikel_anz = _Excel_BookOpen($oExcel, $workbook, Default, Default, True)




		 ;Warte auf ecxel Fenster
		 _push_listview("Warte auf Excel Fenster")
		 WinActivate("Mappe1 - Excel")
		 WinWaitActive("Mappe1")
		 _push_listview("Ecxel Fenster geöffnet und aktiv")


		 ; Ecxel fertig also starte Pyton Import
		 _push_listview("Starte Import-Script (Python)")
		 ShellExecute("Barcode_V2.py", "", @ScriptDir, "open")
		 _push_listview("Script gestartet - 8 Sek. Pause")
		 Sleep(8000)


		 ;Lese Daten in 2D Array
		 _push_listview("Lese Artikelnummern ein")
		 $artikel_anz = _ExcelRangeRead($oExcel)
         _push_listview ($artikel_anz)




		 Sleep(500)