[VBA] Hoe variablen opvragen uit een andere sub?

[Hu9o]

Ik ben al een tijdje aan het kl*ten met VBA, maar het wil nog niet echt luken. Ik wil namelijk een variable (gemaakt in sub gebruiken in sub A. De opdracht om Sub B uit te voeren komt ook uit sub A. met welk commando kan ik dan weten wat de waarde van de variable is?

ik heb public sub B gebruik. maar dat is nog niet genoeg.

weet iemand het?

[Hu9o]

Kan niemand mij helpen?

[Crazy D]

Geduld...

Een variabele die gedimt is in Sub A kun je niet direct gebruiken in Sub B. Er zijn een aantal mogelijkheden, het mooiste vind ik om Sub B een parameter mee te geven.
Bv

code:

Sub A()
    Dim blah As String
    blah = "iets"
    Call B(blah)
End Sub
Sub B(param As String)
    ' doe iets met param
End Sub

[Stealthje]

Een andere optie is in je 'root' (kweet ff niet hoe ze dat noemen) neer te zetten:

Dim shared BLA()

dan kun je dit in iedere sub gebruiken, en zijn het dus algemene gegevens ...

[henkleerssen]

Je kunt ook gewoon bovenaan de module een public variabele declareren:

code:

Public blah as String

Sub A()
    blah = "iets"
    Call B(blah)
End Sub

Sub B(param As String)
    ' doe iets met param
End Sub

edit: foutje

[Hu9o]

Ok jongens, hardstikke bedankt.

Ik heb het opgelos met de Call B(waarde as Integer) optie.

[Gerco]

Even voor de volledigheid: Je kunt ook een waarde returnen uit B, alleen heet B dan geen Sub meer.

code:

Public Sub A()
  ' blablabla
  somevar=B()
  MsgBox somevar
End Sub

Public Function B() as Integer
  ' Doe iets
  B=10
End Function

[Korben]

Op vrijdag 14 september 2001 13:18 schreef Stealthje het volgende:
Een andere optie is in je 'root' (kweet ff niet hoe ze dat noemen) neer te zetten:

Dim shared BLA()

dan kun je dit in iedere sub gebruiken, en zijn het dus algemene gegevens ...

Zoiets noemen ze 'bij de declarations' (want het is een declaratie). En Dim Shared Bla() werkt wel, maar alleen voor die module. Als je em werkelijk overal in je geladen project(en) (!) wilt gebruiken, doe dan dit:

code:

Global Bla() As Integer ' integer, neem ik aan tenminste

En Public Sub zorgt ervoor dat je een sub vanaf overal kan aanroepen.

[Coltrui]

[foutje]

[Pc123]

Een variable gewoon Public maken.

Public x as ......

[johnwoo]

Als de beide functies in één module staan, kun je de variabele ook als Private declareren. Maar de ByRef-parameter methode is nog wel het mooist.