Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 18:57:33
17.04.2024 16:56:58
Anzeige
Archiv - Navigation
756to760
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
756to760
756to760
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

In Word prüfen, ob eine bestimmte Excel-Datei geöf

In Word prüfen, ob eine bestimmte Excel-Datei geöf
26.04.2006 10:31:31
uttenhofen
Hallo!
Ich weiss, dass ich hier eigentlich falsch bin, aber ich bin echt am verzweifeln!
Ich brauche einen VBA-Code in Word, der folgendes macht:
Word soll prüfen, ob die Excel-Datei (MeineDatei.xls) gerade geöffnet ist!
Falls ja, soll Makro1 ausgeführt werden sonst bitte Makro2 ausführen!
Danke für eure Hilfe!
mfg
uttenhofen

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

Betreff
Datum
Anwender
Anzeige
AW: In Word prüfen, ob eine bestimmte Excel-Datei geöf
26.04.2006 11:11:36
IngGi
Hallo uttenhofen,
so könnte man das z.B. lösen:

Sub Datei_pruefen()
Dim xlApp As Object
Dim wb As Object
Dim DatOffen As Boolean
On Error GoTo Fehler
DatOffen = False
Set xlApp = GetObject(, "Excel.Application")
For Each wb In xlApp.Workbooks
If wb.FullName = "C:\Temp\MeineDatei.xls" Then DatOffen = True
Next 'wb
If DatOffen = True Then
Call Makro1
Else
Call Makro2
End If
Exit Sub
Fehler:
If Err.Number = 429 Then
Call Makro2
Exit Sub
Else
MsgBox "Fehler" & Err.Number & ", " & Err.Description
Exit Sub
End If
End Sub
Gruß Ingolf
Anzeige
AW: In Word prüfen, ob eine bestimmte Excel-Datei geöf
26.04.2006 13:31:34
uttenhofen
Danke!
Hat super funktioniert! Bin echt begeistert!
Gruss
uttenhofen

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige