Wa'alaikumussalam wr wb
Alhamdulillah kalau sudah bisa.
Wassalamu'alaikum wr wb
Kid
2017-10-16 15:18 GMT+07:00 paopao daeng daeng_pao...@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:
>
>
> Assalamualaikum wr.wb
>
> Mohon Maaf Mr. Kid
> ternyata setelah saya utak atik ud bisa bekerja sesuai dengan yang saya
> inginkan....
> ter print sesuai data (ceklist) yang saya inginkan, tanpa ikut lembaran
> yang lain...
> terima kasih banyak ilmunya...
>
> Wassalamualaikum Wr.Wb
>
>
> On Monday, October 16, 2017 10:19 AM, "'Mr. Kid' mr.nm...@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
>
>
>
> Hai PaoPao,
>
> Dari script buatan mas Nang, diketahui : (alangkah lebih baik bila
> disesuaikan ulang dengann kondisi setempat)
> 1. checkbox1 untuk area baris 1 sampai 5
> 2. checkbox2 untuk area baris 6 sampai 10
> 3. checkbox3 untuk area baris 11 sampai 17
>
> Langkah manual :
> Setiap kali user akan melakukan print, si user akan berurutan melakukan
> hal berikut :
> 1. Melakukan sesuatu terhadap area baris 1:5 (seakan-akan user mencentang
> checkbox1)
> > area baris 1:5 di-unhide jika akan di-print, di-hide jika tidak
> di-print
> 2. Melakukan sesuatu terhadap area baris 6:10 (seakan-akan user mencentang
> checkbox2)
> > area baris 6:10 di-unhide jika akan di-print, di-hide jika tidak
> di-print
> 3. Melakukan sesuatu terhadap area baris 11:17 (seakan-akan user
> mencentang checkbox3)
> > area baris 11:17 di-unhide jika akan di-print, di-hide jika tidak
> di-print
> 4. ke menu File -> Print -> print preview atau print out sheet tersebut
> 5. selesai print preview atau print out, unhide semua baris lagi
>
> Berhubung si pakai userform, berarti :
> > sebelum langkah 4 (misal langkah 3.9) diisi dengan proses hide userform
> > sesudah langkah 5 (misal langkah 5.1) diisi dengan proses show userform
>
> Nah.... kalau MAU menuliskan langkah manual seperti di atas itu ke dalam
> suatu lembar kertas, akan jadi lebih mudah menyusun script-nya
> gak bakal puyeng.
>
> Dalam prosedur event click si tombol di userform :
>
> '1. Melakukan sesuatu terhadap area baris 1:5 (seakan-akan user mencentang
> checkbox1)
> ' > area baris 1:5 di-unhide jika akan di-print, di-hide jika tidak
> di-print
> if checkbox1.value then
> rows("1:5").hidden=false
> else
> rows("1:5").hidden=true
> endif
>
> '2. Melakukan sesuatu terhadap area baris 6:10 (seakan-akan user
> mencentang checkbox2)
> ' > area baris 6:10 di-unhide jika akan di-print, di-hide jika tidak
> di-print
> if checkbox2.value then
> rows("6:10").hidden=false
> else
> rows("6:10").hidden=true
> endif
>
> '3. Melakukan sesuatu terhadap area baris 11:17 (seakan-akan user
> mencentang checkbox3)
> ' > area baris 11:17 di-unhide jika akan di-print, di-hide jika tidak
> di-print
> if checkbox3.value then
> rows("11:17").hidden=false
> else
> rows("11:17").hidden=true
> endif
>
> '3.9. hide userform
> me.hide
>
> '4. ke menu File -> Print -> print preview atau print out sheet tersebut
> sheets("nama sheetnya").printpreview 'atau printout sesuai kebutuhan
>
> '5. selesai print preview atau print out, unhide semua baris lagi
> rows("1:17").hidden=false
>
> '5.1. show userform
> me.show
>
> Nah kan jadi terarah to...
> ealah, mbok yao dibikin simpel sajah, ndak perlu membayang-mbayangkan
> seperti programmer hebat...
> cukup tulis semua langkah manualnya, lalu buat script seperti urutan kerja
> manualnya.
> biasanya akan lebih pas dibanding pakai mbayang-mbayangin laksana
> programmer.
>
>
> Nanti, kalau sudah lancar, baru deh belajar lagi untuk menyederhanakannya,
> seperti :
>
> with sheets("nama sheetsnya")
> .rows("1:5").hidden=not checkbox1.value
> .rows("6:10").hidden=not checkbox2.value
> .rows("11:17").hidden=not checkbox3.value
>
> me.hide
> .printpreview 'atau printout sesuai kebutuhan
> .rows("1:17").hidden=false
> me.show
> end with
>
> jadi jelas tahapan belajarnya bukan ?
> belajar capek nulis langkah manual -> belajar terjemahkan langkah manual
> ke script -> belajar menyederhanakan script
>
> Alhamdulillah, Allah Yang Maha Mendidik, telah mendidik kita bahwa
> penciptaan alam semesta pun dilakukan bertahap, walaupun sebenarnya bisa
> mak cling jadi.
> So, mari kita belajar bersama penuh semangat, secara bertahap, satu pijak
> ke pijak berikutnya
>
>
> Regards,
> Kid
>
>
>
>
>
>
> On Mon, Oct 16, 2017 at 8:41 AM, paopao daeng daeng_pao...@yahoo.com
> [belajar-excel] <belajar-excel@yahoogroups.com > wrote:
>
>
> pak agus tetap gak bisa tercetak meskipun saya udah hidden rangenya...
> kalo saya centang beberapa ceklist no. 1 dan no. 2, tidak bisa terprint
> menjadi satu lembar, padahal saya mau tercetak stau lembar kertas kalo saya
> ceklist no. yang saya inginkan....
>
>
> On Thursday, October 12, 2017 4:40 PM, "nangagus nanga...@gmail.com
> [belajar-excel]" <belajar-excel@yahoogroups.com > wrote:
>
>
>
> Waalaikumsalam warahmatullah,
> Dear Pao-pao,
> Bagaimana jika perintahnya diubah?
> pada waktu sebelum diprint, baris yang tidak akan diprint disembunyikan
> dahulu, kemudian setelah diprint baris tersebut dimunculkan lagi.
> Mungkin begini perintahnya:
> Private Sub CommandButton1_Click()
> If CheckBox1.Value = True Then
> Me.Hide
> Rows("6:16").Hidden = True
> Sheet1.PrintOut
> Rows("1:17").Hidden = False
> End If
> If CheckBox2.Value = True Then
> Me.Hide
> Rows("11:16").Hidden = True
> Sheet1.PrintOut
> Rows("1:17").Hidden = False
> End If
> If CheckBox3.Value = True Then
> Me.Hide
> Sheet1.PrintOut
> End If
> End Sub
> Wasalamualaikum warahmatullahi wabarakatuh.
> NangAgus
> On 11/10/2017 12:24, paopao daeng daeng_pao...@yahoo.com [belajar-excel]
> wrote:
>
>
> assalamualaikum.wr.wb
> dear para suhu "be excel"
>
> Mohon Bantuannya...
> rumus untuk perintah macro untuk print otomatis beberapa range yang ada
> dalam satu sheet.
> saya udah puyeng utak atik rumusnya g pernah jadi2...
> jadi streess saya...
> maklum baru belajar dari group ini jg...
> file terlampir
> terima kasih
>
>
>
>
>
>
>
>
