Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
172to176
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
172to176
172to176
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Festplatte auf Treeview abgebildet

Festplatte auf Treeview abgebildet
23.10.2002 07:47:12
Chris

Hallo Miteinander

Hat jemand eine Excel Anweisung, bei der auf einem Treeview der Festplatten-Inhalt abgebildet wird? (Laufwerke und Ordner...)


Gruss Chris

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Festplatte auf Treeview abgebildet
23.10.2002 08:54:02
Markus
Hi Chris,

schau mal in die Excel VB Hilfe unter "Dir", da findest Du u.a. folgenden Beispielcode 8allerdings für Excel 2000), ich hoffe, das hilft:

' Namen in C:\ anzeigen, die Verzeichnisse darstellen.
Pfad1 = "c:\" ' Pfad setzen.
Name1 = Dir(Pfad1, vbDirectory) ' Ersten Eintrag abrufen.
Do While Name1 <> "" ' Schleife beginnen.
' Aktuelles und übergeordnetes Verzeichnis ignorieren.
If Name1 <> "." And Name1 <> ".." Then
' Mit bit-weisem Vergleich sicherstellen, daß Name1 ein
' Verzeichnis ist.
If (GetAttr(Pfad1 & Name1) And vbDirectory) = vbDirectory Then
Debug.Print Name1 ' Eintrag nur anzeigen, wenn es sich
End If ' um ein Verzeichnis handelt.
End If
Name1 = Dir ' Nächsten Eintrag abrufen.
Loop

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige