[Attachment(s) from hari yanto included below]
Tidak ada yang salah pada file yang Sampeyan lampiran. Hanya ada beberapa catatan:
1. Untuk mengisi event, gunakan detail print dari report.
2. Caranya, melalui box property, pilih Detail sehingga akan muncul judul property section detail.
3. Pilih property on print > Double klik code builder. Akan muncul seperti ini:
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
End Sub
4. Ubah hingga menjadi seperti ini:
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Dim result As String
Dim result As String
result = MD_Barcode39(Barcode, Me)
End Sub
End Sub
5. Terlampir adalah perbaikkanya.
Mudah-mudahan bisa membantu dan memberi semangat.
Hariyanto (Surabaya)
From: Ahmad Satiri <satiri27@yahoo.co.id>
To: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Sent: Tuesday, November 1, 2011 4:51 PM
Subject: Bls: Bls: Bls: ulang: [belajar-access] masih ttg barcode di Access [1 Attachment]
To: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Sent: Tuesday, November 1, 2011 4:51 PM
Subject: Bls: Bls: Bls: ulang: [belajar-access] masih ttg barcode di Access [1 Attachment]
Terima Kasih Mas Har, sudah ketemu VBAnya.
Tapi kenapa ketika saya "copy" ke File saya, tidak berfungsi ya...tolong dikoreksi dong salah nya dimana dan informasikan ke saya agar menjadi pelajaran lagi untuk saya.
Berikut ini saya lampirkan "File" saya.
Terima Kasih banyak atas segalanya (termasuknya untuk mengkoreksi File saya)
Salam,
Ahmad Satiri
Dari: hari yanto <har_i20002000@yahoo.com>
Kepada: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Dikirim: Selasa, 1 November 2011 12:11
Judul: Re: Bls: Bls: ulang: [belajar-access] masih ttg barcode di Access
Kepada: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Dikirim: Selasa, 1 November 2011 12:11
Judul: Re: Bls: Bls: ulang: [belajar-access] masih ttg barcode di Access
VBA tidak di sembunyikan. Tapi berada di module dengan nama mod_BarCode_Generator.
Prosesnya kurang lebih begini:
Buka file barcode.mdb. Pilih report contoh. Klik Design. Klik toolbar Code. Akan nampak seperti ini:
Private Sub Detail1_Print(Cancel As Integer, PrintCount As Integer)
Dim result As String
result = MD_Barcode39(Barcode, Me)
End Sub
Dim result As String
result = MD_Barcode39(Barcode, Me)
End Sub
Ini bisa diartikan: memerintahkan textbox Barcode pada report agar merubah sourcenya -- yang semula reg -- diubah menjadi Barcode39.
Untuk coba-coba,
1. buatlah textbox baru disamping textbox barcode.
2. Katakanlah textbox baru itu bernama text20.
3. Isi controlsource text20 itu dengan ="22675a"
4. Ubah scirptnya seperti ini:
Private Sub Detail1_Print(Cancel As Integer, PrintCount As Integer)
Dim result, res1 As String
result = MD_Barcode39(Barcode, Me)
res1 = MD_Barcode39(Text20, Me)
End Sub
Dim result, res1 As String
result = MD_Barcode39(Barcode, Me)
res1 = MD_Barcode39(Text20, Me)
End Sub
5. Lihat hasilnya.
Semoga bisa membantu dan memberi manfaat.
Hariyanto (Surabaya)
From: Ahmad Satiri <satiri27@yahoo.co.id>
To: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Sent: Tuesday, November 1, 2011 9:45 AM
Subject: Bls: Bls: ulang: [belajar-access] masih ttg barcode di Access
To: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Sent: Tuesday, November 1, 2011 9:45 AM
Subject: Bls: Bls: ulang: [belajar-access] masih ttg barcode di Access
Salam sejahtera untuk kita semua.
Di pagi yang cerah ini saya senang sekali mendapat Feed Back dari mas Haryanto dan mas Galih (sorry saya baru buka E mailnya).
Dan setelah saya cek, keduanya dapat memecahkan Home Fun saya tinggal saya mendesignnya sesuai dengan kebutuhan saya.
Tapi, saya masih membutuhkan pencerahan nich, untuk merubahan menjadi Barcode prosesnya bagaimana ya..? VBAnya diHide ya...?
Cara UnHidenya gimana ya....?
Terima Kasih sekali lagi Feed Back dari Master semua, ingin rasanya saya juga bisa memberikan "sesuatu" kepada rekan-rekan yang membutuhkan.
Salam,
Ahmad Satiri
Dari: hari yanto <har_i20002000@yahoo.com>
Kepada: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Dikirim: Sabtu, 29 Oktober 2011 4:56
Judul: Re: Bls: ulang: [belajar-access] masih ttg barcode di Access [1 Attachment]
Kepada: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Dikirim: Sabtu, 29 Oktober 2011 4:56
Judul: Re: Bls: ulang: [belajar-access] masih ttg barcode di Access [1 Attachment]
Ahmad... terimakasih. Cukup lama saya tidak berpartisipasi pada forum ini. Ada kesibukan lain yang cukup menyita. Baiklah...
Terlampir adalah file membuat printing barcode melalui VBA. Semoga bermanfaat.
Hariyanto
From: Ahmad Satiri <satiri27@yahoo.co.id>
To: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Sent: Friday, October 28, 2011 10:34 AM
Subject: Bls: ulang: [belajar-access] masih ttg barcode di Access
To: "belajar-access@yahoogroups.com" <belajar-access@yahoogroups.com>
Sent: Friday, October 28, 2011 10:34 AM
Subject: Bls: ulang: [belajar-access] masih ttg barcode di Access
Selamat Pagi,
Saya telah mencoba mencari Attachment dari mas Haryanto tentang VBA Barcode tertanggal 19 September 2008 tetapi tidak ketemu karena pada kumpulan Attachment dimulai dari tahun 2009. Yang 2008 tidak ada Kenapa ya? Trus untuk mendapatkannya bagaimana ya..?
Terima Kasih atas bantunya.
Salam,
Ahmad Satiri
Dari: Ahmad <satiri27@yahoo.co.id>
Kepada: belajar-access@yahoogroups.com
Dikirim: Kamis, 27 Oktober 2011 16:53
Judul: Re: ulang: [belajar-access] masih ttg barcode di Access
Kepada: belajar-access@yahoogroups.com
Dikirim: Kamis, 27 Oktober 2011 16:53
Judul: Re: ulang: [belajar-access] masih ttg barcode di Access
Salam Sejahtera untu kita semua
Mas Har / Mas Diki atau rekan - rekan semua, boleh dong saya dikirimkan VBA untuk membuat Barcode (tanpa Font).
Saya yakin ini bisa menyelesaikan pertanyaan2 saya sebelumnya (Table)
Terima Kasih atas bantuanya.
Salam,
Ahmad Satiri
--- In belajar-access@yahoogroups.com, diki wahyudin <pangestu_cx@...> wrote:
>
> VBA barcode tersebut sudah saya pake dan bagus karena kita bisa mengatur perbandingan antara tinggi dan lebarnya. Namun mohon sharing dari para pakar, saya ada kebutuhan untuk memunculkan barcode secara vertikal. Kami berencana membuat ID Card plus barcode. ID Card tersebut dibuat dalam bentuk portrait (berdiri). Dengan begitu, kalo barcode dimunculkan secara horizontal, lebar untuk barcode terbatas sehingga pemindaiannya relatih lebih lama / lebih sulit. Oleh karenanya, barcode akan ditampilkan secara vertikal. Apakah hal ini bisa dilakukan ?
>
> Sekali lahi mohon bantuannya.
>
> Terima Kasih
>
> Diki w
>
>
>
>
> ________________________________
> Dari: hari yanto <har_i20002000@...>
> Kepada: belajar-access@yahoogroups.com
> Terkirim: Jumat, 19 September, 2008 16:00:28
> Topik: Re: [belajar-access] masih ttg barcode di Access
>
>
> mungkin contoh terlampir bisa membantu. Barcode tidak menggunakan font. Tapi VB.
>
> Tx
>
> --- On Fri, 19/9/08, Harry siswanto <harry.siswanto@ gmail.com> wrote:
>
> From: Harry siswanto <harry.siswanto@ gmail.com>
> Subject: [belajar-access] masih ttg barcode di Access
> To: "belajar-access" <belajar-access@ yahoogroups. com>
> Date: Friday, 19 September, 2008, 3:44 PM
>
>
> dear all
>
> saya punya font barcode dengan nama Code39Slim
> di MsExcel.. bisa kelihatan di Format Font nya
>
> kenapa di MsAccess nggak kelihatan ??
> bagaimana caranya supaya bisa di pake di MsAccess ??
>
> terima kasih sebelumnya.. .
>
> harry
>
> ______________________________
> Get your new Email address!
> Grab the Email name you've always wanted before someone else does!
>
>
> __________________________________________________________
> Dapatkan alamat Email baru Anda!
> Dapatkan nama yang selalu Anda inginkan sebelum diambil orang lain!
> http://mail.promotions.yahoo.com/newdomains/id/
>
Mas Har / Mas Diki atau rekan - rekan semua, boleh dong saya dikirimkan VBA untuk membuat Barcode (tanpa Font).
Saya yakin ini bisa menyelesaikan pertanyaan2 saya sebelumnya (Table)
Terima Kasih atas bantuanya.
Salam,
Ahmad Satiri
--- In belajar-access@yahoogroups.com, diki wahyudin <pangestu_cx@...> wrote:
>
> VBA barcode tersebut sudah saya pake dan bagus karena kita bisa mengatur perbandingan antara tinggi dan lebarnya. Namun mohon sharing dari para pakar, saya ada kebutuhan untuk memunculkan barcode secara vertikal. Kami berencana membuat ID Card plus barcode. ID Card tersebut dibuat dalam bentuk portrait (berdiri). Dengan begitu, kalo barcode dimunculkan secara horizontal, lebar untuk barcode terbatas sehingga pemindaiannya relatih lebih lama / lebih sulit. Oleh karenanya, barcode akan ditampilkan secara vertikal. Apakah hal ini bisa dilakukan ?
>
> Sekali lahi mohon bantuannya.
>
> Terima Kasih
>
> Diki w
>
>
>
>
> ________________________________
> Dari: hari yanto <har_i20002000@...>
> Kepada: belajar-access@yahoogroups.com
> Terkirim: Jumat, 19 September, 2008 16:00:28
> Topik: Re: [belajar-access] masih ttg barcode di Access
>
>
> mungkin contoh terlampir bisa membantu. Barcode tidak menggunakan font. Tapi VB.
>
> Tx
>
> --- On Fri, 19/9/08, Harry siswanto <harry.siswanto@ gmail.com> wrote:
>
> From: Harry siswanto <harry.siswanto@ gmail.com>
> Subject: [belajar-access] masih ttg barcode di Access
> To: "belajar-access" <belajar-access@ yahoogroups. com>
> Date: Friday, 19 September, 2008, 3:44 PM
>
>
> dear all
>
> saya punya font barcode dengan nama Code39Slim
> di MsExcel.. bisa kelihatan di Format Font nya
>
> kenapa di MsAccess nggak kelihatan ??
> bagaimana caranya supaya bisa di pake di MsAccess ??
>
> terima kasih sebelumnya.. .
>
> harry
>
> ______________________________
> Get your new Email address!
> Grab the Email name you've always wanted before someone else does!
>
>
> __________________________________________________________
> Dapatkan alamat Email baru Anda!
> Dapatkan nama yang selalu Anda inginkan sebelum diambil orang lain!
> http://mail.promotions.yahoo.com/newdomains/id/
>
__._,_.___
Attachment(s) from hari yanto
1 of 1 File(s)
SPAM IS PROHIBITED
MARKETPLACE
.
__,_._,___
Tidak ada komentar:
Posting Komentar