VBA - OUTLOOK Task : paste format RTF

Collapse
This topic is closed.
X
X
 
  • Time
  • Show
Clear All
new posts
  • MoiOmoi

    VBA - OUTLOOK Task : paste format RTF

    Bonjour,
    Quelqu'un aurait-il une idée pour progammer le collage, en provenance du
    presse papier, d'un document Word vers une demande de tâches Outlook ?

    voici ce que j'ai essayé d'utiliser à partir de VBA pour Word:


    Selection.Copy 'copie du document word

    Set OutApp = CreateObject("O utlook.Applicat ion")
    Set OutTask = OutApp.CreateIt em(3) ' Création d'une demande de Tâche

    OutTask.body.Pa steSpecial(0, False, wdInLine, False, wdPasteRTF, False,
    False)

    et ça ne marche pas...
    la seule chose qui fonctionne pour l'instant c'est :

    OutTask.body = ActiveDocument. Content

    Mais ça ne concerve pas le format RTF avec la mise en forme et les
    tableaux.......

    Merci de laisser une réponse.


Working...