9
Pointer in VBA ?
Wie benutze ich Pointer in VBA?
Hi,
ich will von einer Funktion mehrere Werte zurückgeben, da das ja nicht geht und ich keine globalen Variablen benutzen will, brauche ich Pointer.
Kann mir vielleicht jemand erklären, wie ich diese Benutze/Dekrariere?
Ich will 4 Pointer an eine Funktion übergeben und dann logischer Weise auch verändern.
MfG
Tschieses
ich will von einer Funktion mehrere Werte zurückgeben, da das ja nicht geht und ich keine globalen Variablen benutzen will, brauche ich Pointer.
Kann mir vielleicht jemand erklären, wie ich diese Benutze/Dekrariere?
Ich will 4 Pointer an eine Funktion übergeben und dann logischer Weise auch verändern.
MfG
Tschieses
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 73310
Url: https://administrator.de/contentid/73310
Printed on: April 24, 2024 at 11:04 o'clock
9 Comments
Latest comment
Wenn die Werte alle vom gleichen Typ sind, dann benutz doch einfach ein Array...
Unter VB - und damit auch VBA - gibt es keine Pointer.
Du könntest ja einen String zurückgeben der die Werte enthällt die durch ein Trennzeichen getrennt sind. die Werte kannst du dann mit der split-Funktion wieder aus dem String herausholen.
miniversum
Du könntest ja einen String zurückgeben der die Werte enthällt die durch ein Trennzeichen getrennt sind. die Werte kannst du dann mit der split-Funktion wieder aus dem String herausholen.
miniversum
hab jetzt auch schon rausgefunden dass es keine pointer gibt....
Prob: es sind unterschiedliche datentypen...
habs jetzt aber gelöst... da ich die werte nur zurück in die hauptfunktion geben wollte um sie dort auszugeben (man soll ja nix in der funktion/prozedur ausgeben ;) ) hab ich sie jetzt doch in der unterfunktion ausgegeben....
naja was soll.....
hmmm man hätte ja auch aus der unterfunktion die hauptfunktion aufrufen können... -> endlosschleife ohne GoTo
muauau
aber danke euch für die hilfe, jetzt wurde ich wiedermal bestätigt, dass VB/VBA der größte rotz is ;)
vielen dank euer
Tschieses
Prob: es sind unterschiedliche datentypen...
habs jetzt aber gelöst... da ich die werte nur zurück in die hauptfunktion geben wollte um sie dort auszugeben (man soll ja nix in der funktion/prozedur ausgeben ;) ) hab ich sie jetzt doch in der unterfunktion ausgegeben....
naja was soll.....
hmmm man hätte ja auch aus der unterfunktion die hauptfunktion aufrufen können... -> endlosschleife ohne GoTo
muauauaber danke euch für die hilfe, jetzt wurde ich wiedermal bestätigt, dass VB/VBA der größte rotz is ;)
vielen dank euer
Tschieses
Grüß Dich,
nur mal so eine frage...jemals etwas von "ByRef" gehört?
Deklariere einfach die nötigen Variablen in der aufrufenden Methode und übergib Sie der Funktion (die Du entsprechend mit ByRef Argumenten deklarierst).
BG, Felix
nur mal so eine frage...jemals etwas von "ByRef" gehört?
Deklariere einfach die nötigen Variablen in der aufrufenden Methode und übergib Sie der Funktion (die Du entsprechend mit ByRef Argumenten deklarierst).
BG, Felix
Nee noch nie was von gehört und auch keine ahnung wie ichs benutz
werd mal danach suchen bei gelegenheit, aber habs jetzt sowieso anders gelöst...
werd mal danach suchen bei gelegenheit, aber habs jetzt sowieso anders gelöst...
Ich möchte den Beitrag auch ungern so schließen.
Ich habe jetzt auf eine (lieblose) Suchmaschinenbefragung nur einen Verweis auf VBA ByVal/ByRef gefunden hier in den wikibooks.
Vielleicht könnte noch jemand einen ähnlich schönen für VB/ .NET drunterhängen.
Danke
Biber
Ich habe jetzt auf eine (lieblose) Suchmaschinenbefragung nur einen Verweis auf VBA ByVal/ByRef gefunden hier in den wikibooks.
Vielleicht könnte noch jemand einen ähnlich schönen für VB/ .NET drunterhängen.
Danke
Biber
Ich hab hier mal ein kleines Beispiel getipselt. Ich denke es sollte zur Veranschaulichung reichen:
Hier noch ein Link der helfen könnte:
http://vb-tec.de/byvalref.htm
miniversum
Sub byrefbyvaltest()
Dim a As Integer
a = 5
MsgBox "a vor refuebergabe: " & a
Call refuebergabe(a)
MsgBox "a nach refuebergabe: " & a
MsgBox "a vor valuebergabe: " & a
Call valuebergabe(a)
MsgBox "a nach valuebergabe: " & a
End Sub
Sub refuebergabe(ByRef b As Integer)
MsgBox "a in refuebergabe vor Veränderung: " & b
b = 6
MsgBox "a in refuebergabe nach Veränderung: " & b
End Sub
Sub valuebergabe(ByVal c As Integer)
MsgBox "a in valuebergabe vor Veränderung: " & c
c = 7
MsgBox "a in valuebergabe vor Veränderung: " & c
End SubHier noch ein Link der helfen könnte:
http://vb-tec.de/byvalref.htm
miniversum
Grüß Dich /biber/,
natürlich willst Du die hohe Qualität des Forums waren, IMHO war der Link den Du gegeben hast schon wirklich Antwort genug und (z.B.) "ByRef" absolute Grundlage von VB (VBA, so gesehen auch VB .Net) das ja nach Meinung des/der Hilfe-suchenden "der größte Rotz" ist.
miniversum hatte auch nochmal ein kleines Beispiel sowie einen anderen Link zur Materie gegeben, so denke ich doch ist der Thread erledigt.
Gottseidank ist mir das "RTFM" an Tschieses nur unterschwellig rausgerutscht *lol
natürlich willst Du die hohe Qualität des Forums waren, IMHO war der Link den Du gegeben hast schon wirklich Antwort genug und (z.B.) "ByRef" absolute Grundlage von VB (VBA, so gesehen auch VB .Net) das ja nach Meinung des/der Hilfe-suchenden "der größte Rotz" ist.
miniversum hatte auch nochmal ein kleines Beispiel sowie einen anderen Link zur Materie gegeben, so denke ich doch ist der Thread erledigt.
Gottseidank ist mir das "RTFM" an Tschieses nur unterschwellig rausgerutscht *lol
@miniversum, @misterdemeanor
Hmmja, so ganz befriedigend finde ich das Feedback des ThreadOwners ja nicht, aber...
Ich schließe den Thread mal und auf "beantwortet" setze ich ihn auch.
Schönen Nachmittag Euch und danke
Biber
so denke ich doch ist der Thread erledigt.
Hmmja, so ganz befriedigend finde ich das Feedback des ThreadOwners ja nicht, aber...
Ich schließe den Thread mal und auf "beantwortet" setze ich ihn auch.
Schönen Nachmittag Euch und danke
Biber
