Office: index ausserhalb des gültige Bereichs

Option Explicit
Dim summe As Integer
Dim k As Integer
Dim i, z As Integer
Dim zahl As Integer
Dim arr(1 To 2, 1 To 3) As integer

Private Sub CommandButton1_Click()
For k = 1 To 3
arr(k, 1) = 0 :!!!!
arr(k, 2) = 0 '!!!
Next k


For z = 1 To 3
zahl = Val(InputBox("zahl eingeben vektor b"))
arr(zahl, 2) = arr(zahl, 2) + 1 '!!!!!
Next z

For i = 1 To 3
zahl = Val(InputBox("zahl eingeben"))
arr(zahl, 1) = arr(zahl, 1) + 1 '!!!!!!
Next i


ListBox1.List = arr



summe = arr(1, 1) * arr(1, 2) + arr(2, 1) * arr(2, 2) + arr(3, 2) * arr(3, 1)


Label3.Caption = summe
End Sub

Private Sub CommandButton2_Click()
End
End Sub

Private Sub Label3_Click()

End Sub

Private Sub ListBox1_Click()

End Sub

Private Sub UserForm_Click()


End Sub
überall wo ein ! zeichen ist taucht dieser fehler auf:
laufzeitfehler "9"
index ausserhalb des gültigen bereichs

 

Fall1 nur 0 ; da Integer
Fall 2 nur 0

nur wenige schauen auf Deinen Rechner und sehen die Datei.
Ich möchte gerne den Fehler im Original sehen.

Ich baue keine Datei nach. Die Zeit hat schon jemand investiert.

Ein Nachbau sieht meist anders aus als das Original. <B>Darum sollte das Original verlinkt werden.</b>

Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten
Hinweis - Anonymisierung und Pseudonymisierung von Beispielmappen - MS-Office-Forum
änderrn.
Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Muster*, Test*, Mappe*, Beispiel*, Fehler*, Kalender* usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.
Es sollte ein aussagekräftiger Name sein.

Benutze hier im Forum die Funktion zum hochladen. Falls Du die nicht benutzen möchtest beachte, von unsicheren Servern wie z.B. www.file-upload.net lade ich keine Datei runter. (lt. Einschätzung meines Virenprogramms)3

Bilder lade ich mir nicht runter, da Excel damit nichts anfangen kann.

Bilder statt Datei | Excel ist sexy!

Hochgeladene Bilder können zwar als solche in Excel importiert werden, sind jedoch bei der Lösung von Problemen nicht sehr hilfreich, da man die eigentlichen Daten nicht ohne große und zeitraubende Umwege direkt in die Tabelle übertragen kann.

Das ist nur meine Meinung zu dem Thema.

 

K geht nur bis 2

Gruß Hajo

 

es ist das Array gemeint.

Gruß Hajo