Results 1 to 4 of 4
  1. #1
    Super Moderator RetiredGeek's Avatar
    Join Date
    Mar 2004
    Location
    Manning, South Carolina
    Posts
    6,193
    Thanks
    201
    Thanked 784 Times in 718 Posts
    Hello All,

    I have the following code:
    Code:
           Set miMail = appOL.CreateItem(olMailItem)
           With miMail
               .To = rst![EMail]
               .Subject = "WPOA Annual Dues Statement: " & rst![OwnerLName]
               .Body = zMsgBody & "Bill" & Trim(Str(rst![OwnerID])) & _
                       " Owner: " & rst![OwnerLName]
               .ReadReceiptRequested = True
               zAttFN = zBillPath & "Bill" & _
                        Trim(Str(rst![OwnerID])) & ".pdf"
               Set oMyAtt = miMail.Attachments.Add(zAttFN)
               .Save
           End With   'miMail
    
           Set miMail = Nothing
    That is working just fine. I would like to add to it to create the email with an existing Stationary. I've searched but can't find a property or method to handle this. Any Ideas?
    May the Forces of good computing be with you!

    RG

    VBA Rules!

    My Systems: Desktop Specs
    Laptop Specs


  2. Get our unique weekly Newsletter with tips and techniques, how to's and critical updates on Windows 7, Windows 8, Windows XP, Firefox, Internet Explorer, Google, etc. Join our 480,000 subscribers!

    Excel 2013: The Missing Manual

    + Get this BONUS — free!

    Get the most of Excel! Learn about new features, basics of creating a new spreadsheet and using the infamous Ribbon in the first chapter of Excel 2013: The Missing Manual - Subscribe and download Chapter 1 for free!

  3. #2
    Super Moderator jscher2000's Avatar
    Join Date
    Feb 2001
    Location
    Silicon Valley, USA
    Posts
    23,112
    Thanks
    5
    Thanked 93 Times in 89 Posts
    Quote Originally Posted by RetiredGeek View Post
    I would like to add to it to create the email with an existing Stationary. I've searched but can't find a property or method to handle this. Any Ideas?
    Probably easiest to create a new message using your stationery and save it as an OFT file, then use the CreateItemFromTemplate() method.

  4. #3
    Super Moderator RetiredGeek's Avatar
    Join Date
    Mar 2004
    Location
    Manning, South Carolina
    Posts
    6,193
    Thanks
    201
    Thanked 784 Times in 718 Posts
    Jefferson,

    I found thison the MSDN site. However, I have a sample of the stationary already in Outlook I created a new email with it and tried to save it as an .OFT file but there is no option to do so on the Filetype dropdown in Outlook 2003 using Word as my Email editor. The stationary is basically a letterhead with text and a graphic. So how do I get this existing stationary saved as an .OFT file?
    May the Forces of good computing be with you!

    RG

    VBA Rules!

    My Systems: Desktop Specs
    Laptop Specs


  5. #4
    Super Moderator jscher2000's Avatar
    Join Date
    Feb 2001
    Location
    Silicon Valley, USA
    Posts
    23,112
    Thanks
    5
    Thanked 93 Times in 89 Posts
    Quote Originally Posted by RetiredGeek View Post
    I created a new email with it and tried to save it as an .OFT file but there is no option to do so on the Filetype dropdown in Outlook 2003 using Word as my Email editor.
    Uhhhhh.... that is a scenario I have not explored. Perhaps when Word is your editor there is some other preferred format???

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •