Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
592to596
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
592to596
592to596
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Abfragen ob Programm-Pfad vorhanden mittels VBA

Abfragen ob Programm-Pfad vorhanden mittels VBA
07.04.2005 15:02:47
rookie
Hallo zusammen,
ich habe ein bestehendes VBA-Makro, mit welchem ich auch mittels Shell-Befehl ein Programm öffne: Shell "C:\Programme\WS_FTP Pro\wsftppro.exe", vbNormalFocus
Nun haben wir bei einem neuen Mitarbeiter sämtliche Programme unter "c:\program files" liegen.
Gibtes da eine Möglichkeit abzufragen, ob "c:\program files" existiert, wenn ja "C:\program files\WS_FTP Pro\wsftppro.exe" zu starten, wenn nicht "C:\Programme\WS_FTP Pro\wsftppro.exe" zu starten?
Wenn das funktionieren würde, müsste ich nicht für diesen Mitarbeiter ein eigenes Makro schreiben und dieses dann auch bei Änderungen pflegen.
Vielen Dank für Eure Hilfe
gruss
rookie

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Abfragen ob Programm-Pfad vorhanden mittels VB
07.04.2005 15:17:13
Tobias
Servus!
Aus der Recherche von Nepumuk:

Public Sub Test()
If Ordner_vorhanden("D:\Program Files") Then
Shell "C:\Program Files\WS_FTP\wsftppro.exe"
End If
End Sub
Private Function Ordner_vorhanden(Ordner As String) As Boolean
Dim FSYObjekt As Object
Set FSYObjekt = CreateObject("Scripting.FileSystemObject")
Ordner_vorhanden = FSYObjekt.FolderExists(Ordner)
End Function

Gruss

Tobias
Anzeige

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige