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 Ouverture Appli + fichiers

Ouverture Appli + fichiers

8 réponses
Avatar
Patrice
Bonjour,

Depuis ce matin, je ronge l'os, mais j'arrive pas à atteindre la moelle
;o))
Je suis en access97 (oui je sais...) et j'essai d'ouvrir 2 fichiers excels
sous excel 2000 (lol)
La proposition 1 ci dessous fonctionne, mais c'est la 2 qui m'interesse et
je n'arrive pas à l'écrire correctement.
Le message est "Fichier introuvable"...


Dim CheminFichierData, CheminFichier, CheminExcel2000 As String

CheminFichierData = [ChoixEtat].Column(6) ' D:\Patou\NbrParGare_Data.xls
CheminFichier = [ChoixEtat].Column(7) ' D:\Patou\NbrParGare.xls
CheminExcel2000 = "C:\\Program Files\Microsoft Office\Office10\Excel.exe"

Dim stAppName1 As String
'stAppName1 = "C:\\Program Files\Microsoft Office\Office10\Excel.exe
D:\Patou\NbrParGare_Data.xls D:\Patou\NbrParGare.xls" '====>1
stAppName1 = "CheminExcel2000 CheminFichierData CheminFichier" '====>2
Call Shell(stAppName1, 1)


Merci de votre aide.

Patrice
Signaler un problème avec ce contenu

8 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
Raymond [mvp]
Bonjour.

essaie plutôt ceci:

stAppName1 = CheminExcel2000 & " " & CheminFichierData & " " & CheminFichier
Call Shell(stAppName1, 1)

& " " sert a placer un espace entre les données.
--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/
Nouvelle base Access des communes françaises avec
longitude, latitude et 13183 sites internet officiels
http://ardecheearth.free.fr/basededonnees.htm


"Patrice" a écrit dans le message de news:
44d71e4b$
| Bonjour,
|
| Depuis ce matin, je ronge l'os, mais j'arrive pas à atteindre la moelle
| ;o))
| Je suis en access97 (oui je sais...) et j'essai d'ouvrir 2 fichiers excels
| sous excel 2000 (lol)
| La proposition 1 ci dessous fonctionne, mais c'est la 2 qui m'interesse et
| je n'arrive pas à l'écrire correctement.
| Le message est "Fichier introuvable"...
|
|
| Dim CheminFichierData, CheminFichier, CheminExcel2000 As String
|
| CheminFichierData = [ChoixEtat].Column(6) ' D:PatouNbrParGare_Data.xls
| CheminFichier = [ChoixEtat].Column(7) ' D:PatouNbrParGare.xls
| CheminExcel2000 = "C:Program FilesMicrosoft OfficeOffice10Excel.exe"
|
| Dim stAppName1 As String
| 'stAppName1 = "C:Program FilesMicrosoft OfficeOffice10Excel.exe
| D:PatouNbrParGare_Data.xls D:PatouNbrParGare.xls" '====>1
| stAppName1 = "CheminExcel2000 CheminFichierData CheminFichier" '====>2
| Call Shell(stAppName1, 1)
|
|
| Merci de votre aide.
|
| Patrice
|
|
Avatar
Raymond [mvp]
.../... un oubli:
n'utilise pas:

CheminExcel2000 = "C:Program FilesMicrosoft OfficeOffice10Excel.exe"
mais
CheminExcel2000 = "Excel.exe"

sinon comment vas-tu gérer le changement de version ?
--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/
Nouvelle base Access des communes françaises avec
longitude, latitude et 13183 sites internet officiels
http://ardecheearth.free.fr/basededonnees.htm


"Raymond [mvp]" a écrit dans le message
de news:
| Bonjour.
|
Avatar
Patrice
Salut et merci Raymond,

(Doublement si j'ajoute les communes...)

Patrice

"Raymond [mvp]" a écrit dans le message
de news:
Bonjour.

essaie plutôt ceci:

stAppName1 = CheminExcel2000 & " " & CheminFichierData & " " &
CheminFichier

Call Shell(stAppName1, 1)

& " " sert a placer un espace entre les données.
--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/
Nouvelle base Access des communes françaises avec
longitude, latitude et 13183 sites internet officiels
http://ardecheearth.free.fr/basededonnees.htm


"Patrice" a écrit dans le message de news:
44d71e4b$
| Bonjour,
|
| Depuis ce matin, je ronge l'os, mais j'arrive pas à atteindre la moelle
| ;o))
| Je suis en access97 (oui je sais...) et j'essai d'ouvrir 2 fichiers
excels

| sous excel 2000 (lol)
| La proposition 1 ci dessous fonctionne, mais c'est la 2 qui m'interesse
et

| je n'arrive pas à l'écrire correctement.
| Le message est "Fichier introuvable"...
|
|
| Dim CheminFichierData, CheminFichier, CheminExcel2000 As String
|
| CheminFichierData = [ChoixEtat].Column(6) ' D:PatouNbrParGare_Data.xls
| CheminFichier = [ChoixEtat].Column(7) ' D:PatouNbrParGare.xls
| CheminExcel2000 = "C:Program FilesMicrosoft
OfficeOffice10Excel.exe"

|
| Dim stAppName1 As String
| 'stAppName1 = "C:Program FilesMicrosoft OfficeOffice10Excel.exe
| D:PatouNbrParGare_Data.xls D:PatouNbrParGare.xls" '====>1
| stAppName1 = "CheminExcel2000 CheminFichierData CheminFichier"
'====>2

| Call Shell(stAppName1, 1)
|
|
| Merci de votre aide.
|
| Patrice
|
|





Avatar
Patrice
Ben non cela ne fonctionne pas de Access 97 vers Excel 2000 !...
J'avais déjà cherché longtemps à une époque...
Cela fonctionne si Access 97 vers Excel 97 seulement.
Je pense que c'est une question de chemin avec Office10 ??!!..

Pour le changement de version, je pense que je vais essayer de faire une
variable du chemin par un formulaire qui s'ouvre au démarrage avec les
paramètres (chemin pour ce cas...) à remplir par l'utilisateur au jour J...

"Raymond [mvp]" a écrit dans le message
de news:
.../... un oubli:
n'utilise pas:

CheminExcel2000 = "C:Program FilesMicrosoft OfficeOffice10Excel.exe"
mais
CheminExcel2000 = "Excel.exe"

sinon comment vas-tu gérer le changement de version ?
--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/
Nouvelle base Access des communes françaises avec
longitude, latitude et 13183 sites internet officiels
http://ardecheearth.free.fr/basededonnees.htm


"Raymond [mvp]" a écrit dans le
message

de news:
| Bonjour.
|




Avatar
Raymond [mvp]
vérifie le chemin exact avec l'explorateur.

pour excel tu peux utiliser la version en cours en n'indiquant pas le chemin
comme je te l'ai marqué sur l'autre message.

--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/
Nouvelle base Access des communes françaises avec
longitude, latitude et 13183 sites internet officiels
http://ardecheearth.free.fr/basededonnees.htm


"Patrice" a écrit dans le message de news:
44d73257$
| Ben non cela ne fonctionne pas de Access 97 vers Excel 2000 !...
| J'avais déjà cherché longtemps à une époque...
| Cela fonctionne si Access 97 vers Excel 97 seulement.
| Je pense que c'est une question de chemin avec Office10 ??!!..
|
| Pour le changement de version, je pense que je vais essayer de faire une
| variable du chemin par un formulaire qui s'ouvre au démarrage avec les
| paramètres (chemin pour ce cas...) à remplir par l'utilisateur au jour
J...
Avatar
Patrice
Le chemin exact est : C:Program FilesMicrosoft OfficeOffice10Excel.exe

Celui de access : C:Program FilesMicrosoft OfficeOfficeMsaccess.exe

Je peux t'assurer que cela ne fonctionne pas si le chemin n'est pas
indiqué...

"Raymond [mvp]" a écrit dans le message
de news:e0cY$
vérifie le chemin exact avec l'explorateur.

pour excel tu peux utiliser la version en cours en n'indiquant pas le
chemin

comme je te l'ai marqué sur l'autre message.

--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/
Nouvelle base Access des communes françaises avec
longitude, latitude et 13183 sites internet officiels
http://ardecheearth.free.fr/basededonnees.htm


"Patrice" a écrit dans le message de news:
44d73257$
| Ben non cela ne fonctionne pas de Access 97 vers Excel 2000 !...
| J'avais déjà cherché longtemps à une époque...
| Cela fonctionne si Access 97 vers Excel 97 seulement.
| Je pense que c'est une question de chemin avec Office10 ??!!..
|
| Pour le changement de version, je pense que je vais essayer de faire une
| variable du chemin par un formulaire qui s'ouvre au démarrage avec les
| paramètres (chemin pour ce cas...) à remplir par l'utilisateur au jour
J...




Avatar
Raymond [mvp]
sur 97 c'est possible, sur 2000 et + le nom suffit.
tu es sûr du c: et non c:

si tu es sur office10, c'est office xp (2002) et non office 2000.

--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/
Nouvelle base Access des communes françaises avec
longitude, latitude et 13183 sites internet officiels
http://ardecheearth.free.fr/basededonnees.htm


"Patrice" a écrit dans le message de news:
44d739c6$
| Le chemin exact est : C:Program FilesMicrosoft
OfficeOffice10Excel.exe
|
| Celui de access : C:Program FilesMicrosoft OfficeOfficeMsaccess.exe
|
| Je peux t'assurer que cela ne fonctionne pas si le chemin n'est pas
| indiqué...
|
Avatar
Patrice
Pour le c: c'est erreur de ma part mais il prend quand même la syntaxe !!!
Bizarre...

Effectivement c'est 2002...
@+

"Raymond [mvp]" a écrit dans le message
de news:%23G$
sur 97 c'est possible, sur 2000 et + le nom suffit.
tu es sûr du c: et non c:

si tu es sur office10, c'est office xp (2002) et non office 2000.

--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/
Nouvelle base Access des communes françaises avec
longitude, latitude et 13183 sites internet officiels
http://ardecheearth.free.fr/basededonnees.htm


"Patrice" a écrit dans le message de news:
44d739c6$
| Le chemin exact est : C:Program FilesMicrosoft
OfficeOffice10Excel.exe
|
| Celui de access : C:Program FilesMicrosoft OfficeOfficeMsaccess.exe
|
| Je peux t'assurer que cela ne fonctionne pas si le chemin n'est pas
| indiqué...
|