OVH Cloud OVH Cloud

PB VBA

4 réponses
Avatar
fish
En VBA, j'ai cr=E9=E9 un Userform demandant =E0 l'utilisateur=20
de s=E9lectionner un type de document (lettre, compte-rendu=20
de r=E9union etc...). La s=E9lection se fait avec des=20
OptionButtons.
Chaque OptionButton a le code suivant :
Private Sub OptionButton1
Unload choix (nom de la userform)
ChangeFileOpenDirectory "C:\mod=E8les"
Documents.Open FileName : =3D "Lettre.dot"
End Sub
Le probl=E8me, c'est que c'est le mod=E8le Lui m=EAme qui=20
s'ouvre et non un document bas=E9 sur ce mod=E8le. (Chaque=20
mod=E8le poss=E8de l'instruction Private Sub Document_New)
Comment faire pour que ce soit un .doc qui s'ouvre et=20
bas=E9 sur le mod=E8le correspondant ?
Par avance Merci

4 réponses

Avatar
Bonjour Fisch,
Documents.Add Template:="C:modèleLettre.dot"
Philippe

"fish" a écrit dans le message de
news:10c3901c440a0$039296a0$
En VBA, j'ai créé un Userform demandant à l'utilisateur
de sélectionner un type de document (lettre, compte-rendu
de réunion etc...). La sélection se fait avec des
OptionButtons.
Chaque OptionButton a le code suivant :
Private Sub OptionButton1
Unload choix (nom de la userform)
ChangeFileOpenDirectory "C:modèles"
Documents.Open FileName : = "Lettre.dot"
End Sub
Le problème, c'est que c'est le modèle Lui même qui
s'ouvre et non un document basé sur ce modèle. (Chaque
modèle possède l'instruction Private Sub Document_New)
Comment faire pour que ce soit un .doc qui s'ouvre et
basé sur le modèle correspondant ?
Par avance Merci
Avatar
Fish
Merci, ça marche !

-----Message d'origine-----
Bonjour Fisch,
Documents.Add Template:="C:modèleLettre.dot"
Philippe

"fish" a écrit
dans le message de

news:10c3901c440a0$039296a0$
En VBA, j'ai créé un Userform demandant à l'utilisateur
de sélectionner un type de document (lettre, compte-rendu
de réunion etc...). La sélection se fait avec des
OptionButtons.
Chaque OptionButton a le code suivant :
Private Sub OptionButton1
Unload choix (nom de la userform)
ChangeFileOpenDirectory "C:modèles"
Documents.Open FileName : = "Lettre.dot"
End Sub
Le problème, c'est que c'est le modèle Lui même qui
s'ouvre et non un document basé sur ce modèle. (Chaque
modèle possède l'instruction Private Sub Document_New)
Comment faire pour que ce soit un .doc qui s'ouvre et
basé sur le modèle correspondant ?
Par avance Merci


.



Avatar
JièL Goubert
Bonjoir(c) Philippe Tulliez

Le 23/05/2004 10:45 vous nous disiez ceci :
Bonjour Fisch,
Documents.Add Template:="C:modèleLettre.dot"
Philippe


Tiens, un revenant ;-)))
Bien remis des effluves du Pommard ? ;-)))

--
JièL Pomme Art

Avatar
Bonjour Jièl,
Bien remis merci.
Et encore, je ne te parle pas des effets du marc que j'ai ramené en
réserve.
Philippe

"JièL Goubert" a écrit dans le
message de news:
Bonjoir(c) Philippe Tulliez

Le 23/05/2004 10:45 vous nous disiez ceci :
Bonjour Fisch,
Documents.Add Template:="C:modèleLettre.dot"
Philippe


Tiens, un revenant ;-)))
Bien remis des effluves du Pommard ? ;-)))

--
JièL Pomme Art