Je voudrai depuis un formulaire et sur un clic (événement click) d'un bouton
de commande mettre du code VBA pour lancer Word, Excel ou un exécutable et
ouvrir un fichier provenant d'une liste donc d'une variable.
Avec une macro et en indiquant chemin et nom de fichier c'est ok.
Par contre avec du code VBA j'obtiens un message d'erreur d'Access.
Avez vous une solution ?
Bravo, la méthode fonctionne parfaitement que ce soit un fichier Word, Excel ou autre. Comme on indique pas l'application je suppose que celle-ci est déterminée automatiquement par Windows selon les types de fichiers associés aux extension.
MERCI Jacques ============================================== "Eric" a écrit dans le message de news:
Bonjour,
Pourquoi ne pas utiliser l'API ShellExecute ?
Private Const SW_SHOWNORMAL = 1 Private Declare Function ShellExecute Lib "shell32.dll" _ Alias "ShellExecuteA" (ByVal hwnd As Long, _ ByVal lpOperation As String, _ ByVal lpFile As String, ByVal lpParameters As String, _ ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
et sur l'évènement clic d'un bouton: Private Sub Commande1_Click() ShellExecute Me.hwnd, "open", "LeFichier.Ext", _ vbNullString, "LeRepertoireDuFichier", SW_SHOWNORMAL End Sub
Bonjour,
Je voudrai depuis un formulaire et sur un clic (événement click) d'un bouton de commande mettre du code VBA pour lancer Word, Excel ou un exécutable et ouvrir un fichier provenant d'une liste donc d'une variable. Avec une macro et en indiquant chemin et nom de fichier c'est ok. Par contre avec du code VBA j'obtiens un message d'erreur d'Access. Avez vous une solution ?
MERCI
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour,
Bravo, la méthode fonctionne parfaitement que ce soit un fichier Word, Excel
ou autre.
Comme on indique pas l'application je suppose que celle-ci est déterminée
automatiquement par Windows selon les types de fichiers associés aux
extension.
MERCI
Jacques
============================================== "Eric" <f_framZZ@hotmail.com> a écrit dans le message de news:
uR1LfPVEHHA.4256@TK2MSFTNGP04.phx.gbl...
Bonjour,
Pourquoi ne pas utiliser l'API ShellExecute ?
Private Const SW_SHOWNORMAL = 1
Private Declare Function ShellExecute Lib "shell32.dll" _
Alias "ShellExecuteA" (ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
et sur l'évènement clic d'un bouton:
Private Sub Commande1_Click()
ShellExecute Me.hwnd, "open", "LeFichier.Ext", _
vbNullString, "LeRepertoireDuFichier", SW_SHOWNORMAL
End Sub
Bonjour,
Je voudrai depuis un formulaire et sur un clic (événement click) d'un
bouton de commande mettre du code VBA pour lancer Word, Excel ou un
exécutable et ouvrir un fichier provenant d'une liste donc d'une
variable.
Avec une macro et en indiquant chemin et nom de fichier c'est ok.
Par contre avec du code VBA j'obtiens un message d'erreur d'Access.
Avez vous une solution ?
MERCI
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bravo, la méthode fonctionne parfaitement que ce soit un fichier Word, Excel ou autre. Comme on indique pas l'application je suppose que celle-ci est déterminée automatiquement par Windows selon les types de fichiers associés aux extension.
MERCI Jacques ============================================== "Eric" a écrit dans le message de news:
Bonjour,
Pourquoi ne pas utiliser l'API ShellExecute ?
Private Const SW_SHOWNORMAL = 1 Private Declare Function ShellExecute Lib "shell32.dll" _ Alias "ShellExecuteA" (ByVal hwnd As Long, _ ByVal lpOperation As String, _ ByVal lpFile As String, ByVal lpParameters As String, _ ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
et sur l'évènement clic d'un bouton: Private Sub Commande1_Click() ShellExecute Me.hwnd, "open", "LeFichier.Ext", _ vbNullString, "LeRepertoireDuFichier", SW_SHOWNORMAL End Sub
Bonjour,
Je voudrai depuis un formulaire et sur un clic (événement click) d'un bouton de commande mettre du code VBA pour lancer Word, Excel ou un exécutable et ouvrir un fichier provenant d'une liste donc d'une variable. Avec une macro et en indiquant chemin et nom de fichier c'est ok. Par contre avec du code VBA j'obtiens un message d'erreur d'Access. Avez vous une solution ?
MERCI
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Tu as résolu ton problème avec le code d'Eric et c'est l'essentiel. Toutefois, pour ceux qui préfèrent une formule "courte", je viens de faire un test de mon côté. L'instruction ci-dessus fonctionne bien. Mais il ne faut pas se tromper dans les paires de guillemets ;-))
-- Tisane
Bonjour Jacques,
[...]
Ci-dessous le code au niveau du bouton de commande (qui est la copie de la conversion de la macro) : Private Sub Lire_un_document_Word_Click() Call Shell("C:Program FilesMicrosoft OfficeOFFICE11WINWORD.EXE C:Mdbmdb_lireLettre_poste.doc", 1) End Sub
Je n'ai pas le temps de faire un test, mais je suis certaine qu'il y a des paires de guillemets manquantes, dans la mesure où il y a un espace dans le chemin. Call Shell("""C:Program FilesMicrosoft OfficeOFFICE11WINWORD.EXE"" ""C:Mdbmdb_lireLettre_poste.doc""", 1) Essaie comme ça, cela ne doit pas être loin.
Tu as résolu ton problème avec le code d'Eric et c'est l'essentiel.
Toutefois, pour ceux qui préfèrent une formule "courte", je viens de faire
un test de mon côté.
L'instruction ci-dessus fonctionne bien. Mais il ne faut pas se tromper dans
les paires de guillemets ;-))
--
Tisane
Bonjour Jacques,
[...]
Ci-dessous le code au niveau du bouton de commande (qui est la copie
de la conversion de la macro) :
Private Sub Lire_un_document_Word_Click()
Call Shell("C:Program FilesMicrosoft OfficeOFFICE11WINWORD.EXE
C:Mdbmdb_lireLettre_poste.doc", 1)
End Sub
Je n'ai pas le temps de faire un test, mais je suis certaine qu'il y
a des paires de guillemets manquantes, dans la mesure où il y a un
espace dans le chemin.
Call Shell("""C:Program FilesMicrosoft
OfficeOFFICE11WINWORD.EXE"" ""C:Mdbmdb_lireLettre_poste.doc""",
1) Essaie comme ça, cela ne doit pas être loin.
Tu as résolu ton problème avec le code d'Eric et c'est l'essentiel. Toutefois, pour ceux qui préfèrent une formule "courte", je viens de faire un test de mon côté. L'instruction ci-dessus fonctionne bien. Mais il ne faut pas se tromper dans les paires de guillemets ;-))
-- Tisane
Bonjour Jacques,
[...]
Ci-dessous le code au niveau du bouton de commande (qui est la copie de la conversion de la macro) : Private Sub Lire_un_document_Word_Click() Call Shell("C:Program FilesMicrosoft OfficeOFFICE11WINWORD.EXE C:Mdbmdb_lireLettre_poste.doc", 1) End Sub
Je n'ai pas le temps de faire un test, mais je suis certaine qu'il y a des paires de guillemets manquantes, dans la mesure où il y a un espace dans le chemin. Call Shell("""C:Program FilesMicrosoft OfficeOFFICE11WINWORD.EXE"" ""C:Mdbmdb_lireLettre_poste.doc""", 1) Essaie comme ça, cela ne doit pas être loin.
-- Tisane
[...]
jbenchetrit
MERCI de ton aide
Jacques ==================== "Tisane" a écrit dans le message de news:
Tu as résolu ton problème avec le code d'Eric et c'est l'essentiel. Toutefois, pour ceux qui préfèrent une formule "courte", je viens de faire un test de mon côté. L'instruction ci-dessus fonctionne bien. Mais il ne faut pas se tromper dans les paires de guillemets ;-))
-- Tisane
Bonjour Jacques,
[...]
Ci-dessous le code au niveau du bouton de commande (qui est la copie de la conversion de la macro) : Private Sub Lire_un_document_Word_Click() Call Shell("C:Program FilesMicrosoft OfficeOFFICE11WINWORD.EXE C:Mdbmdb_lireLettre_poste.doc", 1) End Sub
Je n'ai pas le temps de faire un test, mais je suis certaine qu'il y a des paires de guillemets manquantes, dans la mesure où il y a un espace dans le chemin. Call Shell("""C:Program FilesMicrosoft OfficeOFFICE11WINWORD.EXE"" ""C:Mdbmdb_lireLettre_poste.doc""", 1) Essaie comme ça, cela ne doit pas être loin.
-- Tisane
[...]
MERCI de ton aide
Jacques
==================== "Tisane" <b.tisane@laposte.net> a écrit dans le message de news:
O82yb6VEHHA.348@TK2MSFTNGP06.phx.gbl...
Tu as résolu ton problème avec le code d'Eric et c'est l'essentiel.
Toutefois, pour ceux qui préfèrent une formule "courte", je viens de faire
un test de mon côté.
L'instruction ci-dessus fonctionne bien. Mais il ne faut pas se tromper
dans les paires de guillemets ;-))
--
Tisane
Bonjour Jacques,
[...]
Ci-dessous le code au niveau du bouton de commande (qui est la copie
de la conversion de la macro) :
Private Sub Lire_un_document_Word_Click()
Call Shell("C:Program FilesMicrosoft OfficeOFFICE11WINWORD.EXE
C:Mdbmdb_lireLettre_poste.doc", 1)
End Sub
Je n'ai pas le temps de faire un test, mais je suis certaine qu'il y
a des paires de guillemets manquantes, dans la mesure où il y a un
espace dans le chemin.
Call Shell("""C:Program FilesMicrosoft
OfficeOFFICE11WINWORD.EXE"" ""C:Mdbmdb_lireLettre_poste.doc""",
1) Essaie comme ça, cela ne doit pas être loin.
Tu as résolu ton problème avec le code d'Eric et c'est l'essentiel. Toutefois, pour ceux qui préfèrent une formule "courte", je viens de faire un test de mon côté. L'instruction ci-dessus fonctionne bien. Mais il ne faut pas se tromper dans les paires de guillemets ;-))
-- Tisane
Bonjour Jacques,
[...]
Ci-dessous le code au niveau du bouton de commande (qui est la copie de la conversion de la macro) : Private Sub Lire_un_document_Word_Click() Call Shell("C:Program FilesMicrosoft OfficeOFFICE11WINWORD.EXE C:Mdbmdb_lireLettre_poste.doc", 1) End Sub
Je n'ai pas le temps de faire un test, mais je suis certaine qu'il y a des paires de guillemets manquantes, dans la mesure où il y a un espace dans le chemin. Call Shell("""C:Program FilesMicrosoft OfficeOFFICE11WINWORD.EXE"" ""C:Mdbmdb_lireLettre_poste.doc""", 1) Essaie comme ça, cela ne doit pas être loin.
-- Tisane
[...]
marianne puget
bonjour, "jbenchetrit" est-ce bien la personne qui s'occupait de infocentre focus dans une grande usine sidérurgique? Cdt, Christian Fackeure
"jbenchetrit" a écrit dans le message de news: 456856eb$0$27373$
Bonjour,
Je voudrai depuis un formulaire et sur un clic (événement click) d'un bouton de commande mettre du code VBA pour lancer Word, Excel ou un exécutable et ouvrir un fichier provenant d'une liste donc d'une variable. Avec une macro et en indiquant chemin et nom de fichier c'est ok. Par contre avec du code VBA j'obtiens un message d'erreur d'Access. Avez vous une solution ?
MERCI
bonjour,
"jbenchetrit" est-ce bien la personne qui s'occupait de infocentre focus
dans une grande usine sidérurgique?
Cdt, Christian Fackeure
"jbenchetrit" <jbenchetrit@wanadoo.fr> a écrit dans le message de news:
456856eb$0$27373$ba4acef3@news.orange.fr...
Bonjour,
Je voudrai depuis un formulaire et sur un clic (événement click) d'un
bouton de commande mettre du code VBA pour lancer Word, Excel ou un
exécutable et ouvrir un fichier provenant d'une liste donc d'une variable.
Avec une macro et en indiquant chemin et nom de fichier c'est ok.
Par contre avec du code VBA j'obtiens un message d'erreur d'Access.
Avez vous une solution ?
bonjour, "jbenchetrit" est-ce bien la personne qui s'occupait de infocentre focus dans une grande usine sidérurgique? Cdt, Christian Fackeure
"jbenchetrit" a écrit dans le message de news: 456856eb$0$27373$
Bonjour,
Je voudrai depuis un formulaire et sur un clic (événement click) d'un bouton de commande mettre du code VBA pour lancer Word, Excel ou un exécutable et ouvrir un fichier provenant d'une liste donc d'une variable. Avec une macro et en indiquant chemin et nom de fichier c'est ok. Par contre avec du code VBA j'obtiens un message d'erreur d'Access. Avez vous une solution ?
MERCI
jbenchetrit
OUI ================================= "marianne puget" a écrit dans le message de news:
bonjour, "jbenchetrit" est-ce bien la personne qui s'occupait de infocentre focus dans une grande usine sidérurgique? Cdt, Christian Fackeure
"jbenchetrit" a écrit dans le message de news: 456856eb$0$27373$
Bonjour,
Je voudrai depuis un formulaire et sur un clic (événement click) d'un bouton de commande mettre du code VBA pour lancer Word, Excel ou un exécutable et ouvrir un fichier provenant d'une liste donc d'une variable. Avec une macro et en indiquant chemin et nom de fichier c'est ok. Par contre avec du code VBA j'obtiens un message d'erreur d'Access. Avez vous une solution ?
MERCI
OUI
================================= "marianne puget" <puget.marianne@neuf.fr> a écrit dans le message de news:
OsvPFKkEHHA.4740@TK2MSFTNGP03.phx.gbl...
bonjour,
"jbenchetrit" est-ce bien la personne qui s'occupait de infocentre focus
dans une grande usine sidérurgique?
Cdt, Christian Fackeure
"jbenchetrit" <jbenchetrit@wanadoo.fr> a écrit dans le message de news:
456856eb$0$27373$ba4acef3@news.orange.fr...
Bonjour,
Je voudrai depuis un formulaire et sur un clic (événement click) d'un
bouton de commande mettre du code VBA pour lancer Word, Excel ou un
exécutable et ouvrir un fichier provenant d'une liste donc d'une
variable.
Avec une macro et en indiquant chemin et nom de fichier c'est ok.
Par contre avec du code VBA j'obtiens un message d'erreur d'Access.
Avez vous une solution ?
OUI ================================= "marianne puget" a écrit dans le message de news:
bonjour, "jbenchetrit" est-ce bien la personne qui s'occupait de infocentre focus dans une grande usine sidérurgique? Cdt, Christian Fackeure
"jbenchetrit" a écrit dans le message de news: 456856eb$0$27373$
Bonjour,
Je voudrai depuis un formulaire et sur un clic (événement click) d'un bouton de commande mettre du code VBA pour lancer Word, Excel ou un exécutable et ouvrir un fichier provenant d'une liste donc d'une variable. Avec une macro et en indiquant chemin et nom de fichier c'est ok. Par contre avec du code VBA j'obtiens un message d'erreur d'Access. Avez vous une solution ?
