OVH Cloud OVH Cloud

Ouvrir Excel

16 réponses
Avatar
Patrice
Bonjour,

J'essai de trouver le code qui me permet d'ouvrir des fichiers Excel à
partir d'Access 97 mais je n'y arrive pas.
Dans ListeChoix.Column(2) il ya plusieurs chemins complets de fichiers Excel

Private Sub BtnApercu_Click()
Dim CheminFichier As String
CheminFichier = ListeChoix.Column(2)

Call Shell(CheminFichier, 3)

End Sub

Quelqu'un aurait une idée ?

Merci d'avance

Patrice

6 réponses

1 2
Avatar
Patrice
Private Sub Commande145_Click()
Dim CheminFichier As String
CheminFichier = ListeChoix.Column(2)
fHandleFile (CheminFichier, WIN_NORMAL)
End Sub

Gafish a écrit dans le message :
er6Z#
Patrice wrote:

Non il n'y a pas de chemin zarbi (E:1ExtractionsMensuellesP3.xls),
d'autant plus que cela fonction sur des fonctions d'export :



C'est bizarre, mets voir ton code complet ici

Arnaud





Avatar
Patrice
G essayé un truc en ajoutant sur mon formulaire une Zone de texte
[CtrlOuvertureFichier] qui m'affiche -1 en résultat, mais je ne sais pas
pourquoi cela fonctionne...

CtrlOuvertureFichier = fHandleFile(CheminFichier, 3)

Si tu peux m'expliquer, merci.

Patrice

Patrice a écrit dans le message :
4315b30a$
Private Sub Commande145_Click()
Dim CheminFichier As String
CheminFichier = ListeChoix.Column(2)
fHandleFile (CheminFichier, WIN_NORMAL)
End Sub

Gafish a écrit dans le message :
er6Z#
Patrice wrote:

Non il n'y a pas de chemin zarbi (E:1ExtractionsMensuellesP3.xls),
d'autant plus que cela fonction sur des fonctions d'export :



C'est bizarre, mets voir ton code complet ici

Arnaud









Avatar
Gafish
Patrice wrote:
G essayé un truc en ajoutant sur mon formulaire une Zone de texte
[CtrlOuvertureFichier] qui m'affiche -1 en résultat, mais je ne sais
pas pourquoi cela fonctionne...

CtrlOuvertureFichier = fHandleFile(CheminFichier, 3)

Si tu peux m'expliquer, merci.

Patrice



Oui, hier c'était le retour de vacances je t'ai dit des bétises, avec
fHandleFile, on n'affecte pas à une zone. Si tu affectes, tu as le code
retour -1 que te dit que la fonction a marché sans erreur.
Par contre ca ne résoud toujours pas ton problème, essaie en dur de faire
fHandleFile avec dans les parenthèses ton chemin en dur sans passer par une
variable

Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Patrice
Bonjour Arnaud,

J'espère que tes vacances se sont bien passées, car çà c le principal :o)))

Pour le blème : Y'en a plus puis que cela fonctionne en écrivant :
CtrlOuvertureFichier = fHandleFile(CheminFichier, 3)
Mon fichier s'ouvre

Si j'écris :
fHandleFile(CheminFichier, 3)
Mon fichier ne s'ouvre pas et un msg me dit "Erreur de syntaxe"

!!!!!!!!!!!!!!!!!!????????????

Comprends pas

Patrice

Gafish a écrit dans le message :

Patrice wrote:
G essayé un truc en ajoutant sur mon formulaire une Zone de texte
[CtrlOuvertureFichier] qui m'affiche -1 en résultat, mais je ne sais
pas pourquoi cela fonctionne...

CtrlOuvertureFichier = fHandleFile(CheminFichier, 3)

Si tu peux m'expliquer, merci.

Patrice



Oui, hier c'était le retour de vacances je t'ai dit des bétises, avec
fHandleFile, on n'affecte pas à une zone. Si tu affectes, tu as le code
retour -1 que te dit que la fonction a marché sans erreur.
Par contre ca ne résoud toujours pas ton problème, essaie en dur de faire
fHandleFile avec dans les parenthèses ton chemin en dur sans passer par
une

variable

Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr





Avatar
3stone
Salut,

"Patrice"
| Pour le blème : Y'en a plus puis que cela fonctionne en écrivant :
| CtrlOuvertureFichier = fHandleFile(CheminFichier, 3)
| Mon fichier s'ouvre
|
| Si j'écris :
| fHandleFile(CheminFichier, 3)
| Mon fichier ne s'ouvre pas et un msg me dit "Erreur de syntaxe"


Call fHandleFile("chemin complet du fichier", 3)


fonctionne parfaitement...


--
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
Patrice
Bonjour 3stone,

Effectivement c nickel chrome...

@+

Patrice

3stone a écrit dans le message :

Salut,

"Patrice"
| Pour le blème : Y'en a plus puis que cela fonctionne en écrivant :
| CtrlOuvertureFichier = fHandleFile(CheminFichier, 3)
| Mon fichier s'ouvre
|
| Si j'écris :
| fHandleFile(CheminFichier, 3)
| Mon fichier ne s'ouvre pas et un msg me dit "Erreur de syntaxe"


Call fHandleFile("chemin complet du fichier", 3)


fonctionne parfaitement...


--
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