Makroergebnis in Zelle anzeigen
21.06.2021 11:22:31
Andreas
brauche bitte eure Hilfe, um folgenden Code zu ergänzen:
Sub Dateianzahl()
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
MsgBox fso.GetFolder("X:\Vertrieb").Files.Count
Set fso = Nothing
End Sub
Die Angabe darüber würde ich gerne im Tabellenblatt "DB" in der Zelle "R6" wiedergeben.
Bekomme das nur mit einer Schaltfläche hin und das schaut nicht so schön aus,
bin mir sicher irgendwie kann ich das auch direkt in der Zelle wiedergeben?
Danke vorab
Gruß Andreas
: