Thema Datum  Von Nutzer Rating
Antwort
31.03.2023 15:03:57 Turbo
NotSolved
31.03.2023 15:14:11 Gast55492
NotSolved
31.03.2023 15:37:16 Gast36755
NotSolved
03.04.2023 00:49:01 Gast15772
NotSolved
Rot Rückgabewert Array
 05.04.2023 22:23:01 Martin
NotSolved

Ansicht des Beitrags:
Von:
Martin		 Datum:
05.04.2023 22:23:01		 Views:
492		 Rating:
     
Antwort:
  Ja
Thema:
Rückgabewert Array

Hallo!

Warum verwendest Du ein zweidimensionales Array?

liste(2,2) sind 9 Elemente !!

Habe die Funktion umgeschrieben und ein Testprogramm hinzugefügt.


 

Sub main()
Dim index As Integer
Dim rueckgabe As Integer
'Schleife, damit kein falscher Index eingegeben wird
Do
index = InputBox("Bitte einen Index zwischen 0 und 2 eingeben:", "Eingabe")
Loop While index < 0 Or index > 3
'Abfrage aus Liste
rueckgabe = RueckgabeAlsArray(index)
'Ausgabe Ergebnis
MsgBox rueckgabe, 64
End Sub

Public Function RueckgabeAlsArray() As Variant

Dim liste(2) As Variant

liste(0) = 11
liste(1) = 22
liste(2) = 33

RueckgabeAlsArray = liste

End Function

 

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
31.03.2023 15:03:57 Turbo
NotSolved
31.03.2023 15:14:11 Gast55492
NotSolved
31.03.2023 15:37:16 Gast36755
NotSolved
03.04.2023 00:49:01 Gast15772
NotSolved
Rot Rückgabewert Array
 05.04.2023 22:23:01 Martin
NotSolved