Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.
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.
Join the community of 500,000 technology professionals and ask your questions.