Lancer une macro depuis bureau
Résolu
NLAH
Messages postés
135
Statut
Membre
-
NLAH Messages postés 135 Statut Membre -
NLAH Messages postés 135 Statut Membre -
Bonjour,
j'aimerai bien savoir si c'est possible de lancer une macro excel depuis une icone du bureau ?
si oui comment je peux faire?
Merci
j'aimerai bien savoir si c'est possible de lancer une macro excel depuis une icone du bureau ?
si oui comment je peux faire?
Merci
A voir également:
- Macro bureau
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Bureau virtuel windows 10 - Guide
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Mettre icone sur bureau - Guide
1 réponse
Bonjour,
Ce n'est pas le raccourci bureau d'une macro, mais celui d'un classeur.
A mettre dans ThisWorkbook cela mettra le raccourci à l'ouverture du classeur. si tu veux qu'une macro se déclenche à mettre également:
@+ Le Pivert
Ce n'est pas le raccourci bureau d'une macro, mais celui d'un classeur.
A mettre dans ThisWorkbook cela mettra le raccourci à l'ouverture du classeur. si tu veux qu'une macro se déclenche à mettre également:
Option Explicit
Private Sub Workbook_Open()
Dim scrHst, emplacement, raccourci
Set scrHst = CreateObject("WScript.Shell")
emplacement = scrHst.SpecialFolders("Desktop")
Set raccourci = scrHst.CreateShortcut(emplacement & "\" & WorksheetFunction.Substitute(ThisWorkbook.Name, ".xls", ".lnk")) 'adapter l'extension
raccourci.WorkingDirectory = emplacement
raccourci.TargetPath = ActiveWorkbook.FullName
raccourci.Save
Set raccourci = Nothing
Set scrHst = Nothing
mamacro 'ta macro
End Sub
Sub mamacro()
MsgBox "Ma macro"
End Sub
@+ Le Pivert
NLAH
Messages postés
135
Statut
Membre
2
Je vous remercie, ca marche :)