Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Outlook importer un fichier *oft dans outlook

  • Initiateur de la discussion Initiateur de la discussion eastwick
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

eastwick

XLDnaute Accro
Bonjour à tous,
J'ai un fichier *oft dans C:\Users\prenom.nom\AppData\Roaming\Microsoft\Templates. Ce fichier est un mail type sans destinataire saisi mais avec déjà du texte et des destinataires en copie.
J'aimerais l'importer dans Outlook 2016 ou, encore mieux, le mettre dans le ruban en tâche rapide.
Merci !
 
Solution
Bonjour,
Insérer le code ci-contre dans un module d'outlook :
Renseigner les Dossier et Modèle .
VB:
Sub GetModele()
    Dossier = "D:\........\Documents\Courrier\"
    Modele = "messageamoi.oft"
    CreateItemFromTemplate(Dossier & Modele, _
        Session.GetDefaultFolder(olFolderDrafts)).Display
End Sub
Lancer la personnalisation du Ruban
Créer un nouveau groupe à l'endroit désiré
Renommer le groupe,
choisir une icone
et faire Ok
Choisir la catégorie Macros
Sélectionner le code créé
faire ajouter dans le groupe créé
Faire renommer ...
bonjour
pour l'ouvrir il faut aller dans les options, personnaliser le ruban et cocher développeur.
tu cliques sur développeur, choisir un formulaire
et tu sélectionnes modèles dans le fichier système et ouvrir

 
Dernière édition:
Bonjour,
Insérer le code ci-contre dans un module d'outlook :
Renseigner les Dossier et Modèle .
VB:
Sub GetModele()
    Dossier = "D:\........\Documents\Courrier\"
    Modele = "messageamoi.oft"
    CreateItemFromTemplate(Dossier & Modele, _
        Session.GetDefaultFolder(olFolderDrafts)).Display
End Sub
Lancer la personnalisation du Ruban
Créer un nouveau groupe à l'endroit désiré
Renommer le groupe,
choisir une icone
et faire Ok
Choisir la catégorie Macros
Sélectionner le code créé
faire ajouter dans le groupe créé
Faire renommer ,
choisir une icone pour le code
faire ok
faire ok sur la fenêtre des options
Vous avez maintenant un raccourci sur la barre vers votre modèle
 

Pièces jointes

  • 1760088320124.png
    21.5 KB · Affichages: 5

Bonjour et merci, mon code ne fonctionne pas :
Sub GetModele()
Dossier = "C:\Users\dimitri.derock\AppData\Roaming\Microsoft\Templates\"
Modele = "mandatement_GHSC.oft"
CreateItemFromTemplate(Dossier & Modele, _
Session.GetDefaultFolder(olFolderDrafts)).Display
End Sub

Voyez-vous où ça coince ???
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
2
Affichages
947
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…