Ich brauche dringend eure Hilfe.
Ich möchte per VBA alle Dateien ausdrucken lassen die sich im Odner D:/Test/ befinden die mit einem bestimmten Datum beginnen ... z.Bsp. 05.04.
Kann mir jemand dabei helfen?
Liebe Grüße
Sabbel
Option Explicit
Private Declare PtrSafe Function ShellExecuteA Lib "shell32.dll" ( _
ByVal hWnd As LongPtr, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As LongPtr
Private Const SW_HIDE As Long = 0
Public Sub Main()
Dim sFilename$, sPath$, sFileDateTime$, sSuchWert$
sPath = "D:\Test\"
sFilename = Dir$(sPath & "*.*")
sSuchWert = "05.11." '*
Servus