Boite de dialogue executer sans api

Soyez le premier à donner votre avis sur cette source.

Snippet vu 5 933 fois - Téléchargée 71 fois

Contenu du snippet


Source / Exemple :


Private Sub Command1_Click()
Dim ObjExec
Set ObjExec = CreateObject("shell.Application")
ObjExec.filerun
End Sub

A voir également

Ajouter un commentaire

Commentaires

BERU80
Messages postés
19
Date d'inscription
lundi 27 juin 2005
Statut
Membre
Dernière intervention
7 octobre 2008
-
oui bon petit code mais je ne lui trouve d'utilité plus que ça.
arch enemy123456
Messages postés
26
Date d'inscription
jeudi 9 novembre 2006
Statut
Membre
Dernière intervention
8 mai 2007
-
bon travail Christian C bravo
mais svp si vous avez un aidé
moi j ai envi de lancer via une bouton crée sur excel (VBA) une application et executer en meme temps un bouton "play" sur la barre d outil de cette application.
bon pour le lancement de l application c bon voila le code

private sub bouton-comparer_Click()
shell "C:\Program Files\Softinterface, Inc\DiffDoc\DiffDoc.exe"
end sub

mais il me reste l'execution du bouton :( :(
MadM@tt
Messages postés
2215
Date d'inscription
mardi 11 novembre 2003
Statut
Membre
Dernière intervention
16 juillet 2009
-
Merci, c'est simple et efficace (marche sous xp en tout cas)
Drgn13
Messages postés
86
Date d'inscription
vendredi 14 mars 2003
Statut
Membre
Dernière intervention
26 mars 2007
-
je pense que c'est une variable de type object normalement
cs_madVinz
Messages postés
48
Date d'inscription
lundi 22 octobre 2001
Statut
Membre
Dernière intervention
6 août 2002
-
ObjExec c'est quel type de variable ?
joli petit code ;)

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.