Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
696to700
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
696to700
696to700
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
UF nur öffnen wenn Zellen leer
17.11.2005 11:02:16
Maier
Hallo Götter!
Beim erstmaligen Öffnen meiner Arbeitsmappe startet eine Userform zur Eingabe von Daten mittels Textboxen.
Diese Daten werden beim Schließen der Userform in die z.B. Zellen "A1" und "A4" der Tabelle1 übernommen.
Was muss ich im Klassenmodul definieren, damit die Userform beim Öffnen der Arbeitsmappe nicht hochgefahren wird, wenn in den Zellen "A1" und "A4" der Tabelle1 Werte stehen.
Danke klaus

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: UF nur öffnen wenn Zellen leer
17.11.2005 11:17:52
Georg
Ich hoffe ich habe deine Frage richtig verstanden.
mach doch in deinem Aufruf eine "wenn/dann Abfrage" rein
...

Sub UserformAufmachen()
erstezelle = Range("A1").value
if erstezelle = "" then userform1.show
else
goto ende
end if
ende:
End Sub

So in der Art würde ich es probieren.
Gruß
Georg
AW: UF nur öffnen wenn Zellen leer
17.11.2005 12:31:05
Maier
Danke für den Tip, aber läuft nicht.
Fehler beim Kompilieren:
Else ohne If
wie krieg ich das weg?
Klaus
AW: UF nur öffnen wenn Zellen leer
21.11.2005 13:03:48
Holger
Hallo Klaus

Sub UserformAufmachen()
erstezelle = Range("A1").value
if erstezelle = "" then
userform1.show              diese Zeile einrücken wenn noch else verwendet wird.
else                        dann Funktioniert es auch.
goto ende
end if
ende:
End Sub

Gruss Holger
Anzeige
noch Offengelassen
21.11.2005 13:06:13
Holger
Gruss Holger

309 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige