Forums before death by AOL, social media and spammers... "We can't have nice things"
|    comp.lang.visual.basic    |    MS Visual Basic discussions, NOT dot-net    |    10,840 messages    |
[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]
|    Message 9,016 of 10,840    |
|    MoiOmoi to All    |
|    VBA - OUTLOOK Task : paste format RTF    |
|    28 Nov 04 19:08:45    |
   
   XPost: no.it.programmering.visual-basic   
   From: stevenx@infonie.fr   
      
   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("Outlook.Application")   
    Set OutTask = OutApp.CreateItem(3) ' Création d'une demande de Tâche   
      
    OutTask.body.PasteSpecial(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.   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   
|
[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]
(c) 1994, bbs@darkrealms.ca