Mam następujący fragment kodu, którego potrzebuję, aby znaleźć plik z rozszerzeniem PNG i datą ostatniej modyfikacji, jestem w stanie znaleźć datę ostatniej modyfikacji, ale jeśli umieścisz sprawdzenie rozszerzenia nad plikiem, to błąd [Obiekt potrzebne 'recentFile' w linii [pewna liczba]]

SCENARIUSZ

For Each objFile in colFiles
    ' Finds the latest modified file in folder
    if (recentFile is nothing) then
        Set recentFile = objFile
        elseif (objFile.DateLastModified > recentFile.DateLastModified) then
            Set recentFile = objFile
    end if
Next

Wiem, że mogę sprawdzić rozszerzenie później, ale problem polega na tym, co jeśli jest plik, który jest najnowszy i nie jest PNG? podczas gdy istnieją pliki z rozszerzeniem PNG, ale nie najnowsze, jak w porównaniu z innymi plikami, więc po prostu muszę znaleźć PNG z datą ostatniej modyfikacji do najnowszej tylko dla plików PNG, proszę pomóc, jak mogę go wdrożyć?