Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 17:45:21
Shellkommando ausführen, stderr auslesen
18.04.2024 17:41:41
Summe: Bestimmter Bereich mit sverweis
18.04.2024 16:33:24
Worksheets variable
18.04.2024 15:53:31
In Outlook (Exchange) Serientermin erstellen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
232to236
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
232to236
232to236
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Active.UserForm?

Active.UserForm?
18.03.2003 11:39:01
Bernhard
Hi,
gibt es einen äquivalenten Befehl zu z.B. "Active.Sheet", der "Active.Userform" o.ä. heißt?

Ich möchte in einer Sub-Routine die aktive Userform "bearbeiten", und diese daher als Objekt übergeben.

Danke,
Bernhard

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: me
18.03.2003 11:43:26
Nike

Hi,
dafür kannst du me nehmen.
z.B.
me.close

Bye

Nike

Re: Active.UserForm?
18.03.2003 12:04:07
Thomas Risi

So einen Befehl gibt es nicht. Man könnte hierzu ein Objekt mit projektweiter Gültigkeit anlegen, und bei jedem Start einer UF die Objektvariable neu setzen.

Beispiel ...

Code für Modul:


Option Explicit

Public ActiveUF As Object

Sub GetActiveUF()
    MsgBox ActiveUF.Caption
End Sub


Code für UF-Klasse:


Option Explicit

Private Sub CommandButton1_Click()
    GetActiveUF
End Sub

Private Sub UserForm_Activate()
    Set ActiveUF = Me
End Sub


     Code eingefügt mit Syntaxhighlighter 2.0


Gruß
Thomas

Risi Thomas Softwareentwicklung



Anzeige
Re: me - tut so nicht
18.03.2003 12:04:53
Bernhard

Hi,

Dim objUserForm As Object

objUserForm = Me

tut so nicht...
Wo liegt mein gedanklicher Fehler?

Gruss,
Bernhard

Re: me - tut so nicht
18.03.2003 12:08:46
Thomas Raschen

So was wie me.hide sollte aber funzen.

mein Fehler!
18.03.2003 12:09:36
Bernhard

Man sollte zuerst zuende denken...

Habe die Set-Anweisung vergessen ;-)


gleich noch eine Frage dazu
18.03.2003 12:13:48
Bernhard

Hi,

ist es möglich, alle TextBoxen auf einmal anzusprechen, d.h. nicht explizit mit Namen zu benennen?
Ich habe verschiedene UserFormen mit unterschiedlicher Anzahl und Namen der Textboxen, die ich auf einmal löschen (Inhalt) will.

Danke,
Bernhard

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige