Guten Tag Spezialisten
Ich habe Mühe mit der Syntax. Ich will die Datei XY nur dann öffnen, wenn sie nicht schon offen ist.
Sonst gibts ja bekanntlich eine Fehlermeldung.
Wie lautet da der Code?
Was nuss ich hinzufügen wenn diese Datei im Hintergrund geöffnet sein soll?

Vielen Dank für Eure Hilfe
Urs
If .............(is closed, is not open)...Then
Workbooks.Open Filename:="R:\Herrlich.xls"

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: im VB richtig fragen ob Datei XY schon offen

Nepumuk
AW: im VB richtig fragen ob Datei XY schon offen

Hajo_Zi

AW: im VB richtig fragen ob Datei XY schon offen

22.03.2004 15:13:07

Nepumuk

Hallo Urs,
so z.B.
Option Explicit Public Sub test() Dim myWorkbook As Workbook, bolgeoeffnet As Boolean For Each myWorkbook In Workbooks If myWorkbook.Name = "Herrlich.xls" Then bolgeoeffnet = True: Exit For Next If Not bolgeoeffnet Then GetObject "R:\Herrlich.xls" End Sub
Gruß
Nepumuk

AW: im VB richtig fragen ob Datei XY schon offen

22.03.2004 15:14:16

Hajo_Zi

Hallo urs


Sub Test()
Dim BoOffen As Boolean
For Each x In Workbooks
If x.Name = "Auftragsplanung Übersicht.XLS" Then
Workbooks("Auftragsplanung Übersicht.XLS").Save
BoOffen = True
Exit For
End If
Next
If BoOffen = False Then Workbooks.Open Filename:=StNetz & "Auftragsplanung Übersicht.XLS", Password:=StDatei
End Sub

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn zelle bestimmten textteil enthält, dann

34081
excel wenn zelle größer als andere zelle dann farbe

23512
excel alles links von zeichen ausgeben

16681

Weitere Forumthreads anzeigen

excel text vor zahl einfügen

16052

kann in excel nicht mehr scrollen

15741

excel formeln übertragen ohne änderung

15343

excel wenn zeichenfolge enthalten dann

14267

excel wenn dann wert aus anderer zelle

12306

excel text kürzen ab zeichen

11938

excel erstes zeichen abschneiden

11417

excel summe null angezeigt

10634

excel wenn in zelle bestimmter text dann andere zelle farbe

10521

excel zählenwenn oder funktion

9511

excel 2 zeichen von links abschneiden

9498

excel wenn zelle teil eines textes enthält

9480

wenn wert 0 dann zelle leer

9079

excel makro text in zelle schreiben

8864

excel zeichen zählen bis leerzeichen

8800

excel zählenwenn zeitraum

8428

zählenwenn doppelte werte ausschließen

8178

excel zelle übernehmen

8062

excel zelle ab zeichen auslesen

7989

excel text ab bestimmten zeichen

7915

excel größer als aber kleiner als

7806

excel makro letzte zeile ermitteln

7675

excel datum uhrzeit in einer zelle

7521

excel zeilen ein und ausblenden button

7291

min in stunden umrechnen excel

7167

excel zeilen dynamisch ausblenden

7070

mauszeiger fadenkreuz tastenkombination

7068

kw in monat umwandeln excel

6935

excel datum rot färben wenn älter als

6521

excel summe ohne bestimmte zellen

6515

excel zeilen untereinander statt nebeneinander

6294

excel makro zellen löschen

6182

wenn wert negativ dann 0

6026

excel wenn uhrzeit größer dann

6006

excel letzte 3 zeichen einer zelle auslesen

5981

excel wenn wert in einer spalte vorhanden dann

5920

excel text aus zelle auslesen und einfügen

5910

tastenkombination excel tabellenblatt wechseln

5872

excel nummeriert nicht fortlaufend

5838

wenn zellen leer dann

5829

datei durch mich selbst gesperrt

5734

excel letzten zeichen abschneiden

5705

excel @ zeichen

5689

summewenn mit sverweis

5676

excel wenn dann leer

5582

excel wort in zelle finden

5539

excel zeit plus minuten

5492

excel vba wert in spalte suchen und zelle ausgeben

5379

zählenwenn ist nicht leer

5341

excel summe aus mehreren spalten

5321

power query führende nullen entfernen

5224

excel zelle färben wenn wert in anderer tabelle

5182

msgbox vba yes no

5105

excel name aus email extrahieren

5082

wenn #nv dann 0

5082

excel vba farbe ändern

5053

excel wenn formatierung farbe dann

5053

excel text entfernen zahlen behalten

4974

excel zeile übernehmen wenn bedingung erfüllt

4903

summewenn nicht wert

4847

excel anführungszeichen in text einfügen

4841

excel string contains

4789

excel monate auf datum addieren

4769

excel summewenns datumsbereich

4754

access tabellen schützen

4727

excel text suchen von rechts

4710

excel vba if mit 2 bedingungen

4679

balkendiagramm mit linie

4659

datum wird in excel nicht erkannt

4654

excel bild einfügen in zelle

4588

excel e+11 entfernen

4564

excel 3 zeichen von links löschen

4556

excel text aus zelle in formel übernehmen

4516

excel text in zahl umwandeln vba

4508

vba string zeilenumbruch

4482

excel zählenwenns enthält text

4469

excel zeile durchsuchen und spalte ausgeben

4452

excel überprüfen

4430

excel makro anhalten

4411

aktuelles datum excel automatisch

4362

excel formel kopieren ohne anpassung

4360

auf 5 rappen runden excel

4357

aktuelle zeit excel

4332

userform.close

4327

durchschnitt prozent berechnen excel

4327

datum aus kalenderwoche

4324

excel wert in tabelle suchen und zeile ausgeben

4308

verketten datumsformat

4300

excel vba zelle auslesen und in anderes tabellenblatt kopieren

4285

excel datei gruppe

4260

excel teilergebnis funktioniert nicht

4229

excel funktionen

4199

excel vba neue zeile

4182

excel datenüberprüfung leere zellen ignorieren funktioniert nicht

4158

bereiche in excel sperren

4142

excel gestrichelte graue linie entfernen

4075

excel funktion aktuelles jahr

4025

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

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel wenn zelle bestimmten textteil enthält, dann

34081
excel wenn zelle größer als andere zelle dann farbe

23512
excel alles links von zeichen ausgeben

16681

Weitere Forumthreads anzeigen

excel text vor zahl einfügen

16052

kann in excel nicht mehr scrollen

15741

excel formeln übertragen ohne änderung

15343

excel wenn zeichenfolge enthalten dann

14267

excel wenn dann wert aus anderer zelle

12306

excel text kürzen ab zeichen

11938

excel erstes zeichen abschneiden

11417

excel summe null angezeigt

10634

excel wenn in zelle bestimmter text dann andere zelle farbe

10521

excel zählenwenn oder funktion

9511

excel 2 zeichen von links abschneiden

9498

excel wenn zelle teil eines textes enthält

9480

wenn wert 0 dann zelle leer

9079

excel makro text in zelle schreiben

8864

excel zeichen zählen bis leerzeichen

8800

excel zählenwenn zeitraum

8428

zählenwenn doppelte werte ausschließen

8178

excel zelle übernehmen

8062

excel zelle ab zeichen auslesen

7989

excel text ab bestimmten zeichen

7915

excel größer als aber kleiner als

7806

excel makro letzte zeile ermitteln

7675

excel datum uhrzeit in einer zelle

7521

excel zeilen ein und ausblenden button

7291

min in stunden umrechnen excel

7167

excel zeilen dynamisch ausblenden

7070

mauszeiger fadenkreuz tastenkombination

7068

kw in monat umwandeln excel

6935

excel datum rot färben wenn älter als

6521

excel summe ohne bestimmte zellen

6515

excel zeilen untereinander statt nebeneinander

6294

excel makro zellen löschen

6182

wenn wert negativ dann 0

6026

excel wenn uhrzeit größer dann

6006

excel letzte 3 zeichen einer zelle auslesen

5981

excel wenn wert in einer spalte vorhanden dann

5920

excel text aus zelle auslesen und einfügen

5910

tastenkombination excel tabellenblatt wechseln

5872

excel nummeriert nicht fortlaufend

5838

wenn zellen leer dann

5829

datei durch mich selbst gesperrt

5734

excel letzten zeichen abschneiden

5705

excel @ zeichen

5689

summewenn mit sverweis

5676

excel wenn dann leer

5582

excel wort in zelle finden

5539

excel zeit plus minuten

5492

excel vba wert in spalte suchen und zelle ausgeben

5379

zählenwenn ist nicht leer

5341

excel summe aus mehreren spalten

5321

power query führende nullen entfernen

5224

excel zelle färben wenn wert in anderer tabelle

5182

msgbox vba yes no

5105

excel name aus email extrahieren

5082

wenn #nv dann 0

5082

excel vba farbe ändern

5053

excel wenn formatierung farbe dann

5053

excel text entfernen zahlen behalten

4974

excel zeile übernehmen wenn bedingung erfüllt

4903

summewenn nicht wert

4847

excel anführungszeichen in text einfügen

4841

excel string contains

4789

excel monate auf datum addieren

4769

excel summewenns datumsbereich

4754

access tabellen schützen

4727

excel text suchen von rechts

4710

excel vba if mit 2 bedingungen

4679

balkendiagramm mit linie

4659

datum wird in excel nicht erkannt

4654

excel bild einfügen in zelle

4588

excel e+11 entfernen

4564

excel 3 zeichen von links löschen

4556

excel text aus zelle in formel übernehmen

4516

excel text in zahl umwandeln vba

4508

vba string zeilenumbruch

4482

excel zählenwenns enthält text

4469

excel zeile durchsuchen und spalte ausgeben

4452

excel überprüfen

4430

excel makro anhalten

4411

aktuelles datum excel automatisch

4362

excel formel kopieren ohne anpassung

4360

auf 5 rappen runden excel

4357

aktuelle zeit excel

4332

userform.close

4327

durchschnitt prozent berechnen excel

4327

datum aus kalenderwoche

4324

excel wert in tabelle suchen und zeile ausgeben

4308

verketten datumsformat

4300

excel vba zelle auslesen und in anderes tabellenblatt kopieren

4285

excel datei gruppe

4260

excel teilergebnis funktioniert nicht

4229

excel funktionen

4199

excel vba neue zeile

4182

excel datenüberprüfung leere zellen ignorieren funktioniert nicht

4158

bereiche in excel sperren

4142

excel gestrichelte graue linie entfernen

4075

excel funktion aktuelles jahr

4025

im VB richtig fragen ob Datei XY schon offen

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

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread