Condition

Bonjour,

petite question,

dans ce code:

For Lig = 8 To 10

If Cells(Lig, 2).Value = "1_01_Room-Layout\" Then
FichierATester = [M2] + Cells(Lig, 4) + Cells(Lig, 8)

Set fs = CreateObject("Scripting.FileSystemObject")
Set F = fs.GetFile(FichierATester)


Cells(Lig, 10).Value = F.DateLastModified

End If
Next Lig

Je souhaite rajouter une condition, si dans la colonne 13 de la ligne il y a quelque chose dans la cellule afférant à la ligne alors ne rien faire et passe a la ligne suivante.

merci