このコードだと思います
For Each file in filecoll
Ext = UCase(Right(File.Path, 3))
If Ext = "JPG" OR Ext = "GIF" Then
on error resume next
JPGファイルのみを表示できますが、スクリプトがこれらも表示するようにPNGとGIFを追加する方法はありますか?
このコードだと思います
For Each file in filecoll
Ext = UCase(Right(File.Path, 3))
If Ext = "JPG" OR Ext = "GIF" Then
on error resume next
JPGファイルのみを表示できますが、スクリプトがこれらも表示するようにPNGとGIFを追加する方法はありますか?