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

Ordner suchen nach Namensbestandteil

Ordner suchen nach Namensbestandteil
03.04.2005 08:19:16
Ingo Harder
Hallo,
in einem Verz. (feststehender Pfad) sind etliche Unterordner (in einer
Ebene) enthalten, die alle mit
dem jeweiligen Usernamen beginnen (8stellig) plus weiterer individueller
Angaben.
Den jeweils angemeldeten User bekomme ich per VBA ausgelesen.
Wie kann ich das Verz. nach dem Unterordner durchsuchen,
dessen Bezeichnung mit dem Namen des angemeldeten User beginnt
und diesen Ordner dann öffnen lassen ?
Danke
Ingo

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

Betreff
Datum
Anwender
Anzeige
AW: Ordner suchen nach Namensbestandteil
03.04.2005 09:12:31
Oberschlumpf
Hi Ingo
In einem Verzeichnis sind 3 Unterverzeichnisse gespeichert:
Userbild

(mein Username ist GobiUser)
Mit diesem Makro...


Sub DirOpen()
    Dim lstrVerz As String
    
    lstrVerz = Dir("DEIN FESTES VERZEICHNIS\*" & Environ("username") & "*", vbDirectory)
    
        If lstrVerz <> "" Then
            ChDrive (Left("DEIN FESTES VERZEICHNIS\", 3))
            ChDir ("DEIN FESTES VERZEICHNIS\" & lstrVerz)
            Open "Bsp-Datei.txt" For Append As #1
            Close
        End If
            
End Sub

...suche ich in DEM Verzeichnis, in dem die 3 Unterverzeichnisse gespeichert sind, nach DEM Verzeichnis, welches meinen Usernamen als Textteil enthält (hier GobiUser-xls).
Wenn gefunden, wird mit ChDrive und ChDir in dieses Verzeichnis gewechselt, und es wird eine Bsp-TXT-Datei erstellt.
Wichtig!
Im VBA-Code musst Du für "DEIN FESTES VERZEICHNIS" eben auch genau den Pfad für das von Dir bekannte Verzeichnis eintragen. Der Backslash ("\") darf nicht gelöscht werden.
Konnte ich denn helfen?
Ciao
Thorsten
Anzeige
AW: Ordner suchen nach Namensbestandteil
04.04.2005 14:49:07
Ingo Harder
Hallo Thorsten,
dass war eine klasse Antwort ;-)
Damit konnte ich nun gezielt das Verz. des angemeldeten
User deklarieren und als Parameter für einen call shell
an den Explorer übergeben - perfekt.
Vielen Dank !
Gruß, Ingo

35 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige