OVH Cloud OVH Cloud

Raccourci de fichiers créés par Access

3 réponses
Avatar
Phil
Bonjour,
J'ai posé une question, il y a 2 semaines et Raymond m'a aidé.
Dans son exemple, les raccourcis ne peuvent être créés que dans Bureau,
Programme ou Documents.
Comment procéder pour aller dans un répertoire bien précis (variable) ?
Merci d'avance.

3 réponses

Avatar
Raymond [mvp]
Il faut que tu modifies un peu la procédure, pour que la variable W_desk
contienne le nom du chemin
Set oShortCut = oShell.CreateShortcut(W_desk & "" & W_Nom & ".lnk")
tel que , par exemple:
Set oShortCut = oShell.CreateShortcut("c:essais" & "" & W_Nom &
".lnk")

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Phil" a écrit dans le message de news:

Bonjour,
J'ai posé une question, il y a 2 semaines et Raymond m'a aidé.
Dans son exemple, les raccourcis ne peuvent être créés que dans Bureau,
Programme ou Documents.
Comment procéder pour aller dans un répertoire bien précis (variable) ?
Merci d'avance.


Avatar
Philippe [EProM]
Salut Raymond,
Ca marche.
J'aurai aimé ne pas donner la variable dans le module class mais c'est bon.
Merci pour tout,


Il faut que tu modifies un peu la procédure, pour que la variable W_desk
contienne le nom du chemin
Set oShortCut = oShell.CreateShortcut(W_desk & "" & W_Nom & ".lnk")
tel que , par exemple:
Set oShortCut = oShell.CreateShortcut("c:essais" & "" & W_Nom &
".lnk")

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Phil" a écrit dans le message de news:

Bonjour,
J'ai posé une question, il y a 2 semaines et Raymond m'a aidé.
Dans son exemple, les raccourcis ne peuvent être créés que dans Bureau,
Programme ou Documents.
Comment procéder pour aller dans un répertoire bien précis (variable) ?
Merci d'avance.







Avatar
Raymond [mvp]
La fonction a été modifiée et le raccourci peut être créé dans n'importe
quel dossier.
http://officesystem.access.free.fr/vba/creation_raccourci.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Philippe [EProM]" a écrit dans le
message de news:
Salut Raymond,
Ca marche.
J'aurai aimé ne pas donner la variable dans le module class mais c'est
bon.
Merci pour tout,


Il faut que tu modifies un peu la procédure, pour que la variable W_desk
contienne le nom du chemin
Set oShortCut = oShell.CreateShortcut(W_desk & "" & W_Nom & ".lnk")
tel que , par exemple:
Set oShortCut = oShell.CreateShortcut("c:essais" & "" & W_Nom &
".lnk")

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Phil" a écrit dans le message de news:

Bonjour,
J'ai posé une question, il y a 2 semaines et Raymond m'a aidé.
Dans son exemple, les raccourcis ne peuvent être créés que dans Bureau,
Programme ou Documents.
Comment procéder pour aller dans un répertoire bien précis (variable) ?
Merci d'avance.