Hi Leute,
0. kann ich die Daten dieses langen Display Arrays als Schleife in einem Skript verwenden? Bspw. , das bei Schleife 3, das Skript auf die Datenreihe Col 3 zugreift, entweder send Befehle oder andere Befehle?
Mein bisheriges Skript für diese Zwecke braucht ca. 2-3 minuten für jede neue Schleife; was auf Dauer ziemlich viel Zeit und Strom kostet. Vielleicht liegt es an dem vielen Text den ich in meiner Excel Tabelle habe, den Autoit bei jeder neuen Schleife auslesen muss..., Außerdem ist die Buchstabenanzahl auf 250 Buchstaben pro Zelle begrenzt, was auch nicht so toll ist. Ich suche daher mit diesem Display Array eine neues besseres Skript für meine Zwecke.
1. Wie kann ich bspw. einen send Befehl für die Zeile "Row 18" formulieren? Also, es soll der Inhalt von Row 18 gesendet werden.
2. Ab ca. Col 99 scheint mir diese Methodik fehlerhaft zu sein. Zwar ist der gesamte Inhalt bis "HQ" von der Excel Datei in diesem Array, aber die Col- Bezeichnung ist ab Col 99 scheinbar fehlerhaft. Ist diese Methode nicht für mehr als 99 Col´s geeignet?
3. Gäbe es auch bei dieser Methodik eine Buchstaben Begrenzung?
4. Wenn ich mit dieser Methodik eine Schleifen Funktion hinbekommen würde, würde meine Skript dann auch für jede neue Schleife ca. 2-3 Minuten Wartezeit benötigen?
5. Habt ihr Vorschläge, wenn dieser Weg für meine Zwecke der falsche sein sollte, wie ich ein besseres Skript als meines erstellen könnte? Ich brauche die Daten von einer Excel Tabelle, welche ich dann in meinem Skript verwende.
Ich danke euch im voraus für eure Antworten.
Gruß Bernd
#include <Array.au3>
#include <Excel.au3>
#include <MsgBoxConstants.au3>
; Create application object and open an example workbook
Local $oExcel = _Excel_Open()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeRead Example", "Error creating the Excel application object." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
Local $oWorkbook = _Excel_BookOpen($oExcel, @ScriptDir & "\Extras\_Excel1.xlsx")
If @error Then
MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeRead Example", "Error opening workbook '" & @ScriptDir & "\Extras\_Excel1.xls'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
_Excel_Close($oExcel)
Exit
EndIf
; Read the formulas of a cell range (all used cells in column A)
Local $aResult = _Excel_RangeRead($oWorkbook, Default, $oWorkbook.ActiveSheet.Usedrange.Columns("A:HQ"), 2)
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeRead Example 3", "Error reading from workbook." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeRead Example 3", "Data successfully read." & @CRLF & "Please click 'OK' to display all formulas in column A.")
_ArrayDisplay($aResult, "Excel UDF: _Excel_RangeRead Example 3 - Formulas in column A")
Alles anzeigen