Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel pb espace dans nom repertoire

pb espace dans nom repertoire

4 réponses
Avatar
Pat
Bonjour,

Je souhaite lancer la commande dans le code VBA.

Shell "Excel C:\Nouveau dossier\EMORGA1.slk"

Le probleme est qu'il plante lorsqu il y a un espace entre
Nouveau et dossier ( fonctionne qd pas d 'espace ).
Il doit avoir une solution, vous la connaissez peut etre?
merci
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
John Fuss
utilisation du ~ ???

en passant par FSO (File System Object) tu peux demander avec un nom de
repertoire le nom 'raccourci' (shortPath dans FSO)

Je reste à ta disposition si tu ne connais pas.

John

"Pat" a écrit dans le message de
news:076201c3b8ae$c0ab2dd0$
Bonjour,

Je souhaite lancer la commande dans le code VBA.

Shell "Excel C:Nouveau dossierEMORGA1.slk"

Le probleme est qu'il plante lorsqu il y a un espace entre
Nouveau et dossier ( fonctionne qd pas d 'espace ).
Il doit avoir une solution, vous la connaissez peut etre?
merci


Avatar
Denis Michon
Bonjour Pat,

Et ceci : Et attention au chemin où se trouve l'application Excel....

'--------------------------------
Sub OuvrirFichierAvecEspaceDansNom1()

Dim OuvrirFichier As String, Fichier As String
OuvrirFichier = Chr(34) & "c:Fichier à ouvrir.xls" & Chr(34)
Fichier = "C:Program FilesMicrosoft OfficeOFFICE11" & OuvrirFichier
MyAppID = Shell(Fichier, 1)

End Sub
'--------------------------------


OU


'--------------------------------
Sub OuvrirFichierAvecEspaceDansNom2()
MyAppID = Shell("C:Program FilesMicrosoft OfficeOFFICE11EXCEL.EXE " & _
"""c:Fichier à ouvrir.xls""", 1)
End Sub
'--------------------------------


Salutations!




"Pat" a écrit dans le message de news:076201c3b8ae$c0ab2dd0$
Bonjour,

Je souhaite lancer la commande dans le code VBA.

Shell "Excel C:Nouveau dossierEMORGA1.slk"

Le probleme est qu'il plante lorsqu il y a un espace entre
Nouveau et dossier ( fonctionne qd pas d 'espace ).
Il doit avoir une solution, vous la connaissez peut etre?
merci
Avatar
Pat
Bonjour et merci pour la reponse
J'ai trouvé par la suite ce qui convenait à ma situation

Workbooks.Open Filename:=VCheminEntrant & VNom & ".slk"
Workbooks.Open Filename:=VCheminEntrant & VNomE & ".slk"
a+
-----Message d'origine-----
Bonjour Pat,

Et ceci : Et attention au chemin où se trouve
l'application Excel....


'--------------------------------
Sub OuvrirFichierAvecEspaceDansNom1()

Dim OuvrirFichier As String, Fichier As String
OuvrirFichier = Chr(34) & "c:Fichier à ouvrir.xls" & Chr
(34)

Fichier = "C:Program FilesMicrosoft OfficeOFFICE11" &
OuvrirFichier

MyAppID = Shell(Fichier, 1)

End Sub
'--------------------------------


OU


'--------------------------------
Sub OuvrirFichierAvecEspaceDansNom2()
MyAppID = Shell("C:Program FilesMicrosoft
OfficeOFFICE11EXCEL.EXE " & _

"""c:Fichier à ouvrir.xls""", 1)
End Sub
'--------------------------------


Salutations!




"Pat" a écrit dans
le message de news:076201c3b8ae$c0ab2dd0

$
Bonjour,

Je souhaite lancer la commande dans le code VBA.

Shell "Excel C:Nouveau dossierEMORGA1.slk"

Le probleme est qu'il plante lorsqu il y a un espace entre
Nouveau et dossier ( fonctionne qd pas d 'espace ).
Il doit avoir une solution, vous la connaissez peut etre?
merci


.



Avatar
PAt
Bonjour et merci pour la reponse
J'ai trouvé par la suite ce qui convenait à ma situation

Workbooks.Open Filename:=VCheminEntrant & VNom & ".slk"
Workbooks.Open Filename:=VCheminEntrant & VNomE & ".slk"
a+

-----Message d'origine-----
utilisation du ~ ???

en passant par FSO (File System Object) tu peux demander
avec un nom de

repertoire le nom 'raccourci' (shortPath dans FSO)

Je reste à ta disposition si tu ne connais pas.

John

"Pat" a écrit dans
le message de

news:076201c3b8ae$c0ab2dd0$
Bonjour,

Je souhaite lancer la commande dans le code VBA.

Shell "Excel C:Nouveau dossierEMORGA1.slk"

Le probleme est qu'il plante lorsqu il y a un espace
entre


Nouveau et dossier ( fonctionne qd pas d 'espace ).
Il doit avoir une solution, vous la connaissez peut
etre?


merci



.