Dear Mas Lukas, untuk mencetak dan mengulang dua hal yang sama di dalam report Access, maka diperlukan VBA saat event On Print, yang mana dia akan mengulang current object / current record di print preview, kemudian baru beralih ke record berikutnya. Sebagai contoh, saya buat suatu Work Order sbb:
Kemudian saya preview label karton tersebut agar berjumlah 6 label dalam satu halaman, maka hasilnya adalah sbb:
Perhatikan report tsb, dalam satu halaman diulang sebanyak 6 kali. Bila 6 kali pengulangan saja bisa, maka dua kali pengulangan Insya Allah bisa juga, atau bahkan lebih dari 6 kali. Adapun tekhniknya adalah sbb:
- Pada report design, pilih bagian object report "Detail".
- Pada properties On Print, beri kode sbb (misal nama field Jumlah Label nya adalah N_Unit):
Private Sub Unit_Print(Cancel As Integer, PrintCount As Integer)
On Error GoTo errormsg
With Me
If N_Unit = 0 Then ' misal nama field-nya N_Unit
.NextRecord = True
.MoveLayout = False
.PrintSection = False
Else
If PrintCount < N_Unit Then
.NextRecord = False
End If
End If
End With
GoTo nol
errormsg:
MsgBox "Jumlah yang mau diprintnya tidak boleh nol atau kosong"
nol:
End Sub
Sofyan Efendi
http://imopi.wordpress.com | http://trendmuslim.com
Belajar Access Offline & Online: http://wp.me/PW3LC-hR
>
> Apakah memungkinkan membuat double report dalam satu halaman, jadi biasanya hasil print cuma 1/2 dari kertas A4 menggunakan printer dot matrik dan hasilnya jadi dua karena pakai karbon gitu tapi karena ingin beralih keprinter tinta maka daripada print dua kali mending cukup satu kali tapi sudah dua report identik di dalamnya, toh hasilnya sudah di pantek untuk ukuran 1/2 A4.
> Terimakasih sarannya
>
>
>
> ------------------------------------
>
> SPAM IS PROHIBITEDYahoo! Groups Links
>
> <*> To visit your group on the web, go to:
> http://groups.yahoo.com/group/belajar-access/
>
> <*> Your email settings:
> Individual Email | Traditional
>
> <*> To change settings online go to:
> http://groups.yahoo.com/group/belajar-access/join
> (Yahoo! ID required)
>
> <*> To change settings via email:
> belajar-access-digest@yahoogroups.com
> belajar-access-fullfeatured@yahoogroups.com
>
> <*> To unsubscribe from this group, send an email to:
> belajar-access-unsubscribe@yahoogroups.com
>
> <*> Your use of Yahoo! Groups is subject to:
> http://docs.yahoo.com/info/terms/
>
Reply via web post | Reply to sender | Reply to group | Start a New Topic | Messages in this topic (3) |
No comments:
Post a Comment