Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action.
Private Sub btnMailMergeEarly_Click() Dim wdApp As Word.Application Dim wdDoc As Word.Document Set wdApp = New Word.Application wdApp.Visible = True Set wdDoc = wdApp.Documents.Open("P:\Access Database\Contracts\BananaCt.doc") wdDoc.MailMerge.Execute wdApp.ActiveDocument.Protect wdAllowOnlyReading, , "jsic2633" wdApp.ActiveDocument.SaveAs "C:\My Documents\Bananas.doc" wdDoc.Close False Set wdDoc = Nothing wdApp.Quit Set wdApp = Nothing End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Simple IF statement in Word||4||53|
|MS Word Bookmarks||6||42|
|create different version if file exists||1||44|
|Ranking Students in a normalised Ms Access Database (Ms Access 2010)||7||64|
Join the community of 500,000 technology professionals and ask your questions.