Variablenwert erhalten
SteffenS
ich habe in einem Klassenmodul 2 Variablen gesetzt und möchte das der den ich diesen
geben auch nach Beendigung des Codes in der Klasse stehen bleibt.
Wie kann ich dies erreichen?
Hier mein Code:
'Klassenmodul
Public uftop As Long
Public ufleft As Long
Private Sub prot_info_Click()
'UF verändern
With pl_dat_send_show_error_d
.Height = 50
.Width = 200
'Position merken
uftop = .Top
ufleft = .Left
End With
End Sub
'Userform (UF)
Private Sub ufhide_Click()
'UF wieder anzeigen
ufhide.Visible = False
xschliessen.Visible = False
Me.Width = 545
Me.Height = 253
'Position setzen
Me.Top = uftop
Me.Left = ufleft
End Sub
Hintergrund:Ich habe in meiner UF Elemente die ich dynamisch erzeuge. Ein Klick auf das Element verändert die Position der UF. Nun möchte ich per Button die ursprüngliche Position wiederherstellen.
Danke Euch im Voraus.
MFG
Steffen Schmerler