OVH Cloud OVH Cloud

Ouvrir un Modèle.xlt Excel via VBA

5 réponses
Avatar
Newbie
Bonjour,

Une procédure VBA, qui ouvre un modèle Excel, doit pouvoir s'exécuter sur
tous les PCs d'un service.
Y a-t'il une fonction VBA qui permet de connaître le chemin d'accès aux
Modèles créés sur le PC en cours ?
Merci d'avance,

Newbie

5 réponses

Avatar
lSteph
Bonjour,
Cela peut dépendre de la version et récemment du Username:

C:Documents and Settingsnom_utilisateurApplication
DataMicrosoftModèleslefichier.xlt

'lSteph

"Newbie" a écrit dans le message de news:
%
Bonjour,

Une procédure VBA, qui ouvre un modèle Excel, doit pouvoir s'exécuter sur
tous les PCs d'un service.
Y a-t'il une fonction VBA qui permet de connaître le chemin d'accès aux
Modèles créés sur le PC en cours ?
Merci d'avance,

Newbie




Avatar
Youky
Autre solution que xlt
tu mets dans une feuille un bouton et copie le code ci-dessous
une autre feuille ou est ton modele , tu nommes cet onglet <<modele>>
click sur le bouton, une copie du modele s'ouvre, à l'utilisateur de voir
s'il veut enregistrer ou fermer
la feuille modele resteras masquée, et inaccessible si le classeur est
protégé
de plus rien n'empêche de mettre un N°unique ou autre à chaque lancement

fichier = ThisWorkbook.Name
Application.ScreenUpdating = False
Sheets("modele").Visible = True
Sheets("modele").Select
Sheets("modele").Copy
'Sheets("modele").Name = "F" & nf
Workbooks(fichier).Sheets("modele").Visible = False
Application.ScreenUpdating = True

Youky

"Newbie" a écrit dans le message de news:
%
Bonjour,

Une procédure VBA, qui ouvre un modèle Excel, doit pouvoir s'exécuter sur
tous les PCs d'un service.
Y a-t'il une fonction VBA qui permet de connaître le chemin d'accès aux
Modèles créés sur le PC en cours ?
Merci d'avance,

Newbie




Avatar
Newbie
Suggestion très interessante!
Merci Youki

"Youky" a écrit dans le message de
news:
Autre solution que xlt
tu mets dans une feuille un bouton et copie le code ci-dessous
une autre feuille ou est ton modele , tu nommes cet onglet <<modele>>
click sur le bouton, une copie du modele s'ouvre, à l'utilisateur de voir
s'il veut enregistrer ou fermer
la feuille modele resteras masquée, et inaccessible si le classeur est
protégé
de plus rien n'empêche de mettre un N°unique ou autre à chaque lancement

fichier = ThisWorkbook.Name
Application.ScreenUpdating = False
Sheets("modele").Visible = True
Sheets("modele").Select
Sheets("modele").Copy
'Sheets("modele").Name = "F" & nf
Workbooks(fichier).Sheets("modele").Visible = False
Application.ScreenUpdating = True

Youky

"Newbie" a écrit dans le message de news:
%
Bonjour,

Une procédure VBA, qui ouvre un modèle Excel, doit pouvoir s'exécuter
sur


tous les PCs d'un service.
Y a-t'il une fonction VBA qui permet de connaître le chemin d'accès aux
Modèles créés sur le PC en cours ?
Merci d'avance,

Newbie








Avatar
JLuc
*Bonjour Newbie*,
Autre solution :
MsgBox Application.TemplatesPath


Bonjour,

Une procédure VBA, qui ouvre un modèle Excel, doit pouvoir s'exécuter sur
tous les PCs d'un service.
Y a-t'il une fonction VBA qui permet de connaître le chemin d'accès aux
Modèles créés sur le PC en cours ?
Merci d'avance,

Newbie


--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O

Avatar
Newbie
<<MsgBox Application.TemplatesPath>>

Merci JLuc,
C'est exactement ce que je cherchais
Merci encore