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

prüfen ob Datei offen

Forumthread: prüfen ob Datei offen

prüfen ob Datei offen
18.01.2019 20:11:24
walter
Guten Abend zusammen,
ich suche ein Makro, wenn ich in der Datei "Test.xlsm" bin,
soll das Makro:
call Nummerierung
durchgeführt werden, sonst nicht !
mfg
walter k
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: prüfen ob Datei offen
18.01.2019 20:13:17
Hajo_Zi
Hallo Walter,
Prüfen ob Datei schon offen
Private Sub Workbook_Open()
Dim BoOffen As Boolean
Dim WoDatei As Workbook
For Each WoDatei In Workbooks
If WoDatei.Name = "test.xls" Then
MsgBox "Datei ist schon geöffnet!"
BoOffen = True
Exit For
End If
Next
If BoOffen = False Then
MsgBox "Test wird automatisch geöffnet!"
Workbooks.Open Filename:="C:\Eigene Dateien\Test.xls"
End If
End Sub


Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
Die Beiträge werden auch ignoriert, es erfolgt keine Antwort.
Anzeige
AW: prüfen ob Datei offen
18.01.2019 20:14:28
Nepumuk
Hallo Walter,
frag doch einfach den Namen der Mappe ab: 
If ActiveWorkbook.Name = "Test.xlsm" Then
'Dein Code
End If

Gruß
Nepumuk
Danke Hajo und Nepumuk, klappt -))
18.01.2019 21:29:33
walter
Wenn Problem gelöst...
18.01.2019 21:49:59
Werner
Hallo Walter,
...dann bitte nicht den Haken setzen, so wird der Post als offen, also ungelöst, gekennzeichnet. Lies mal den Text der da steht.
Gruß Werner
Anzeige
;

Forumthreads zu verwandten Themen

Makro prüft ob Datei vorhanden ist.
Peter

Hallo!
Ich bin wirklich ratlos: in meinem Sheet wird eine spezielle Schriftart verwendet. Das Sheet wird leider nur dann leserlich angezeigt, wenn die Schriftart installiert ist. Deshalb soll ein Makro prüfen, ob die Datei "Grafikfonds.TTF im folgenden Ordner vorhanden ist C:\WINDOWS\Fonts\...
28.12.2008 01:46:00
Thread-ID: 1035513
3 Beiträge
Prüfen ob Datein funktioneren/aufgehen
Urmila

Hallo,
besteht die Möglichkeit den Inhalt eines Ordners im Excel aufzulisten und prüfen on die vorhandene Dateien auch aufgehen bzw funktioneiern (wie pdf, doc, xls, ppt etc.)
Ich hab zuletzt ein Code erhalten, womit ich Files vom Server downloaden kann, jedoch waren da einige Files, di...
29.06.2009 12:07:07
Thread-ID: 1083700
2 Beiträge
Prüfen ob Zelle vorhanden...
pervenches

Guten Tag
Diese Formel sollte überprüfen, ob die Zelle "Erfolg" mit Inhalt "2" vorhanden ist und falls ja den entsprechenden Wert ausgeben. Falls diese Zelle nicht vorhanden ist sollte Sie den Wert von "G1" ausgeben. Die Zelle ist nicht immer vorhanden, da es sich um eine Pivot-Tabelle han...
09.09.2009 09:02:19
Thread-ID: 1101377
5 Beiträge
Prüfen ob Datei vorhanden
Marcus

Hallo,
kann mir jemand sagen, wie folgender Code aussehen muss:
Prüfen ob eine Datei, die ich als Bild in Excel mit VBA einfügen möchte, vorhanden ist.
If Dir(K:\Modelle Zeichnungen\Sal\Bilder TIF\...001.TIF) "" Then
Allerdings steht die Pfadangabe in der Zelle H2, da es verschi...
15.10.2009 07:05:26
Thread-ID: 1109751
2 Beiträge
Anzeige
Prüfen ob Schaltfläche vorhanden
walli

Guten Tag,
ALLEN ein frohes Weihnachtsfest !
Ich habe mal gestöbert und dies gefunden.
Ich möchte nur prüfen ob ein Schaltfläche mit der Nummer 10 vorhanden ist, das klappt so nicht.
Dim shShape As Shape
For Each shShape In Worksheets("Test").Shapes
If shShape.Name = "Sc...
25.12.2009 15:52:15
Thread-ID: 1125912
7 Beiträge
Anzeige
Prüfen ob Tabellen vorhanden
Kurt

Guten Morgen,
wünsche allen ein gesundes neues Jahr !
Danke für die bisherige Unterstützung !
Frage:
Ich habe eine Datei mit Tabellen die mit Monatsnamen hinterlegt
sind. (MMM)
Ich möchte prüfen ob ein Monat fehlt.
mfg Kurt P
05.01.2010 09:31:14
Thread-ID: 1127179
7 Beiträge
Anzeige
ControlPopup prüfen ob 2 mal vorhanden
marco

Hallo Kollegen,
Habe momentan ein problem mit der abfrage ob das popup vorhanden ist. Obwohl in der Menueleiste das Popup mit dem Namen "PT-Tool" vorhanden ist.
Popup wird ertellt.
Public Sub prcCreateButton() Dim myCommandBar As CommandBar Dim myCommandBarPopup As CommandBarContro...
28.01.2010 17:44:30
Thread-ID: 1133863
3 Beiträge
Anzeige
prüfen ob versch. Ziffern in Zellen vorhanden sind
Heinz

Hallo Excellenten,
viele Grüße an Alle an an diesem (im Süden) sonnigen Tag.
Mein Problem: Ich habe eine Spalte mit folgenden Zellen:
A1: 1;0000000 9; 10;000 14;00000000 23;0 25;0 27; 28; 29;0
A2: 00000000 9;00000000000000 24; 25;00000
A3: 00 3;0000000000000000 27;000
A...
08.04.2010 21:26:15
Thread-ID: 1150683
4 Beiträge
Überprüfen ob Tabellenblatt vorhanden ist
Ingo

Hallo zusammen,
hab folgendes Problem. Ich öffne nacheinander verschiedene Dateien um bestimmte Zellen auszulesen.
Wenn in der geöffneten Datei das Tabellenblatt mit dem Namen "Motor" nicht vorhanden ist sollen die nachfolgenden Schritte nicht bearbeitet werden. Irgendwie klappt das bei...
20.04.2010 11:44:29
Thread-ID: 1152802
3 Beiträge
Wie Prüfen ob Worksheet vorhanden
Holger

Hallo,
folgendes Problem.
Ich öffne aus einer Excel Datei eine andere Excel Datei. Hier muss ich prüfen,
ob es zwei WorkSheets gibt.
01 SH1 TH1
02 SH1 TH2
Wenn es einen von beiden nicht gibt, soll eine Fehlermeldung erscheinen.
Ich habe das hier mal programmiert aber...
28.06.2010 14:48:02
Thread-ID: 1164340
4 Beiträge
Prüfen, ob Datei exisitert xls2000 - xls2010
Peter

Guten Abend
Ich suche nach einem Code, mit dem ich sowohl in Excel 2000 als auch in Excel 2010 überprüfen kann, ob eine bestimmte Datei existiert.
kann mir jemand weiterhelfen, angenommen, die Variable FullName ist mit dem vollständigen Pfad + Dateinamen und ".xls" belegt.
Vielen Da...
13.09.2010 18:17:03
Thread-ID: 1177338
3 Beiträge
Prüfen ob Datei offen (ein- oder ausgeblendet) ist
Peter

Hallo miteinander
Ich habe einer StringVariable strPfadDatei den vollständigen Pfad und ein Dateiname zugewiesen,
z.B. "C:\Muster\Dokumente\Test33.xls"
Nun überprüfe ich, ob die Datei vorhanden ist, wenn nicht, erzeugt das Aufrufen von "NotFound" eine Mitteilung und beendet das Prog...
18.11.2010 18:56:14
Thread-ID: 1187650
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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