Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
452to456
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
452to456
452to456
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mit VBA kontrollieren ob Ordner vorhanden

Mit VBA kontrollieren ob Ordner vorhanden
09.07.2004 09:15:22
der
Hallo.
Mein Programm soll beim ausführen kontrollieren, ob es 3 Unterordner mit bestimmten Namen gibt, da das makro sonst nicht fehlerfrei ausgeführt werden kann. Wie kann ich das machen?
Gruß&Dank
der alex

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mit VBA kontrollieren ob Ordner vorhanden
Nike
Hi,
ein Ansatz:

Sub test()
If Dir("C:\TEST\") <> "" Then
MsgBox "Verzeichnis is da"
Else
MsgBox "Verzeichnis is nicht da"
End If
End Sub

Bye
Nike
AW: Mit VBA kontrollieren ob Ordner vorhanden
09.07.2004 09:22:27
Matthias
Hallo Alex,
If Dir("C:\programme",vbDirectory)"" Then
MsgBox "Vorhanden!"
End If
Gruß Matthias
AW: Mit VBA kontrollieren ob Ordner vorhanden
Giuseppe
Hallo Alex,
vielleicht so:

Sub Ordner()
If Dir("C:\Test", vbDirectory) = "" Then
MkDir ("C:\Test")
End If
If Dir("C:\Test\1", vbDirectory) = "" Then
MkDir ("C:\Test\1")
End If
If Dir("C:\Test\2", vbDirectory) = "" Then
MkDir ("C:\Test\2")
End If
If Dir("C:\Test\3", vbDirectory) = "" Then
MkDir ("C:\Test\3")
End If
End Sub

das Makro kontrolliert ob der Ordner Test mit Unterordner "1" "2" "3" gibt.
Wenn nicht werden generiert.
Gruß Giuseppe
Anzeige

12 Forumthreads zu ähnlichen Themen

perVBA prüfen, ob Internetadresse vorhanden
Rüdiger

Liebe Fachleute für InternetExplorer aus Excel-VBA heraus!
ich habe Excelsheet mit Adressen u.a. auch URLs (und Mailadr.)
ich möchte prüfen, ob die in meiner Liste (eine Spalte) erfassten URLs seit der letzten Mailingsaktion vor einem Jahr noch erreichbar sind:
(In einem weiteren Sc...
19.10.2009 13:06:55
Thread-ID: 1110593
6 Beiträge
Anzeige
VBA - Prüfen ob Schaltfläche vorhanden
WalterK

Hallo,
ich möchte prüfen, ob die Formularschaltfläche "WAHR" bereits vorhanden ist und dementsprechend eine MsgBox ausgeben. Irgendetwas klappt nicht, weiß aber nicht wo der Fehler ist. Option Explicit Sub Testmodul() Dim shShape As Shape With ActiveSheet If shShape.Name = "WAHR" Then MsgBo...
11.03.2012 15:44:26
Thread-ID: 1254585
8 Beiträge
Prüfen ob UNC-Ordner vorhanden ist
Andreas

Hallo liebe Forumsnutzer,
ich prüfe mittels folgendem Makro, ob ein bestimmtes Verzeichnis auf der lokalen Festplatte vorhanden ist. Das zu prüfende Verzeichnis steht in Zelle A1.
pfad = Worksheets("Tabelle1").Cells(1, 1)
If Dir(pfad, vbDirectory) "" Then MsgBox "In A1 angegebener...
09.03.2014 15:51:54
Thread-ID: 1352770
2 Beiträge
Anzeige
Überprüfen, ob Ordner existiert
Jürgen

Hallo,
meine Prozedur setzt einen existierenden Ordner voraus. Das wird durch eine Funktion überprüft. pre> Function OrdnerVorhanden(ByVal strPfad As String) As Boolean On Error GoTo Fehler OrdnerVorhanden = True ChDir (strPfad) On Error GoTo 0 Exit Function Fehler: OrdnerVorhanden = Fa...
29.12.2015 20:19:26
Thread-ID: 1466354
3 Beiträge
VBA Tabellen erstellen und überprüfen ob vorhanden
Donald

Servus!
Nach anfänglichem Haareraufen komme ich nun zu euch, da das sicher ein Kinderspiel für euch ist. Folgende beiden Codes habe ich (teils glaube ich sogar hier aus dem Forum von Hajo_Zi anno 2012):
Sub NewSheets() For I = 1 To 12 Dim wsNew As Worksheet Set wsNew = Worksheets.Add Wi...
07.09.2016 12:56:27
Thread-ID: 1513332
5 Beiträge
"Prüfen ob Ordner vorhanden" geht nicht
Ronald

Grüßt Euch
Ich möchte gerne einen Ordner erstellen und da es diesen manchmal nicht erstellt hat, wollte ich
eine Art Überprüfung am Ende meines Ablaufs machen, sodaß es auch genug Zeit hat, den Ordner
wirkklich zu erstellen. Nur ist es so, daß ich beim Debuggen sehe, daß er meint, d...
15.05.2020 13:01:24
Thread-ID: 1759450
3 Beiträge
Prüfen ob Ordner existiert
Jonathan

Hallo,
ich weiß es existieren zahlreiche Themen bez. der Ordner Prüfung.
Die meisten sind allerdings für mich nicht so recht nachvollziebar.
Ich dachte se sollte ganz einfach möglich sein, einen Ordner auf existens zuu prüfen, ggf. anzulegen, aber folgende Möglichkeit funktioniert n...
14.12.2020 12:13:55
Thread-ID: 1799528
5 Beiträge
VBA Prüfen ob Datei in Ordner
Fritz_W
Hallo Forumsbesucher,
benötige wieder einmal die Hilfe der VBA-Kundigen wie folgt.
Ich möchte erreichen, dass wenn in der Zelle die Datei mit exakt der Dateibezeichnung aus G1 der Tabelle1 sich im in G2 (Tabelle1) enthaltenen Ordner, ein Makro ausgeführt wird.
Für eure Hilfe besten Dank...
08.07.2021 17:25:40
Thread-ID: 1838355
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
3
7
1
3
2
4
2
4
6
17
8