Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Anzahlvon .htm dateien

Forumthread: Anzahlvon .htm dateien

Anzahlvon .htm dateien
30.04.2006 15:37:40
.htm
hallo,
ich möchte wissen,wie man die anzahl der .htm dateien in einen bestimmtem ordner erhält.
z.b.:
in meinem ordner C:\test\menge sind 20.htm seiten
ich möchte aber nicht nachsehen, sondern per code nachfragen und mir die antwort in einer msgbox anzeigen lassen.
kann mir da jemand helfen
vielen dank
gruss Bernd
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Anzahlvon .htm dateien
30.04.2006 15:53:50
.htm
Hallo Bernd,
das geht zum Beispiel so

Sub htmDateien()
Dim fso As Object
Dim fo As Object
Dim f As Object
Dim i As Integer
Set fso = CreateObject("Scripting.FileSystemObject")
Set fo = fso.GetFolder("C:\test\menge\")
For Each f In fo.Files
If Right(f.Name, 4) = ".htm" Then i = i + 1
Next 'f
MsgBox "Das Verzeichnis ""C:\test\menge\"" enthält " & i & " .htm-Dateien."
End Sub
Gruss Ingolf
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige