Suppression dossier

salut à tous.

j'essaie de supprimer un dossier avec ce code:

Dim Name As String

Dim rep As String

Application.DisplayAlerts = False

rep = "C:\Users\kinny\Desktop\adherents eam\"

Name = TNom.Value & " " & TPrenom.Value

Name = rep & Name

On Error Resume Next

Kill Name

If Err <> 0 Then

MsgBox "Le dossier à été supprimer", vbOKOnly, "SUCCES"

mais il y a un soucis avec cette ligne

Name = TNom.Value & " " & TPrenom.Value

j'ai essayer de changer le nom des variables mais rien y fait.

une âme charitable pourrait elle m'aiguiller

merci

Bonjour,

si TNom est une cellule nommée,

essayez avec

Range("TNom").Value

Ca n'a pas l 'air de fonctionner.

je dois le placer ou exactement

Rechercher des sujets similaires à "suppression dossier"