Yeahhhh!!! Problema risolto =)
Mi è bastato aggiungere l'estensione del file da eliminare (pensavo fosse sottointeso ma giustamente non è così )

Per la cronaca:
' Elimino il file originale, che non serve più
FName = Sheets("Foglio1").Range("C1").Text & "_" & Sheets("Foglio1").Range("H4").Text & ".xls"
Kill FPath & "\" & FName