![]() |
|
#1
|
||||
|
||||
![]() Unfortunately what you see is what happens with ambiguous dates. The code assumes US format by default. There does not seem to be an easy answer (apart from e.g. using http://www.gmayor.com/ManyToOne.htm to create the PDF and the e-mail). As the date is correct in the merge document, presumably through the use of a formatting switch on the merge field, have you considered reading the value from the merge document, while it is available, and write it to a string. You can then write the string to your e-mail body (and that will retain the format as it is in the document). Code:
Dim strDate As String Dim oFld As Field Set oDoc = ActiveDocument With oDoc .MailMerge.ViewMailMergeFieldCodes = False For Each oFld In .Fields If InStr(1, oFld.code, "MeldeschlussJVA") > 0 Then strDate = oFld.Result Exit For End If Next oFld End With
__________________
Graham Mayor - MS MVP (Word) (2002-2019) Visit my web site for more programming tips and ready made processes www.gmayor.com |
#2
|
|||
|
|||
![]()
Thank you very much for you help. The date is now shown correctly in the mail Body.
|
![]() |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
Numbers are driving me crazy | treadhead194 | Excel | 1 | 02-01-2016 09:15 AM |
![]() |
mrush | Word | 4 | 10-16-2015 10:13 PM |
Audio problem thats driving me crazy | pcbguy | PowerPoint | 10 | 04-26-2012 08:56 AM |
A number of issues driving me crazy | seanterry125 | PowerPoint | 0 | 01-17-2011 04:46 PM |
Outlook Journal is Driving me Crazy | lujreyes | Outlook | 0 | 11-24-2010 05:21 PM |