You have multiple accounts
Choose the account you want to sign in with.

Pemula: Memerlukan pengetahuan antarmuka pengguna di komputer pengguna tunggal.

Artikel ini berlaku untuk Microsoft Access database (MDB) berkas atau berkas Microsoft Access database (.accdb).

Ringkasan

Jika Anda ingin mencetak laporan ke printer tertentu, Anda dapat memilih printer secara manual dan semua opsi pencetakan, atau Anda dapat mengotomasi proses sehingga dengan mengeklik tombol, Anda dapat beralih printer dan kemudian mencetak laporan dengan opsi yang Anda tentukan dulu kata. Artikel ini menjelaskan cara mengotomatiskan proses printer seleksi.

Informasi lebih lanjut

Prosedur ini menggunakan dua contoh: mencetak ke laser printer dan mencetak ke printer dot matriks. Anda dapat menggantikan printer tertentu yang ingin Anda gunakan. Untuk mengotomasi proses printer seleksi untuk laporan tertentu, ikuti langkah-langkah berikut:

  1. Membuat laporan tiga berikut:

    • rptLaserPrinter

    • rptDotMatrix

    • rptMyReport

    Catatan: rptMyReport mewakili laporan aktual yang ingin Anda cetak.

  2. Untuk menyetel opsi printer, ikuti langkah-langkah berikut:

    1. Buka rptLaserPrinter di tampilan desain.

    2. Pada menu File , klik Cetak.

      Catatan Di Access 2007, klik Tombol Microsoft Office, dan kemudian klik cetak.

    3. Di kotak dialog cetak , klik printer laser yang ingin Anda gunakan di kotak nama , dan kemudian klik OK.

    4. Klik properti, tetapkan opsi pencetakan apa pun yang Anda inginkan, seperti orientasi dan ukuran kertas, dan kemudian klik OK.

    5. Ulangi langkah d hingga untuk rptDotMatrix. Klik printer dot matriks di langkah c.

  3. Di jendela Database, klik modul, klik baru, dan kemudian ketik fungsi berikut ini:

    Catatan Di Access 2007, klik modul dalam grup tab buat .

    Function ChangePrinter(rptToChange As String, rptPrinter As String)

    Dim rpt1 As Report, rpt2 As Report

    DoCmd.OpenReport rptToChange, acViewDesign
    DoCmd.OpenReport rptPrinter, acViewDesign

    Set rpt1 = Reports(rptToChange)
    Set rpt2 = Reports(rptPrinter)

    rpt1.PrtDevNames = rpt2.PrtDevNames

    DoCmd.Close acReport, rptPrinter, acSaveNo
    DoCmd.OpenReport rptToChange, acViewPreview
    End Function

    Catatan: fungsi ChangePrinter salinan PrtDevNames properti dari satu laporan yang lain. Anda dapat menyalin opsi pencetakan yang Anda tetapkan untuk rptLaserPrinter dan rptDotMatrix laporan laporan tertentu yang ingin Anda cetak.

    Catatan: digunakan "acSaveNo" properti "DoCmd.Close acReport, rptPrinter, acSaveNo" baris kode yang ditampilkan sebelumnya di bagian ini. Jika Anda tidak menggunakan opsi ini dan menyimpan PrtDevName pencetak non-asali untuk desain laporan, laporan tidak akan dapat menemukan printer ketika menjalankan waktu berikutnya. Anda akan menerima pesan galat berikut:

    Dokumen ini telah diformat untuk printer < PrinterName > < Port >; Namun printer yang tidak tersedia. Apakah Anda ingin menggunakan printer default < DefaultPrinterName > < Port >?

  4. Simpan modul sebagai Module1, dan kemudian keluar dari Penyunting Visual Basic.

  5. Membuat formulir berikut:
    Form: frmForm1
    ------------------------------
    RecordSource: Unbound

    Control Type: Command Button
    Name: cmdLaser
    Caption: Laser
    Control Type: Command Button
    Name: cmdDotMatrix
    Caption: Dot Matrix

  6. Pada menu tampilan , klik kode.

    Catatan Di Access 2007, klik Lihat kode dalam kelompok alat tab desain .

  7. Di Penyunting Visual Basic, ketik prosedur berikut ini:

    Private Sub cmdLaser_Click ()

    Call ChangePrinter("rptMyReport", "rptLaserPrinter")
    DoCmd.PrintOut

    End Sub

    Private Sub cmdDotMatrix_Click ()

    Call ChangePrinter("rptMyReport", "rptDotMatrix")
    DoCmd.PrintOut

    End Sub
  8. Keluar dari Penyunting Visual Basic, dan kemudian mengubah properti Di klik tombol perintah kedua [peristiwaprosedur]. Untuk melakukannya, ikuti langkah-langkah berikut:

    1. Dalam tampilan Design, klik tombol perintah, dan kemudian klik properti pada menu tampilan .

      Catatan Di Access 2007, klik tombol perintah di tampilan desain, dan kemudian klik Properti lembar di grup alat tab desain .

    2. Klik tab peristiwa , klik Klik properti, klik tanda panah turun, dan kemudian klik [Prosedur kejadian].

  9. Untuk mencetak rptMyReport ke printer tertentu, buka frmForm1dalam bentuk tampilan, dan kemudian klik tombol yang sesuai.

Referensi

Untuk informasi selengkapnya tentang cara mengontrol printer dari Microsoft Access, kunjungi situs Web Microsoft berikut ini:

http://msdn2.microsoft.com/en-us/library/Aa207072(office.10).aspx

Perlu bantuan lainnya?

Kembangkan keterampilan Anda
Jelajahi pelatihan
Dapatkan fitur baru terlebih dahulu
Gabung Microsoft Insider

Apakah informasi ini bermanfaat?

Seberapa puaskah Anda dengan kualitas bahasanya?
Apa yang memengaruhi pengalaman Anda?

Terima kasih atas umpan balik Anda!

×