HERBERS Excel-Forum - das Archiv
Bewerten Sie hier bitte das Excel-Portal
übergabewert im speicher
Michael

Hallo!
Wie stelle ich es an, dass ich einen Wert berechne, der sloange im Speicher bleibt, bis ich im mitteile, dass er aus dem Speicher gelöscht wird.
Danke Michael
  • 
Function var()
Dim a As Integer
'Static a As Integer
a = a + 1
End 

    
Function  ' Nach Beendigung der 

    
Function ist es nicht mehr im Programm present

    
Sub mal()
b = var + 1 ' dachte der Wert a wird übergeben!!!
Debug.Print b
End Sub

    • AW: übergabewert im speicher
    IngGi

    Hallo Michael,
    deklariere die Variable global, d.h. mit dem Schlüsselwort Public an Stelle von Dim, in einem allgemeinen Modul und zwar am Anfang des Moduls - vor dem ersten Sub bzw. Function.
    Gruß Ingolf
    AW: übergabewert im speicher
    Michael

    Danke!
    Wie bekomme ich jetzt den Wert aus dem Speicher!
    s. u.
    Gruß Michael
  • Public a As Integer
    Function var()
'Static a As Integer
a = a + 1
End 

    
Function  ' Nach Beendigung der 

    
Function ist es nicht mehr im Programm present

    
Sub mal()
b = a + 1 ' dachte der Wert a wird übergeben!!!
Debug.Print b
End Sub


    

    Sub schluss()
a = 0
End Sub

    • AW: übergabewert im speicher
    IngGi

    Hallo Michael,
    bei einer numerischen Variablen, indem du dieser den Wert 0 zuweist.
    Gruß Ingolf
    AW: übergabewert im speicher
    Michael

    danke!
    geschnallt!