Supportnet / Forum / Datenbanken

Hallo an @lle, in einem Formular möchte ich eine Variable hochzählen bzw einen Wert zuweisen wenn ich einen Button drücke. Wie kann ich dies realisieren. mfg andi DANKE im vorraus

Ganz einfach:

in einem Modul eine Public-Anweisung eintragen, um Deine Variable öffentlich zu deklarieren, d.h. allen Prozeduren in allen Modulen aller Anwendungen zur Verfügung zu stellen.

Public DeineVariable As Integer ' Öffentliche Integer-Variable

Dann schreibst Du eine Prozedur beim Klick auf den Button:

Option Compare Database
Option Explicit

Private Sub DeinButton_Click()
On Error GoTo Err_DeinButton_Click

DeineVariable = 1250

Exit_DeinButton_Click:
    Exit Sub

Err_DeinButton_Click:
    MsgBox Err.Description
    Resume Exit_DeinButton_Click
    
End Sub

Jetzt kannst Du diese Zahl überall benutzen, die ist immer 1250, bis Du sie irgendwo änderst.

Gruß marie

Danke :-)
funktoniert soweit! :-) aber würde meine Variable gern anzeigen einfach zu Kontrolle aber im ungebunden Feld mit "=DeineVariable" funktioniert das nicht so wie ich will :-)
vielleicht kannst du mir weiterhelfen.

glg andi

Option Compare Database
Option Explicit

Private Sub DeinButton_Click()

Dim DeineVariable As Integer
On Error GoTo Err_DeinButton_Click

DeineVariable = 1250
Me.DeinTextfeld = DeineVariable

Exit_DeinButton_Click:
    Exit Sub

Err_DeinButton_Click:
    MsgBox Err.Description
    Resume Exit_DeinButton_Click
End Sub

Gruß Marie

• excel tabelle/spalte umformatieren