copie ce code dans le module de classe ThisWorkbook de ce classeur et place un racourci sur le bureau pointant vers ce classeur.
Private Sub Workbook_Open() Sheets("Feuil2").Select End Sub
isabelle
Bonjour,
Je souhaite créer un raccourci Windows vers un onglet spécifique d'un classeur Excel.
Qq un saurait-il comment faire ?
D'avance merci
enguerrand
Ricky [MVP]
Bonjour ** (et tous les lecteurs) | Bonjour, | Je souhaite créer un raccourci Windows vers un onglet | spécifique d'un classeur Excel. | Qq un saurait-il comment faire ? | D'avance merci | enguerrand
Qqun dernièrement a donné cette solution en vbs Un simple fichier texte.vbs qui contient ceci
Set xl = WScript.CreateObject("excel.Application") set fich=xl.workbooks.open("C:Chemin completFichier.XLS") fich.sheets(1).select ;(1) = position de l'onglet dans le classeur xl.visible=true wscript.quit
Bonjour *edc@axone-group.com* (et tous les lecteurs)
| Bonjour,
| Je souhaite créer un raccourci Windows vers un onglet
| spécifique d'un classeur Excel.
| Qq un saurait-il comment faire ?
| D'avance merci
| enguerrand
Qqun dernièrement a donné cette solution en vbs
Un simple fichier texte.vbs qui contient ceci
Set xl = WScript.CreateObject("excel.Application")
set fich=xl.workbooks.open("C:Chemin completFichier.XLS")
fich.sheets(1).select ;(1) = position de l'onglet dans le classeur
xl.visible=true
wscript.quit
Bonjour ** (et tous les lecteurs) | Bonjour, | Je souhaite créer un raccourci Windows vers un onglet | spécifique d'un classeur Excel. | Qq un saurait-il comment faire ? | D'avance merci | enguerrand
Qqun dernièrement a donné cette solution en vbs Un simple fichier texte.vbs qui contient ceci
Set xl = WScript.CreateObject("excel.Application") set fich=xl.workbooks.open("C:Chemin completFichier.XLS") fich.sheets(1).select ;(1) = position de l'onglet dans le classeur xl.visible=true wscript.quit
Me semblait bien aussi que j'étais dans les patates !
Serge
"Ricky [MVP]" a écrit dans le message de news: ednX#
Bonjour ** (et tous les lecteurs) | Bonjour, | Je souhaite créer un raccourci Windows vers un onglet | spécifique d'un classeur Excel. | Qq un saurait-il comment faire ? | D'avance merci | enguerrand
Qqun dernièrement a donné cette solution en vbs Un simple fichier texte.vbs qui contient ceci
Set xl = WScript.CreateObject("excel.Application") set fich=xl.workbooks.open("C:Chemin completFichier.XLS") fich.sheets(1).select ;(1) = position de l'onglet dans le classeur
Me semblait bien aussi que j'étais dans les patates !
Serge
"Ricky [MVP]" <ricky@la_niche.be> a écrit dans le message de news:
ednX#Tu1DHA.1684@TK2MSFTNGP12.phx.gbl...
Bonjour *edc@axone-group.com* (et tous les lecteurs)
| Bonjour,
| Je souhaite créer un raccourci Windows vers un onglet
| spécifique d'un classeur Excel.
| Qq un saurait-il comment faire ?
| D'avance merci
| enguerrand
Qqun dernièrement a donné cette solution en vbs
Un simple fichier texte.vbs qui contient ceci
Set xl = WScript.CreateObject("excel.Application")
set fich=xl.workbooks.open("C:Chemin completFichier.XLS")
fich.sheets(1).select ;(1) = position de l'onglet dans le
classeur
Me semblait bien aussi que j'étais dans les patates !
Serge
"Ricky [MVP]" a écrit dans le message de news: ednX#
Bonjour ** (et tous les lecteurs) | Bonjour, | Je souhaite créer un raccourci Windows vers un onglet | spécifique d'un classeur Excel. | Qq un saurait-il comment faire ? | D'avance merci | enguerrand
Qqun dernièrement a donné cette solution en vbs Un simple fichier texte.vbs qui contient ceci
Set xl = WScript.CreateObject("excel.Application") set fich=xl.workbooks.open("C:Chemin completFichier.XLS") fich.sheets(1).select ;(1) = position de l'onglet dans le classeur
Bonsoir Ricky; Cela ne répond qu'en partie à la question; il faut 2 fichiers .vbs Un pour créer le raccourci et un pour ouvrir le fichier (celui que tu décris).
StrDesktop = WshShell.SpecialFolders("Desktop") Set oShellLink = WshShell.CreateShortcut(StrDesktop & "MonFichier.lnk") oShellLink.TargetPath = "Ici le chemin complet du fichier vbs qui ouvre le fichier excel" oShellLink.WindowStyle = 1 oShellLink.Hotkey = "CTRL+SHIFT+G" oShellLink.IconLocation = Excel.exe, 0" oShellLink.Description = "Ouverture de mon fichier préféré" oShellLink.WorkingDirectory = "Répertoire de mon fichier Excel" oShellLink.Save
MP
"Ricky [MVP]" a écrit dans le message de news:ednX%
Bonjour ** (et tous les lecteurs) | Bonjour, | Je souhaite créer un raccourci Windows vers un onglet | spécifique d'un classeur Excel. | Qq un saurait-il comment faire ? | D'avance merci | enguerrand
Qqun dernièrement a donné cette solution en vbs Un simple fichier texte.vbs qui contient ceci
Set xl = WScript.CreateObject("excel.Application") set fich=xl.workbooks.open("C:Chemin completFichier.XLS") fich.sheets(1).select ;(1) = position de l'onglet dans le classeur
Bonsoir Ricky;
Cela ne répond qu'en partie à la question; il faut 2 fichiers .vbs
Un pour créer le raccourci et un pour ouvrir le fichier (celui que tu
décris).
StrDesktop = WshShell.SpecialFolders("Desktop")
Set oShellLink = WshShell.CreateShortcut(StrDesktop & "MonFichier.lnk")
oShellLink.TargetPath = "Ici le chemin complet du fichier vbs qui ouvre le
fichier excel"
oShellLink.WindowStyle = 1
oShellLink.Hotkey = "CTRL+SHIFT+G"
oShellLink.IconLocation = Excel.exe, 0"
oShellLink.Description = "Ouverture de mon fichier préféré"
oShellLink.WorkingDirectory = "Répertoire de mon fichier Excel"
oShellLink.Save
MP
"Ricky [MVP]" <ricky@la_niche.be> a écrit dans le message de
news:ednX%23Tu1DHA.1684@TK2MSFTNGP12.phx.gbl...
Bonjour *edc@axone-group.com* (et tous les lecteurs)
| Bonjour,
| Je souhaite créer un raccourci Windows vers un onglet
| spécifique d'un classeur Excel.
| Qq un saurait-il comment faire ?
| D'avance merci
| enguerrand
Qqun dernièrement a donné cette solution en vbs
Un simple fichier texte.vbs qui contient ceci
Set xl = WScript.CreateObject("excel.Application")
set fich=xl.workbooks.open("C:Chemin completFichier.XLS")
fich.sheets(1).select ;(1) = position de l'onglet dans le
classeur
Bonsoir Ricky; Cela ne répond qu'en partie à la question; il faut 2 fichiers .vbs Un pour créer le raccourci et un pour ouvrir le fichier (celui que tu décris).
StrDesktop = WshShell.SpecialFolders("Desktop") Set oShellLink = WshShell.CreateShortcut(StrDesktop & "MonFichier.lnk") oShellLink.TargetPath = "Ici le chemin complet du fichier vbs qui ouvre le fichier excel" oShellLink.WindowStyle = 1 oShellLink.Hotkey = "CTRL+SHIFT+G" oShellLink.IconLocation = Excel.exe, 0" oShellLink.Description = "Ouverture de mon fichier préféré" oShellLink.WorkingDirectory = "Répertoire de mon fichier Excel" oShellLink.Save
MP
"Ricky [MVP]" a écrit dans le message de news:ednX%
Bonjour ** (et tous les lecteurs) | Bonjour, | Je souhaite créer un raccourci Windows vers un onglet | spécifique d'un classeur Excel. | Qq un saurait-il comment faire ? | D'avance merci | enguerrand
Qqun dernièrement a donné cette solution en vbs Un simple fichier texte.vbs qui contient ceci
Set xl = WScript.CreateObject("excel.Application") set fich=xl.workbooks.open("C:Chemin completFichier.XLS") fich.sheets(1).select ;(1) = position de l'onglet dans le classeur
Bonjour *Michel Pierron* (et tous les lecteurs) | Bonsoir Ricky; | Cela ne répond qu'en partie à la question; il faut 2 fichiers .vbs | Un pour créer le raccourci et un pour ouvrir le fichier (celui que tu | décris).
Vu comme ça .... Moi je voyais la création du raccourci par un clic droit / Nouveau / Raccourci et pointer vers le fichier VBS Et pas comme une macro commande qui crée le raccourci.
Bonjour *Michel Pierron* (et tous les lecteurs)
| Bonsoir Ricky;
| Cela ne répond qu'en partie à la question; il faut 2 fichiers .vbs
| Un pour créer le raccourci et un pour ouvrir le fichier (celui que tu
| décris).
Vu comme ça ....
Moi je voyais la création du raccourci par un clic droit / Nouveau / Raccourci et pointer vers le fichier VBS
Et pas comme une macro commande qui crée le raccourci.
Bonjour *Michel Pierron* (et tous les lecteurs) | Bonsoir Ricky; | Cela ne répond qu'en partie à la question; il faut 2 fichiers .vbs | Un pour créer le raccourci et un pour ouvrir le fichier (celui que tu | décris).
Vu comme ça .... Moi je voyais la création du raccourci par un clic droit / Nouveau / Raccourci et pointer vers le fichier VBS Et pas comme une macro commande qui crée le raccourci.
