Comment traiter les espaces dans le nom du fichier

Bonjour,

Je veux ouvrir un fichier EXCEL en tapant un bouton, donc j'ai utilisé des codes comme:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Private Sub Commande32_Click() On Error GoTo Err_Commande32_Click   Dim stAppName As String   stAppName = "C:\Program Files\Microsoft Office\OFFICE11\Excel.exe D:\Liste des amis.xls" Call Shell(stAppName, 1)   Exit_Commande32_Click: Exit Sub   Err_Commande32_Click: MsgBox Err.Description Resume Exit_Commande32_Click   End Sub

---

Mais comme il y a des espaces dans le nom du fichier, "Liste des amis.xls", il peut pas trouver ce fichier, donc je sais pas comme réussir sans renomer le fichier.

Merci d'avance pour votre aide

Bonjour,

Citation:

---

Envoyé par maban

Code:

---

1 2	stAppName = "C:\Program Files\Microsoft Office\OFFICE11\Excel.exe D:\Liste des amis.xls" Call Shell(stAppName, 1)

---

Mais comme il y a des espaces dans le nom du fichier, "Liste des amis.xls", il peut pas trouver ce fichier, donc je sais pas comme réussir sans renomer le fichier.

---

Access n'a pas besoin que tu renommes ton fichier puisque tu as mis à juste titre des guillemets pour le chemin.(Program Files\Microsoft Office = espace pour chacun et pas question de changer le nom..)
Par contre la chronologie de la syntaxe est à revoir. Il faut essayer :

Code:

---

1 2 3

Dim stAppName As String stAppName = "Excel.exe " & Chr(34) & "C:\Program Files\Microsoft Office\OFFICE11\Liste des amis.xls" & Chr(34) Call Shell(stAppName, 1)

---

Cordialement.

Ps : Ton fichier "Liste des amis.xls" est bien dans OFFICE11? Si c'est le cas il y a urgence a créer un dossier a un autre endroit. On peut "en mettre un peu partout" sauf à certains dont OFFICE11.