Verständnisfrage zu Felddimensionen

[Lupy]

Hallo an diesem schönen kalten Wintertag,

habe mal eine kleine Verständnisfrage zu Feldern:

Code:

Dim FeldA, FeldB

FeldA = [transpose(A1:A100)]

FeldB = [A1:A100]

Bei  o.g. Code dürfte FeldA ein eindimensionales Feld sein.
Welche Dimension hat denn FeldB?

[Kuwer]

Hallo Lupy,

Welche Dimension hat denn FeldB?

das sieht man sehr schön im Lokalfenster.

   

Gruß Uwe

[Ego]

Hallo Lupy,

matematisch hat eine transponierter Vektor die gleiche Dimension wie der Ursprungsvektor (Eins).
In Excel hat er aber die Dimension Zwei, wobei aber der höchste verfügbare Feldindex (UBound) der zweiten Dimension 1 ist.

Code:

Private Sub cbDimension_Click()

Dim intAnz As Integer
Dim intDim As Integer
Dim varFeldA, varFeldB

varFeldA = [transpose(A1:A100)]
varFeldB = [A1:A100]

For intDim = 1 To 3
    On Error Resume Next
    intAnz = -999
    intAnz = UBound(varFeldA, intDim)
    MsgBox "Länge dim " & intDim & " von FeldA = " & intAnz
    intAnz = -999
    intAnz = UBound(varFeldB, intDim)
    MsgBox "Länge dim " & intDim & " von FeldB = " & intAnz
Next intDim
End Sub