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
Eric
Bonjour,
Utilise l'api ShellExecute
Ca donnerait, à copier dans le module du formulaire :
Option Compare Database Option Explicit
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
Const SW_SHOWNORMAL = 1
Private Sub Commande0_Click() Dim CheminFichier As String 'Adapter le chemin et le fichier CheminFichier = "C:Le Tour de France 2008.pps" ShellExecute Me.hwnd, vbNullString, _ CheminFichier, vbNullString, _ "C:", SW_SHOWNORMAL End Sub
Bonjour,
J'aimerais pouvoir ouvrir un document PPS depuis un bouton dans un formulaire Access.
Je suis arrivé à ouvrir powerpoint, mais le document s'ouvre en mode modification, mais j'aimerais l'ouvrir en exécution seulement.
Pourrait-on m'aider pour trouver le module pour l'exécution.
Merci d'avance, et meilleures salutations
pgz
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour,
Utilise l'api ShellExecute
Ca donnerait, à copier dans le module du formulaire :
Option Compare Database
Option Explicit
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
Const SW_SHOWNORMAL = 1
Private Sub Commande0_Click()
Dim CheminFichier As String
'Adapter le chemin et le fichier
CheminFichier = "C:Le Tour de France 2008.pps"
ShellExecute Me.hwnd, vbNullString, _
CheminFichier, vbNullString, _
"C:", SW_SHOWNORMAL
End Sub
Bonjour,
J'aimerais pouvoir ouvrir un document PPS depuis un bouton dans un
formulaire Access.
Je suis arrivé à ouvrir powerpoint, mais le document s'ouvre en mode
modification, mais j'aimerais l'ouvrir en exécution seulement.
Pourrait-on m'aider pour trouver le module pour l'exécution.
Merci d'avance, et meilleures salutations
pgz
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Ca donnerait, à copier dans le module du formulaire :
Option Compare Database Option Explicit
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
Const SW_SHOWNORMAL = 1
Private Sub Commande0_Click() Dim CheminFichier As String 'Adapter le chemin et le fichier CheminFichier = "C:Le Tour de France 2008.pps" ShellExecute Me.hwnd, vbNullString, _ CheminFichier, vbNullString, _ "C:", SW_SHOWNORMAL End Sub
Bonjour,
J'aimerais pouvoir ouvrir un document PPS depuis un bouton dans un formulaire Access.
Je suis arrivé à ouvrir powerpoint, mais le document s'ouvre en mode modification, mais j'aimerais l'ouvrir en exécution seulement.
Pourrait-on m'aider pour trouver le module pour l'exécution.
Merci d'avance, et meilleures salutations
pgz
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Michel_D
Bonjour,
"pag" a écrit dans le message de news:48119cda$
Bonjour,
J'aimerais pouvoir ouvrir un document PPS depuis un bouton dans un formulaire Access.
Je suis arrivé à ouvrir powerpoint, mais le document s'ouvre en mode modification, mais j'aimerais l'ouvrir en exécution seulement.
Pourrait-on m'aider pour trouver le module pour l'exécution.
Merci d'avance, et meilleures salutations
pgz
Code à positionner sur le click de ton bouton.
Dim oShell As Object Set oShell=CreateObject("WScript.Shell") oShell.Run "TonCheminTonFichier.pps" Set oShell=Nothing
Bonjour,
"pag" <pa.gardaz@bluewin.ch> a écrit dans le message de news:48119cda$1_2@news.bluewin.ch...
Bonjour,
J'aimerais pouvoir ouvrir un document PPS depuis un bouton dans un
formulaire Access.
Je suis arrivé à ouvrir powerpoint, mais le document s'ouvre en mode
modification, mais j'aimerais l'ouvrir en exécution seulement.
Pourrait-on m'aider pour trouver le module pour l'exécution.
Merci d'avance, et meilleures salutations
pgz
Code à positionner sur le click de ton bouton.
Dim oShell As Object
Set oShell=CreateObject("WScript.Shell")
oShell.Run "TonCheminTonFichier.pps"
Set oShell=Nothing