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, 7608 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 ..
Ähnliche Inhalte
Batch & Shell
gelöst Script zum Entpacken von rar und zip-Dateien (9)

Frage von windows-nutzer zum Thema Batch & Shell ...

Windows XP
gelöst WordPad zeigt beim Öffnen keine RTF-Dateien mehr an (2)

Frage von Sinzal zum Thema Windows XP ...

Windows 8
gelöst Windows 8.1 findet keine Updates (7)

Frage von bytetix zum Thema Windows 8 ...

Microsoft Office
OneNote findet keine Texte, denen direkt eine Ziffer vorangestellt ist? (1)

Frage von drobskind zum Thema Microsoft Office ...

Neue Wissensbeiträge
Heiß diskutierte Inhalte
Viren und Trojaner
Ransomware .nm4 (15)

Frage von Zyklo92 zum Thema Viren und Trojaner ...

iOS
16 iPads zentrall verwalten (14)

Frage von simonlohr zum Thema iOS ...

Microsoft Office
+1.000 Ordner in Outlook: Wie besser? (11)

Frage von Matsushita zum Thema Microsoft Office ...