8
0

Anlage des Repos

This commit is contained in:
2024-01-24 16:42:38 +01:00
commit 38d6a271c4
1785 changed files with 3051496 additions and 0 deletions

View File

@@ -0,0 +1,8 @@
Set GetRecentFile = Nothing
For Each objFile In objFolder.Files
If GetRecentFile is Nothing then
Set GetRecentFile = objFile
ElseIf objFile.DateLastModified > GetRecentFile.DateLastModified then
Set GetRecentFile = objFile
End If
Next