Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Exel Befehl Filesearch findet keine zip dateien

Frage Entwicklung

Mitglied: Gerry

Gerry (Level 1) - Jetzt verbinden

26.02.2005, aktualisiert 01.03.2005, 7578 Aufrufe, 6 Kommentare

Set fs = Application.FileSearch
With fs
.LookIn = "C:\testordner"
.Filename = "*.*"
.SearchSubFolders = True
If .Execute > 0 Then
' MsgBox "There were " & .FoundFiles.Count & _
" file(s) found."
For i = 1 To .FoundFiles.Count
' MsgBox .FoundFiles(i)
x = fs.FoundFiles(i)

Worksheets("tabelle3").Range("b" & i).Value = x

Next i
Else
'MsgBox "There were no files found."

End If

Wie kann ich es so schreiben das es zip endungen findet.
Anderes findet es
Einer einen Tip
Gruss Gerry
Mitglied: Trbun
26.02.2005 um 20:33 Uhr
.Filename = "*.zip"

das sollte die Lösung sein.
Bitte warten ..
Mitglied: Gerry
26.02.2005 um 23:03 Uhr
Nein das geht nicht habs probiert ich bin nicht der einzige mit diesem fehler.
Bitte warten ..
Mitglied: gemini
27.02.2005 um 00:07 Uhr
Evtl. hilft dir das.
Sieh dir mal den Beitrag von Ron de Bruin an
http://www.excelforum.com/archive/index.php/t-252336.html
Bitte warten ..
Mitglied: Gerry
27.02.2005 um 13:05 Uhr
Was du geschrieben hast funktioniert zwar, aber ich brauche die Suche leider über Netzwerk.
und der Verwendete dir Befehl geht leider nicht über Netzwerkpfade.
Sonst noch einen Ide.
Bitte warten ..
Mitglied: gemini
27.02.2005 um 13:31 Uhr
Aus der Excel-Hilfe:

Sub ShowFolderList(folderspec)
Dim fs, f, f1, s, sf
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFolder(folderspec)
    Set sf = f.SubFolders
    For Each f1 in sf
        If Right(zip, 3) Then
            s = s & f1.name & vbCrLf
        End If
    Next
MsgBox s
End Sub
Bitte warten ..
Mitglied: Gerry
01.03.2005 um 19:26 Uhr
Super gemini hatt funktioniert danke
Bitte warten ..
Heiß diskutierte Inhalte
Windows 7
gelöst BOOTMGR is missing (auch nach bootrec -RebuildBcd) (20)

Frage von Mipronimo zum Thema Windows 7 ...

Router & Routing
Tipps für Router (ca. 100 clients, VPN) (19)

Frage von oel-auge zum Thema Router & Routing ...

TK-Netze & Geräte
gelöst Convert von TAPI auf CAPI gesucht (13)

Frage von StefanKittel zum Thema TK-Netze & Geräte ...