Öffnen von Userform

Forumthread: Öffnen von Userform
4 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Öffnen von Userform

Öffnen von Userform

23.11.2006 17:42:13

Userform

Hallo zusammen,
ich habe eine Frage.
Ich öffne per Makro eine Userform.
eigendlich soll nur eine geöffnet werden , aber es werden alle in diesem Exeldokument vorhandene Userformen geöffnet. Kann mir da jemand helfen?
Anbei den Code.


Sub Maske()
If Sheets("Eingabe").Cells(3, 2).Value = "0" Then GoTo Ausgabe
Eingabe.Show
Eingabe.Bauvorhaben.Value = " "
Eingabe.Bauort.Value = " "
Ausgabe:
Userform1.Show
End Sub

Danke und Gruß

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Öffnen von Userform

23.11.2006 17:44:51

Userform
AW: Öffnen von Userform

23.11.2006 17:56:39

Userform
AW: Öffnen von Userform

23.11.2006 17:45:31

Userform
AW: Öffnen von Userform

23.11.2006 17:55:56

Userform

AW: Öffnen von Userform

23.11.2006 17:44:51

Userform

Hallo!
So geht's


Sub Maske()
If Sheets("Eingabe").Cells(3, 2).Value = "0" Then GoTo Ausgabe
Eingabe.Show
Eingabe.Bauvorhaben.Value = " "
Eingabe.Bauort.Value = " "
Exit Sub
Ausgabe:
Userform1.Show
End Sub

Gruss Rene

AW: Öffnen von Userform

23.11.2006 17:56:39

Userform

Danke es hat funktioniert
gruß Michael

AW: Öffnen von Userform

23.11.2006 17:45:31

Userform

Hi Michael,


Sub Maske()
If Sheets("Eingabe").Cells(3, 2).Value = 0 Then
Eingabe.Show
Eingabe.Bauvorhaben.Value = ""
Eingabe.Bauort.Value = ""
Else
Userform1.Show
end If
End Sub

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..

AW: Öffnen von Userform

23.11.2006 17:55:56

Userform

Danke es hat funktioniert
gruß
mihael