Bouton qui ouvre un programme ?

keurma · 6 Décembre 2007

Bonjour,

Comment crée un bouton qui ouvre un programme tel que WORD par exemple ?

RENAUDER · 6 Décembre 2007

Re : Bouton qui ouvre un programme ?

Bonjour,
Tu crées un bouton sur ta feuille et tu lui associes la macro OuvreWord

Code:

Sub OuvreWord()
    Dim RetVal
    ' Exécute Word.
    RetVal = Shell("WINWORD.EXE", 1)
End Sub

skoobi · 6 Décembre 2007

Re : Bouton qui ouvre un programme ?

Bonjour,

tu associe ce code au bouton:

Code:

Sub ouvre_word()
Dim App As word.Application
Set App = CreateObject("word.application")

App.Visible = True
App.Activate
App.Documents.Open Filename:="ton fichier", Visible:=True, ReadOnly:=True
End Sub

Bouton qui ouvre un programme ?

keurma

XLDnaute Occasionnel

RENAUDER

Nous a quitté

skoobi

XLDnaute Barbatruc

Discussions similaires

Bouton qui ouvre un programme ?

keurma

XLDnaute Occasionnel

RENAUDER

Nous a quitté

skoobi

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency