Userform dans Word

Gerpow -  
 pom -
Bonjour à tous,

Je m'essaye à la création de userform dans Word pour placer des signets.
Je suis assez content du résulat, pour autant il me reste un problème à résoudre avant d'avoir terminer.

Je n'arrive pas avec un bouton à fermer la userform, lancer l'impression du document et ouvrir la boite de dialogue "enregistrer sous".

Si parmi vous quelqu'un avait la solution ce serait fantastique.

Un grand merci par avance pour vos aides et contributions.

Excellente fin de journée,

Gerpow
Configuration: Windows XP
Word 2000

4 réponses

  1. m@rina Messages postés 27590 Date d'inscription   Statut Modérateur Dernière intervention   11 563
     
    Bonjour,

    Pour afficher la boîte de dialogue Enregistrer sous, c'est :
    Application.Dialogs.Item(wdDialogFileSaveAs).Show

    Pour imprimer c'est
    ActiveDocument.PrintOut

    Pour fermer la Userform, tu dois la cacher :
    Userform.Hide

    Regarde sur mon site, tout est expliqué pour créer une Userform avec Word :
    http://faqword.free.fr/anacoluthe1/didacticiel_userform.pdf

    m@rina
    2
    1. gerpow Messages postés 7 Statut Membre
       
      M@rina, Un grand merci pour ton coup de main, tout fonctionne parfaitement !

      Puis je me permettre de te demander une dernière info :) ?

      Je n'arrive pas à insérer une liste déroulante dans ma userform qui permettrait en fonction du choix dans la liste de remplacer un signet dans le document. Aurais tu par hasard une idée ?

      Encore une fois merci et bonne journée,

      Gerpow
      0
  2. m@rina Messages postés 27590 Date d'inscription   Statut Modérateur Dernière intervention   11 563
     
    Bonjour Gerpow

    Les signets sont toujours délicats à manipuler dans Word.
    Mais si tu regardes l'exemple que je t'ai donné, cet aspect est traité.
    Regarde la variable de la Combobox Répondeur qui remplit le signet.

    Pour que le signet existant ne soit pas effacé, il faut recourir au code qui est inscrit tout en bas de la page.
    Tu peux télécharger le fichier avec la macro là :
    http://faqword.free.fr/download.php?lng=fr&pg=1444

    m@rina
    1
    1. pom
       
      Bonjour
      Ta petite recette m'a beaucoup aidé pour un projet professionnel.
      Mais il me reste un petit ennui : la fenêtre ne s'ouvre pas automatiquement au lancement d'un nouveau document à partir du modèle .dot...
      J'en profite pour te poser une autre question.
      Comment est-ce que je peux appliquer le même Userform à d'autres modèles .dot (sorte de copier coller) ?
      Merci encore de ton aide.
      Guillaume
      0
  3. m@rina Messages postés 27590 Date d'inscription   Statut Modérateur Dernière intervention   11 563
     
    Bonjour,

    Je ne comprends pas bien ce que tu veux faire...

    Si l'utilisateur choisit une valeur de la combobox, cette valeur devra être affectée à un signet existant ???
    Peux tu être plus précis ?

    m@rina
    0
  4. gerpow Messages postés 7 Statut Membre
     
    C'est cela.

    Exemple : j'ai une combobox avec les valeur suivante : Madame, Monsieur, Mademoiselle

    En fonction de mon choix Madame, Monsieur ou Mademoiselle sera inséré dans le texte.

    J'en profite avec une 2e et dernière question. Si je choisi Madame, un autre signet sera rempli avec une autre valeur que le mot "Madame" mais avecf une valeur que j'aurai déterminé.

    En espérant être assez clair,

    Merci encore,

    Gerpow
    0