Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
892to896
892to896
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

UserForm nur laden, wenn Datei manuell geöffnet

Forumthread: UserForm nur laden, wenn Datei manuell geöffnet

UserForm nur laden, wenn Datei manuell geöffnet
11.08.2007 23:11:11
Sascha
Hi,
ich hab eine Datei1 in die von einer anderen Datei2 aus Daten eingetragen werden. Dazu öffnet Datei2 im VBA-Code Datei1 und trägt die Daten ein. Wenn ich Datei1 selber öffne soll ein UserForm geladen werden, nicht aber, wenn Datei1 von Datei2 geladen wird. Geht das?
Vielen Dank,
sascha.

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: UserForm nur laden, wenn Datei manuell geöffnet
12.08.2007 11:24:00
Luschi
Hallo Sascha,
schreibe folgenden Code in "DieseArneitsmappe" von Datei_2.xls!!!: 

Private Sub Workbook_Open()
Dim ok As Boolean, wb As Workbook
ok = False
'alle geöffnen Arbeitsmappen durchlaufen und Name prüfen
For Each wb In Application.Workbooks
If wb.Name = "Datei_1.xls" Then
'wenn Name gefunden, dann Datei_1 geöffnet
ok = True
Exit For
End If
Next wb
Set wb = Nothing
If Not ok Then
'nur wenn Datei_1 nicht geöffnet, dann Userform anzeigen
'ok hat den Wert False
UserForm1.Show
End If
End Sub


Gruß von Luschi
aus klein-Paris

Anzeige
;

Beliebteste Forumthreads (12 Monate)

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