Array variable has incorrect number... - verstehe es nicht

dost0011

Hallo,
bitte helft mir, bevor ich verrückt werde.
Ich lese aus einer Excel Datei Zellen aus und übergebe das Array an $Datum. Das funktioniert und ich kann es mit _Arraydisplay anschauen. Dann möchte ich auf einen x-beliebigen Wert zugreifen und kriege eine Fehlermeldung...

Warum geht das nicht???
Danke für eure Geduld.

**alpines**

Ganz einfach formuliert: Es ist ein 2D-Array, du liest ja immerhin eine Tabelle aus.

Probier den Zugriff mal folgendermaßen: MsgBox(0,0,$Datum[5][0])
Die 5 repräsentiert die Zeile und 0 die Spalte aus der du gelesen hast.

dost0011

Oh. Vielen Dank. Ja es funktioniert. Kurzzeitig habe ich daran gedacht, aber den Gedanken wieder verworfen, weil ich nicht wusste, was in der anderen Spalte stehen soll...
Darf ich fragen, woher du das weißt? Lässt sich sowas anhand einer Dokumentation rausfinden oder hast du es nur einfach so gewusst

**autoBert**

Jede Funktion hat einen Rückgabewert. Die warscheins von dir verwendete _Excel_RangeRead
gibt bei mehrern Zellen logischerweise ein Array zurück. Wie man mit Array's umgeht kann man in https://www.autoitscript.com/wiki/Arrays nachlesen.

@BugFix hat auch ein Arraytutorial geschrieben, sollte in seiner Signatur verlinkt sein.

dost0011

Ok, dass es sich um ein Array handelte wusste ich ja. Ich dachte aber, dass es ein 1D Array ist und nicht, dass es sich um ein 2D Array handelt...
Wo steht das?

**alpines**

Du holst die eine 2dMatrix und erwartest eine 1d. Aha

dost0011

Ich habe ja kein Problem damit, was dazu zu lernen.
Aber ich habe nur einen Wert abgefragt - kein Array.

Ich verstehe den Satz nicht: "Du holst eine 2d Matrix"...

Offensichtlich wusste ich nicht, dass es eine 2d Matrix ist, sonst hätte ich hier ja nicht um Rat gefragt.
Woran kann man das denn erkennen, das der Return Value 2d ist?
Ich möchte mit der Fragerei doch einfach verhindern, dass mir soetwas nochmal passiert...

**alpines**

Schau dir mal die Dokumentation der Funktionen an, da ist immer alles ordentlich erklärt.
Es ist ja nicht schlimm das du es nicht weißt aber wenn du Zweifel hast immer dort reinschauen.

dost0011

In der Doku steht:

Return Value

Success:

the data from the specified cell(s). A string for a cell, a zero-based array for a range of cells.

Wenn ich nun also eine Spalte auswähle, die ich eingelesen haben möchte, dann käme man doch mit einem 1D Array aus...

Für mich steht es nirgends, wie das Ergebnis genau aussieht (also ob 1D oder 2D).

Und genau bei dem Satz "Schau dir mal die Dokumentation der Funktionen an..." habe ich immer das Gefühl, dass es noch mehr Dokus gibt, als nur "AutoIt Help".

WO GENAU steht, dass das Ergebnis ein 2D Array ist?

Falls es nirgends steht, dann kann ich damit auch leben - nur weiß ich dann, dass ich mehr nachdenken muss und nicht zu dumm zum lesen bin...

**alpines**

Naja, ein 1D-Array wäre trotzdem nicht ganz richtig. Du holst dir immerhin knapp 30 Zeilen und eine Spalte, aus diesem Grund ist es auch ein 2D-Array.
Es ist ja nicht schlimm wenn es in der Dokumentation nicht steht, dann schaut man beim nächsten mal halt zwei Mal hin, war ja nicht böse gemeint.

dost0011

Danke dir. War auch nicht böse aufgefasst
Es passiert halt immer wieder mal (auch in anderen Programmiersprachen), dass ich den Hinweis kriege: "Schau doch in die Doku..." und ich finde es einfach nicht...
Da kommt man dann schon ins Grübbeln...

**autoBert**

Zitat von dost0011

WO GENAU steht, dass das Ergebnis ein 2D Array ist?

weis ich nicht, aber wenn es einer weis, dann water.

Aber spätestens durch _Arraydisplay weist du ja das es ein 2D-Array ist:

Zitat von dost0011

Das funktioniert und ich kann es mit _Arraydisplay anschauen.

**Bitnugger**

Bei Fehlern mit Arrays ist die Funktion UBound() dein bester Freund...

Spoiler anzeigen

AutoIt

;-- TIME_STAMP   2016-09-03 08:31:54   v 0.1


#include <Array.au3>
#include <Excel.au3>


Global $aDatum, $Buffer = "", $sKontofile = @ScriptDir & "\Tabelle.csv", $oExcel, $oWorkbook


; Create application object and open an example workbook
$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) + 1


$oWorkbook = _Excel_BookOpen($oExcel, $sKontofile, False, True)
If @error Then
	$sKontofile = FileOpenDialog("", @ScriptDir, "(*.csv)")
	If @error Then
		_Excel_Close($oExcel)
		Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeRead Example", "Error opening workbook '" & $sKontofile & '."' & @CRLF & "@error = " & @error & ", @extended = " & @extended) + 2
	EndIf
	$oWorkbook = _Excel_BookOpen($oExcel, $sKontofile, False, True)
	If @error Then
		_Excel_Close($oExcel)
		Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeRead Example", "Error opening workbook '" & $sKontofile & '."' & @CRLF & "@error = " & @error & ", @extended = " & @extended) + 3
	EndIf
EndIf


$aDatum = _Read_Excel("A:A")
_ShowResult($aDatum)
Exit


Func _Read_Excel($sRange)
	Local $vResult = _Excel_RangeRead($oWorkbook, Default, $oWorkbook.ActiveSheet.Usedrange.Columns($sRange), 1, True)
	If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeRead Example 3", "Error reading from workbook." & @CRLF & "@error = " & @error & ", @extended = " & @extended) + 4
	Return $vResult
EndFunc   ;==>_Read_Excel


Func _ShowResult(ByRef $aArray)
	Local $sUBound
	;_ArrayDisplay($aArray)
	$sUBound  = StringFormat('%s %04i %s', 'The Array $aArray has ', UBound($aArray, $UBOUND_DIMENSIONS), ' DIMENSIONS' & @CRLF)
	$sUBound &= StringFormat('%s %04i %s', 'The Array $aArray has ', UBound($aArray, $UBOUND_ROWS), ' ROWS' & @CRLF)
	$sUBound &= StringFormat('%s %04i %s', 'The Array $aArray has ', UBound($aArray, $UBOUND_COLUMNS), ' COLUMNS' & @CRLF)
	Switch UBound($aArray, $UBOUND_DIMENSIONS)
		Case 0
			MsgBox(0, $sKontofile, _
				'Lieber Herr Kollege, die übergebene Variable ist kein Array!' & @CRLF & @CRLF & _
				'Die übergebene Variable ist vom Typ: ' & VarGetType($aArray))
		Case 1	; Tritt niemals ein... auch wenn $sRange nur eine Zelle umfasst, da eine Tabelle mindestens 2 Dimensionen hat.
			MsgBox(0, $sKontofile, '1D - Bla bla bla...')
		Case 2
			MsgBox(0, $sKontofile, _
				'The value in cell ' & Chr(65 + 0) & Chr(48 + 5) & ' is "' & $aDatum[5][0] & '"' & @CRLF & @CRLF & _
				'Hm, the three @TABs at the end of the cell are wanted?' & @CRLF & @CRLF & _
				$sUBound)
		Case 3	; Das wäre dann eine 3D-Matrix...
			MsgBox(0, $sKontofile, '3D - Bla bla bla...')
	EndSwitch
EndFunc   ;==>_ShowResult

Alles anzeigen