Re: [belajar-access] Re: Word dan Access

Dear P. Sudarsono,
Sumbang ide berdasarkan: http://support.microsoft.com/kb/209976

Dikasih fungsi berikut:

Function MergeIt()    Dim objWord As Word.Document    Set objWord = GetObject("C:\MyMerge.doc", "Word.Document")    ' Make Word visible.    objWord.Application.Visible = True    ' Set the mail merge data source as the Northwind database.    objWord.MailMerge.OpenDataSource Name:="C:\Program Files\Microsoft " & "Office\Office\Samples\Northwind.mdb", _       LinkToSource:=True, _       Connection:="TABLE Customers", _       SQLStatement:="SELECT * FROM [Customers]"    ' Execute the mail merge.    objWord.MailMerge.Execute End Function 		

Dan untuk ngeprint langsung:

objWord.MailMerge.Destination = wdSendToNewDocument objWord.MailMerge.Execute  'The following line must follow the Execute statement because the 'PrintBackground property is available only when a document window is 'active. Without this line of code, the function will end before Word 'can print the merged document.  objWord.Application.Options.PrintBackground = False objWord.Application.ActiveDocument.PrintOut

Maksudnya, tidak bermain dengan bookmark, tetapi desain reportnya bisa difilter dari access dengan mengatur parameter sqlstatement di filter pada record yang akan dicetak/preview. Template mail-mergenya sudah dibuat cantik dan rapi, tinggal nge-link-kan database ke word tersebut, lalu open langsung dari access.

Thks,
Aksan Kurdin

tambahan link:
http://www.databaseadvisors.com/newsletters/newsletter072002/0207wordautomationlpt1.asp
http://www.databaseadvisors.com/newsletters/newsletter072002/0207wordautomationpt2.asp





On 3/13/2011 6:56 PM, sudarsono wrote:

 

Saya hanya mengirimkan berupa petunjuk saja. Dalam hal ini contoh tak dapat dikirim karena belum dapat ijin dari pembuat aplikasinya .
Dengan petunjuk tsb saya kira cukup jelas dan dapat di praktekkan dgn mudah.

silakan download [BookMark no 30154.pdf] di [Files] [jkssbma] [word]

'====
Pak aksan : saya khan berguru dari Bapak.
Pembuat aplikasi : saya terima kasih karena dikirim contoh , untuk di
kembangkan.

--- In belajar-access@yahoogroups.com, Aksan Kurdin <aksan.kurdin@...> wrote:
>
> Dear P. Sudarsono,
> Pakar lagi nguji ....
> hehehehe.....
>
>
> Aksan Kurdin
> On 3/13/2011 9:34 AM, sudarsono wrote:
> >
> > Mungkin sering kita menggunakan Word sebagai sarana yang ampuh dalam
> > membuat surat. Integrasi antara Word dan Access terwujud dengan
> > MailMerge . Tapi bagaimana cara agar laporan yang berbentuk dokumen
> > word dengan data dari acces langsung diprint melalui aplikasi Access ?
> >
> > ** karena berkaitan dengan nomor posting maka file screen shoot saya
> > pending . Jika sudah ada nomor posting baru saya kirim ke [Files]
> > [jkssbma] [word]. Sabar yaa...
> >
> >
>

__._,_.___

SPAM IS PROHIBITED

Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___