VBA Erreur 53 fichier introuvable

Qui pourrait m’aider à identifier mon erreur!

code

Private Sub Supprimer_Fichier()

Dim FichierAsupp As String, sPath As String

''''''''''Répertoire ou les fichiers sont stockés

sPath = "C:\Users\claud\Temp"

''''''''''Le numéro du fichier est inscrit dans la cellule "V6"

FichierAsupp = Feuil1.Cells(6, 22).Value

''''''''''Le numéro est unique pour chaque fichier et tout ce qui vient après est remplacé par un astérisque
''''''''''Quand je roule la macro, il me renvoie un erreur 53 fichier introuvable

Kill (sPath & "\FichierAsupp *.*")

''''''''''Pourtant quand j'inscris ("C:\Users\claud\Temp\F-10034*") cela fonctionne

'Kill ("C:\Users\claud\Temp\F-10034*") celle-ci fonctionne, mais pour mes besoins, je voudrais utiliser la cellule V6 au lieu d'inscrire manuellement le chemin.


End Sub

Merci