Datein Zählen und Messagebox bei 0
13.11.2022 20:07:55
Lapos
ich habe hier folgenden VBA-Code mit dem ich die Anzahl an Datein in einem Ordner ermittel.
Set oFSO = CreateObject("Scripting.FileSystemObject")
counter = oFSO.GetFolder("Y:\Lieferanten\" & ordner & "\PRICAT").Files.count
jetz möchte ich erreichen das wenn sich keine(0) Datein in dem Ordner befinden ein Messagebox erscheint. Sobald eine oder mehrere Datein im Odner sind braucht es keine Messagebox.Viele Grüße
Lapos
Anzeige