Di seguito il codice che verifica l’esistenza di un file!
1 2 3 4 5 6 7 8 9 10 11 12 13 |
Sub checkExistsFile() Dim filePath As String filePath = "C:\Users\..\Test.xlsx" If Dir(filePath) = vbNullString Then MsgBox "Il file non esiste" Else MsgBox "Il file esiste" End If End Sub |