Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1096to1100
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Variablenwert erhalten

Variablenwert erhalten
SteffenS
Hallo Zusammen,
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

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Variablenwert erhalten
25.08.2009 21:30:07
Gerd
Hallo Steffen,
stelle die Variablendeklarationen in ein allgemeines Modul.
Schreibe die Werte der beiden Public-Variablen in Zellen u. lade diese im Workbook_Open u.
im Userform_Activate.
Gruß Gerd
habs anders gelöst
25.08.2009 21:32:30
SteffenS
mit:
'Position setzen Userform zentrieren
Me.Move Application.Width / 2 - Me.Width / 2, Application.Height / 2 - Me.Height / 2
Danke Dir
MFG
Steffen
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige