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 Access probleme chemin

probleme chemin

15 réponses
Avatar
damien
Bonjour,
voila je veux ouvrir un fichier excel qui ce trouve au chemin suivant:
C:\Documents and Settings\All Users\Documents\GPAO\Template\toto.xls
Or je pense que a cause des espaces ca ne marche pas car il decoupe le
chemin des qu'il rencontre un espace
Comment faire??
Merci car c'est assez urgent
Damien
Signaler un problème avec ce contenu

10 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
1 2
Avatar
Raymond [mvp]
Bonjour.

indique ton chemin entre guillemets:
"C:Documents and SettingsAll UsersDocumentsGPAOTemplatetoto.xls"


--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"damien" a écrit dans le message de news:

Bonjour,
voila je veux ouvrir un fichier excel qui ce trouve au chemin suivant:
C:Documents and SettingsAll UsersDocumentsGPAOTemplatetoto.xls
Or je pense que a cause des espaces ca ne marche pas car il decoupe le
chemin des qu'il rencontre un espace
Comment faire??
Merci car c'est assez urgent
Damien



Avatar
damien
Mon chemin était entre guillemets car j'utilise l'assistant access pour créer
un bouton sur click....
Donc ca ne marche pas????????
Merci
damien


Bonjour.

indique ton chemin entre guillemets:
"C:Documents and SettingsAll UsersDocumentsGPAOTemplatetoto.xls"


--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"damien" a écrit dans le message de news:

Bonjour,
voila je veux ouvrir un fichier excel qui ce trouve au chemin suivant:
C:Documents and SettingsAll UsersDocumentsGPAOTemplatetoto.xls
Or je pense que a cause des espaces ca ne marche pas car il decoupe le
chemin des qu'il rencontre un espace
Comment faire??
Merci car c'est assez urgent
Damien








Avatar
3stone
Salut,

"damien"
| Mon chemin était entre guillemets car j'utilise l'assistant access pour créer
| un bouton sur click....


Les guillemets ne suffisent qu'à la condition que le chemin ne contienne pas d'espace.

Essaies en les triplant :

"""C:Documents and SettingsAll UsersDocumentsGPAOTemplatetoto.xls"""

ou éventuellement :

chr(34) & "C:Documents and SettingsAll UsersDocumentsGPAOTemplatetoto.xls" & chr(34)


A+
Pierre(3stone)
Avatar
damien
Cela ne marche pas j'ai un message d'erreur m'indiquant que la procedure
n'est pas bonne
Coment faire?????


Salut,

"damien"
| Mon chemin était entre guillemets car j'utilise l'assistant access pour créer
| un bouton sur click....


Les guillemets ne suffisent qu'à la condition que le chemin ne contienne pas d'espace.

Essaies en les triplant :

"""C:Documents and SettingsAll UsersDocumentsGPAOTemplatetoto.xls"""

ou éventuellement :

chr(34) & "C:Documents and SettingsAll UsersDocumentsGPAOTemplatetoto.xls" & chr(34)


A+
Pierre(3stone)




Avatar
3stone
C'est quoi ta commande complète ?


"damien"
| Cela ne marche pas j'ai un message d'erreur m'indiquant que la procedure
| n'est pas bonne
| Coment faire?????
|
Avatar
damien
ma commande complete est :

Option Compare Database

Private Sub CmdGraphJalons_Click()
On Error GoTo Err_CmdGraphJalons_Click

Dim stAppName, ExcelFile As String
If (ChoixTop10 = True) Then
Select Case Freq.Value
Case 1: ExcelFile = "Temps_CTop10_Trace1_Jour_" + Plant + ".xls"
Case 2: ExcelFile = "Temps_CTop10_Trace1_Semaine_" + Plant + ".xls"
Case 3: ExcelFile = "Temps_CTop10_Trace1_Mois_" + Plant + ".xls"
Case 4: ExcelFile = "Temps_CTop10_Trace1_OF_" + Plant + ".xls"
End Select
Else
Select Case Freq.Value
Case 1: ExcelFile = "Temps_C_Trace1_Jour_" + Plant + ".xls"
Case 2: ExcelFile = "Temps_C_Trace1_Semaine_" + Plant + ".xls"
Case 3: ExcelFile = "Temps_C_Trace1_Mois_" + Plant + ".xls"
Case 4: ExcelFile = "Temps_C_Trace1_OF_" + Plant + ".xls"
End Select
End If
stAppName = "EXCEL.exe /r "
stAppName = WindowsPath + stAppName + PathFile + ExcelFile
Call Shell(stAppName, 1)

Exit_CmdGraphJalons_Click:
Exit Sub

Err_CmdGraphJalons_Click:
MsgBox Err.Description
Resume Exit_CmdGraphJalons_Click

End Sub


avec
WindowsPath = "C:Program FilesMicrosoft OfficeOffice11"
PathFile = "C:Documents and SettingsAll UsersDocumentsGPAOTemplate"

??????????????
Merci de votre aide


C'est quoi ta commande complète ?


"damien"
| Cela ne marche pas j'ai un message d'erreur m'indiquant que la procedure
| n'est pas bonne
| Coment faire?????
|



Avatar
3stone
Salut,

"damien"
| ma commande complete est :
[...]
| stAppName = "EXCEL.exe /r "
| stAppName = WindowsPath + stAppName + PathFile + ExcelFile

' ici tu ajoute pour vérification...

Debug.Print stAppName

| Call Shell(stAppName, 1)



PS: La concaténation ce fait avec le signe "&" et non le signe "+"

stAppName = windowPath & stAppName & PathFile & ExcelFile



A+
Pierre(3stone)
Avatar
damien
ca ne marche toujours pas!!!!!!!!!!!!!!!!!!!!!!!!!!!!
pourtant c urgent car je ne peux pas distribuer le logiciel
Merci



Salut,

"damien"
| ma commande complete est :
[...]
| stAppName = "EXCEL.exe /r "
| stAppName = WindowsPath + stAppName + PathFile + ExcelFile

' ici tu ajoute pour vérification...

Debug.Print stAppName

| Call Shell(stAppName, 1)



PS: La concaténation ce fait avec le signe "&" et non le signe "+"

stAppName = windowPath & stAppName & PathFile & ExcelFile



A+
Pierre(3stone)




Avatar
3stone
re,

"damien"
| ca ne marche toujours pas!!!!!!!!!!!!!!!!!!!!!!!!!!!!

qui veux tu impressionner avec cela ?



| pourtant c urgent car je ne peux pas distribuer le logiciel


Je t'ai dit...

| > ' ici tu ajoute pour vérification...
| >
| > Debug.Print stAppName
| >
| > | Call Shell(stAppName, 1)


Qu'obtiens tu dans la fenêtre d'exécution ?


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Email : http://www.cerbermail.com/?Xfg61Z3IQw
Avatar
damien
Personne mais je voudrais bien que ca fonctionne
Merci de votre aide



re,

"damien"
| ca ne marche toujours pas!!!!!!!!!!!!!!!!!!!!!!!!!!!!

qui veux tu impressionner avec cela ?



| pourtant c urgent car je ne peux pas distribuer le logiciel


Je t'ai dit...

| > ' ici tu ajoute pour vérification...
| >
| > Debug.Print stAppName
| >
| > | Call Shell(stAppName, 1)


Qu'obtiens tu dans la fenêtre d'exécution ?


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Email : http://www.cerbermail.com/?Xfg61Z3IQw




1 2