Re : Renommer un répertoire avec InputBox
Ce code fonctionne,si un dossier nommer repet ce trouve sur C, adapte le chemin.
Private Sub CommandButton1_Click()
Dim Targetdir As String
Targetdir = InputBox("Donnez le nom de votre nouveau répertoire")
Name "c:\repet" As "c:\" & Targetdir
End Sub
@+ Yves