Senin, 16 Oktober 2017

[belajar-excel] Digest Number 4326

Milis Belajar Microsoft Excel

13 Messages

Digest #4326
1c
Re: Perintah Print multiple range dalam satu sheet by "Mr. Kid" nmkid.family@ymail.com
1g
Re: Perintah Print multiple range dalam satu sheet by "Mr. Kid" nmkid.family@ymail.com
1h
Re: Perintah Print multiple range dalam satu sheet by "Mr. Kid" nmkid.family@ymail.com
2b
Re: scroll dengan mousewheel untuk 64 bit by "Mr. Kid" nmkid.family@ymail.com
4a
Re: File Read Only by "halak hita"
4b
Re: File Read Only by "Mr. Kid" nmkid.family@ymail.com

Messages

Sun Oct 15, 2017 7:27 pm (PDT) . Posted by:

"paopao daeng"

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 nangagus@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_paopao@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

#yiv9757748162 #yiv9757748162 -- #yiv9757748162ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv9757748162 #yiv9757748162ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv9757748162 #yiv9757748162ygrp-mkp #yiv9757748162hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv9757748162 #yiv9757748162ygrp-mkp #yiv9757748162ads {margin-bottom:10px;}#yiv9757748162 #yiv9757748162ygrp-mkp .yiv9757748162ad {padding:0 0;}#yiv9757748162 #yiv9757748162ygrp-mkp .yiv9757748162ad p {margin:0;}#yiv9757748162 #yiv9757748162ygrp-mkp .yiv9757748162ad a {color:#0000ff;text-decoration:none;}#yiv9757748162 #yiv9757748162ygrp-sponsor #yiv9757748162ygrp-lc {font-family:Arial;}#yiv9757748162 #yiv9757748162ygrp-sponsor #yiv9757748162ygrp-lc #yiv9757748162hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv9757748162 #yiv9757748162ygrp-sponsor #yiv9757748162ygrp-lc .yiv9757748162ad {margin-bottom:10px;padding:0 0;}#yiv9757748162 #yiv9757748162actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv9757748162 #yiv9757748162activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv9757748162 #yiv9757748162activity span {font-weight:700;}#yiv9757748162 #yiv9757748162activity span:first-child {text-transform:uppercase;}#yiv9757748162 #yiv9757748162activity span a {color:#5085b6;text-decoration:none;}#yiv9757748162 #yiv9757748162activity span span {color:#ff7900;}#yiv9757748162 #yiv9757748162activity span .yiv9757748162underline {text-decoration:underline;}#yiv9757748162 .yiv9757748162attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv9757748162 .yiv9757748162attach div a {text-decoration:none;}#yiv9757748162 .yiv9757748162attach img {border:none;padding-right:5px;}#yiv9757748162 .yiv9757748162attach label {display:block;margin-bottom:5px;}#yiv9757748162 .yiv9757748162attach label a {text-decoration:none;}#yiv9757748162 blockquote {margin:0 0 0 4px;}#yiv9757748162 .yiv9757748162bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv9757748162 .yiv9757748162bold a {text-decoration:none;}#yiv9757748162 dd.yiv9757748162last p a {font-family:Verdana;font-weight:700;}#yiv9757748162 dd.yiv9757748162last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv9757748162 dd.yiv9757748162last p span.yiv9757748162yshortcuts {margin-right:0;}#yiv9757748162 div.yiv9757748162attach-table div div a {text-decoration:none;}#yiv9757748162 div.yiv9757748162attach-table {width:400px;}#yiv9757748162 div.yiv9757748162file-title a, #yiv9757748162 div.yiv9757748162file-title a:active, #yiv9757748162 div.yiv9757748162file-title a:hover, #yiv9757748162 div.yiv9757748162file-title a:visited {text-decoration:none;}#yiv9757748162 div.yiv9757748162photo-title a, #yiv9757748162 div.yiv9757748162photo-title a:active, #yiv9757748162 div.yiv9757748162photo-title a:hover, #yiv9757748162 div.yiv9757748162photo-title a:visited {text-decoration:none;}#yiv9757748162 div#yiv9757748162ygrp-mlmsg #yiv9757748162ygrp-msg p a span.yiv9757748162yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv9757748162 .yiv9757748162green {color:#628c2a;}#yiv9757748162 .yiv9757748162MsoNormal {margin:0 0 0 0;}#yiv9757748162 o {font-size:0;}#yiv9757748162 #yiv9757748162photos div {float:left;width:72px;}#yiv9757748162 #yiv9757748162photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv9757748162 #yiv9757748162photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv9757748162 #yiv9757748162reco-category {font-size:77%;}#yiv9757748162 #yiv9757748162reco-desc {font-size:77%;}#yiv9757748162 .yiv9757748162replbq {margin:4px;}#yiv9757748162 #yiv9757748162ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv9757748162 #yiv9757748162ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv9757748162 #yiv9757748162ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv9757748162 #yiv9757748162ygrp-mlmsg select, #yiv9757748162 input, #yiv9757748162 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv9757748162 #yiv9757748162ygrp-mlmsg pre, #yiv9757748162 code {font:115% monospace;}#yiv9757748162 #yiv9757748162ygrp-mlmsg * {line-height:1.22em;}#yiv9757748162 #yiv9757748162ygrp-mlmsg #yiv9757748162logo {padding-bottom:10px;}#yiv9757748162 #yiv9757748162ygrp-msg p a {font-family:Verdana;}#yiv9757748162 #yiv9757748162ygrp-msg p#yiv9757748162attach-count span {color:#1E66AE;font-weight:700;}#yiv9757748162 #yiv9757748162ygrp-reco #yiv9757748162reco-head {color:#ff7900;font-weight:700;}#yiv9757748162 #yiv9757748162ygrp-reco {margin-bottom:20px;padding:0px;}#yiv9757748162 #yiv9757748162ygrp-sponsor #yiv9757748162ov li a {font-size:130%;text-decoration:none;}#yiv9757748162 #yiv9757748162ygrp-sponsor #yiv9757748162ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv9757748162 #yiv9757748162ygrp-sponsor #yiv9757748162ov ul {margin:0;padding:0 0 0 8px;}#yiv9757748162 #yiv9757748162ygrp-text {font-family:Georgia;}#yiv9757748162 #yiv9757748162ygrp-text p {margin:0 0 1em 0;}#yiv9757748162 #yiv9757748162ygrp-text tt {font-size:120%;}#yiv9757748162 #yiv9757748162ygrp-vital ul li:last-child {border-right:none !important;}#yiv9757748162

Sun Oct 15, 2017 7:54 pm (PDT) . Posted by:

"nangagus"

Di komputer saya berhasil pak, Coba buka lampiran.

Dilampiran, Print out saya ubah menjadi printView. silahkan ubah lagi
menjadi printOut.

Salam

NangAgus

On 16/10/2017 08:41, paopao daeng daeng_paopao@yahoo.com [belajar-excel]
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 nangagus@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_paopao@yahoo.com
> <mailto:daeng_paopao@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
>>
>
>
>

Sun Oct 15, 2017 8:18 pm (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

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_paopao@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 nangagus@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_paopao@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
>
>
>
>
>

Sun Oct 15, 2017 8:53 pm (PDT) . Posted by:

"paopao daeng"

alhamdulillah ud berhasil...baik ilmu dari mas nanagus sama mr kid..terima kasih ud berbagi ilmunya....BARAKALLAHUMMA FII "BELAJAR EXCEL", KUSUSNYA KEPADA MAS NAN AGUS DAN MR. KID...AMINNNkalo ada waktu main ke makassar ataupun "training excel" jangan lupa hub. saya

On Monday, October 16, 2017 10:50 AM, paopao daeng <daeng_paopao@yahoo.com> wrote:


alhamdulillah ud berhasil...baik ilmu dari mas nanagus sama mr kid..terima kasih ud berbagi ilmunya....BARAKALLAHUMMA FII "BELAJAR EXCEL", KUSUSNYA KEPADA MAS NAN AGUS DAN MR. KID...AMINNNkalo ada waktu main ke makassar ataupun "training excel" jangan lupa hub. saya

On Monday, October 16, 2017 10:19 AM, "'Mr. Kid' mr.nmkid@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 52. 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-print3. 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-print4. ke menu File -> Print -> print preview atau print out sheet tersebut5. 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-nyagak 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_paopao@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 nangagus@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_paopao@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



#yiv7348190026 -- #yiv7348190026ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv7348190026 #yiv7348190026ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv7348190026 #yiv7348190026ygrp-mkp #yiv7348190026hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv7348190026 #yiv7348190026ygrp-mkp #yiv7348190026ads {margin-bottom:10px;}#yiv7348190026 #yiv7348190026ygrp-mkp .yiv7348190026ad {padding:0 0;}#yiv7348190026 #yiv7348190026ygrp-mkp .yiv7348190026ad p {margin:0;}#yiv7348190026 #yiv7348190026ygrp-mkp .yiv7348190026ad a {color:#0000ff;text-decoration:none;}#yiv7348190026 #yiv7348190026ygrp-sponsor #yiv7348190026ygrp-lc {font-family:Arial;}#yiv7348190026 #yiv7348190026ygrp-sponsor #yiv7348190026ygrp-lc #yiv7348190026hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv7348190026 #yiv7348190026ygrp-sponsor #yiv7348190026ygrp-lc .yiv7348190026ad {margin-bottom:10px;padding:0 0;}#yiv7348190026 #yiv7348190026actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv7348190026 #yiv7348190026activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv7348190026 #yiv7348190026activity span {font-weight:700;}#yiv7348190026 #yiv7348190026activity span:first-child {text-transform:uppercase;}#yiv7348190026 #yiv7348190026activity span a {color:#5085b6;text-decoration:none;}#yiv7348190026 #yiv7348190026activity span span {color:#ff7900;}#yiv7348190026 #yiv7348190026activity span .yiv7348190026underline {text-decoration:underline;}#yiv7348190026 .yiv7348190026attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv7348190026 .yiv7348190026attach div a {text-decoration:none;}#yiv7348190026 .yiv7348190026attach img {border:none;padding-right:5px;}#yiv7348190026 .yiv7348190026attach label {display:block;margin-bottom:5px;}#yiv7348190026 .yiv7348190026attach label a {text-decoration:none;}#yiv7348190026 blockquote {margin:0 0 0 4px;}#yiv7348190026 .yiv7348190026bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv7348190026 .yiv7348190026bold a {text-decoration:none;}#yiv7348190026 dd.yiv7348190026last p a {font-family:Verdana;font-weight:700;}#yiv7348190026 dd.yiv7348190026last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv7348190026 dd.yiv7348190026last p span.yiv7348190026yshortcuts {margin-right:0;}#yiv7348190026 div.yiv7348190026attach-table div div a {text-decoration:none;}#yiv7348190026 div.yiv7348190026attach-table {width:400px;}#yiv7348190026 div.yiv7348190026file-title a, #yiv7348190026 div.yiv7348190026file-title a:active, #yiv7348190026 div.yiv7348190026file-title a:hover, #yiv7348190026 div.yiv7348190026file-title a:visited {text-decoration:none;}#yiv7348190026 div.yiv7348190026photo-title a, #yiv7348190026 div.yiv7348190026photo-title a:active, #yiv7348190026 div.yiv7348190026photo-title a:hover, #yiv7348190026 div.yiv7348190026photo-title a:visited {text-decoration:none;}#yiv7348190026 div#yiv7348190026ygrp-mlmsg #yiv7348190026ygrp-msg p a span.yiv7348190026yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv7348190026 .yiv7348190026green {color:#628c2a;}#yiv7348190026 .yiv7348190026MsoNormal {margin:0 0 0 0;}#yiv7348190026 o {font-size:0;}#yiv7348190026 #yiv7348190026photos div {float:left;width:72px;}#yiv7348190026 #yiv7348190026photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv7348190026 #yiv7348190026photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv7348190026 #yiv7348190026reco-category {font-size:77%;}#yiv7348190026 #yiv7348190026reco-desc {font-size:77%;}#yiv7348190026 .yiv7348190026replbq {margin:4px;}#yiv7348190026 #yiv7348190026ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv7348190026 #yiv7348190026ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv7348190026 #yiv7348190026ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv7348190026 #yiv7348190026ygrp-mlmsg select, #yiv7348190026 input, #yiv7348190026 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv7348190026 #yiv7348190026ygrp-mlmsg pre, #yiv7348190026 code {font:115% monospace;}#yiv7348190026 #yiv7348190026ygrp-mlmsg * {line-height:1.22em;}#yiv7348190026 #yiv7348190026ygrp-mlmsg #yiv7348190026logo {padding-bottom:10px;}#yiv7348190026 #yiv7348190026ygrp-msg p a {font-family:Verdana;}#yiv7348190026 #yiv7348190026ygrp-msg p#yiv7348190026attach-count span {color:#1E66AE;font-weight:700;}#yiv7348190026 #yiv7348190026ygrp-reco #yiv7348190026reco-head {color:#ff7900;font-weight:700;}#yiv7348190026 #yiv7348190026ygrp-reco {margin-bottom:20px;padding:0px;}#yiv7348190026 #yiv7348190026ygrp-sponsor #yiv7348190026ov li a {font-size:130%;text-decoration:none;}#yiv7348190026 #yiv7348190026ygrp-sponsor #yiv7348190026ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv7348190026 #yiv7348190026ygrp-sponsor #yiv7348190026ov ul {margin:0;padding:0 0 0 8px;}#yiv7348190026 #yiv7348190026ygrp-text {font-family:Georgia;}#yiv7348190026 #yiv7348190026ygrp-text p {margin:0 0 1em 0;}#yiv7348190026 #yiv7348190026ygrp-text tt {font-size:120%;}#yiv7348190026 #yiv7348190026ygrp-vital ul li:last-child {border-right:none !important;}#yiv7348190026

Mon Oct 16, 2017 1:24 am (PDT) . Posted by:

"paopao daeng"

assalamualaikum wr.wb
Maaf mengganggu lagi Mr. Kid
saya mau tanya lagi..kalo perintah diatas saya rubah menjadi "PrintOut", dan saya masukkan lagi beberapa "Range" yang banyak, sehingga terdiri dari 4 halaman (4 lembar kertas), ketika saya ceklis no. 1 - 3 dan saya print kenapa kok tercetak semua sebanyak 4 lembar kertas tp lainnya kosong....padahal saya mau yang tercetak cuman range yang terceklist saja tanpa yang lain ikut..
MOHON PETUNJUKNYA..Wassalamualaikum wr. wb.

On Monday, October 16, 2017 10:19 AM, "'Mr. Kid' mr.nmkid@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 52. 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-print3. 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-print4. ke menu File -> Print -> print preview atau print out sheet tersebut5. 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-nyagak 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_paopao@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 nangagus@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_paopao@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



#yiv9704844579 #yiv9704844579 -- #yiv9704844579ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv9704844579 #yiv9704844579ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv9704844579 #yiv9704844579ygrp-mkp #yiv9704844579hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv9704844579 #yiv9704844579ygrp-mkp #yiv9704844579ads {margin-bottom:10px;}#yiv9704844579 #yiv9704844579ygrp-mkp .yiv9704844579ad {padding:0 0;}#yiv9704844579 #yiv9704844579ygrp-mkp .yiv9704844579ad p {margin:0;}#yiv9704844579 #yiv9704844579ygrp-mkp .yiv9704844579ad a {color:#0000ff;text-decoration:none;}#yiv9704844579 #yiv9704844579ygrp-sponsor #yiv9704844579ygrp-lc {font-family:Arial;}#yiv9704844579 #yiv9704844579ygrp-sponsor #yiv9704844579ygrp-lc #yiv9704844579hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv9704844579 #yiv9704844579ygrp-sponsor #yiv9704844579ygrp-lc .yiv9704844579ad {margin-bottom:10px;padding:0 0;}#yiv9704844579 #yiv9704844579actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv9704844579 #yiv9704844579activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv9704844579 #yiv9704844579activity span {font-weight:700;}#yiv9704844579 #yiv9704844579activity span:first-child {text-transform:uppercase;}#yiv9704844579 #yiv9704844579activity span a {color:#5085b6;text-decoration:none;}#yiv9704844579 #yiv9704844579activity span span {color:#ff7900;}#yiv9704844579 #yiv9704844579activity span .yiv9704844579underline {text-decoration:underline;}#yiv9704844579 .yiv9704844579attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv9704844579 .yiv9704844579attach div a {text-decoration:none;}#yiv9704844579 .yiv9704844579attach img {border:none;padding-right:5px;}#yiv9704844579 .yiv9704844579attach label {display:block;margin-bottom:5px;}#yiv9704844579 .yiv9704844579attach label a {text-decoration:none;}#yiv9704844579 blockquote {margin:0 0 0 4px;}#yiv9704844579 .yiv9704844579bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv9704844579 .yiv9704844579bold a {text-decoration:none;}#yiv9704844579 dd.yiv9704844579last p a {font-family:Verdana;font-weight:700;}#yiv9704844579 dd.yiv9704844579last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv9704844579 dd.yiv9704844579last p span.yiv9704844579yshortcuts {margin-right:0;}#yiv9704844579 div.yiv9704844579attach-table div div a {text-decoration:none;}#yiv9704844579 div.yiv9704844579attach-table {width:400px;}#yiv9704844579 div.yiv9704844579file-title a, #yiv9704844579 div.yiv9704844579file-title a:active, #yiv9704844579 div.yiv9704844579file-title a:hover, #yiv9704844579 div.yiv9704844579file-title a:visited {text-decoration:none;}#yiv9704844579 div.yiv9704844579photo-title a, #yiv9704844579 div.yiv9704844579photo-title a:active, #yiv9704844579 div.yiv9704844579photo-title a:hover, #yiv9704844579 div.yiv9704844579photo-title a:visited {text-decoration:none;}#yiv9704844579 div#yiv9704844579ygrp-mlmsg #yiv9704844579ygrp-msg p a span.yiv9704844579yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv9704844579 .yiv9704844579green {color:#628c2a;}#yiv9704844579 .yiv9704844579MsoNormal {margin:0 0 0 0;}#yiv9704844579 o {font-size:0;}#yiv9704844579 #yiv9704844579photos div {float:left;width:72px;}#yiv9704844579 #yiv9704844579photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv9704844579 #yiv9704844579photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv9704844579 #yiv9704844579reco-category {font-size:77%;}#yiv9704844579 #yiv9704844579reco-desc {font-size:77%;}#yiv9704844579 .yiv9704844579replbq {margin:4px;}#yiv9704844579 #yiv9704844579ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv9704844579 #yiv9704844579ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv9704844579 #yiv9704844579ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv9704844579 #yiv9704844579ygrp-mlmsg select, #yiv9704844579 input, #yiv9704844579 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv9704844579 #yiv9704844579ygrp-mlmsg pre, #yiv9704844579 code {font:115% monospace;}#yiv9704844579 #yiv9704844579ygrp-mlmsg * {line-height:1.22em;}#yiv9704844579 #yiv9704844579ygrp-mlmsg #yiv9704844579logo {padding-bottom:10px;}#yiv9704844579 #yiv9704844579ygrp-msg p a {font-family:Verdana;}#yiv9704844579 #yiv9704844579ygrp-msg p#yiv9704844579attach-count span {color:#1E66AE;font-weight:700;}#yiv9704844579 #yiv9704844579ygrp-reco #yiv9704844579reco-head {color:#ff7900;font-weight:700;}#yiv9704844579 #yiv9704844579ygrp-reco {margin-bottom:20px;padding:0px;}#yiv9704844579 #yiv9704844579ygrp-sponsor #yiv9704844579ov li a {font-size:130%;text-decoration:none;}#yiv9704844579 #yiv9704844579ygrp-sponsor #yiv9704844579ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv9704844579 #yiv9704844579ygrp-sponsor #yiv9704844579ov ul {margin:0;padding:0 0 0 8px;}#yiv9704844579 #yiv9704844579ygrp-text {font-family:Georgia;}#yiv9704844579 #yiv9704844579ygrp-text p {margin:0 0 1em 0;}#yiv9704844579 #yiv9704844579ygrp-text tt {font-size:120%;}#yiv9704844579 #yiv9704844579ygrp-vital ul li:last-child {border-right:none !important;}#yiv9704844579

Mon Oct 16, 2017 1:24 am (PDT) . Posted by:

"paopao daeng"

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.nmkid@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 52. 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-print3. 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-print4. ke menu File -> Print -> print preview atau print out sheet tersebut5. 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-nyagak 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_paopao@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 nangagus@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_paopao@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



#yiv7003535900 #yiv7003535900 -- #yiv7003535900ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv7003535900 #yiv7003535900ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv7003535900 #yiv7003535900ygrp-mkp #yiv7003535900hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv7003535900 #yiv7003535900ygrp-mkp #yiv7003535900ads {margin-bottom:10px;}#yiv7003535900 #yiv7003535900ygrp-mkp .yiv7003535900ad {padding:0 0;}#yiv7003535900 #yiv7003535900ygrp-mkp .yiv7003535900ad p {margin:0;}#yiv7003535900 #yiv7003535900ygrp-mkp .yiv7003535900ad a {color:#0000ff;text-decoration:none;}#yiv7003535900 #yiv7003535900ygrp-sponsor #yiv7003535900ygrp-lc {font-family:Arial;}#yiv7003535900 #yiv7003535900ygrp-sponsor #yiv7003535900ygrp-lc #yiv7003535900hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv7003535900 #yiv7003535900ygrp-sponsor #yiv7003535900ygrp-lc .yiv7003535900ad {margin-bottom:10px;padding:0 0;}#yiv7003535900 #yiv7003535900actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv7003535900 #yiv7003535900activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv7003535900 #yiv7003535900activity span {font-weight:700;}#yiv7003535900 #yiv7003535900activity span:first-child {text-transform:uppercase;}#yiv7003535900 #yiv7003535900activity span a {color:#5085b6;text-decoration:none;}#yiv7003535900 #yiv7003535900activity span span {color:#ff7900;}#yiv7003535900 #yiv7003535900activity span .yiv7003535900underline {text-decoration:underline;}#yiv7003535900 .yiv7003535900attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv7003535900 .yiv7003535900attach div a {text-decoration:none;}#yiv7003535900 .yiv7003535900attach img {border:none;padding-right:5px;}#yiv7003535900 .yiv7003535900attach label {display:block;margin-bottom:5px;}#yiv7003535900 .yiv7003535900attach label a {text-decoration:none;}#yiv7003535900 blockquote {margin:0 0 0 4px;}#yiv7003535900 .yiv7003535900bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv7003535900 .yiv7003535900bold a {text-decoration:none;}#yiv7003535900 dd.yiv7003535900last p a {font-family:Verdana;font-weight:700;}#yiv7003535900 dd.yiv7003535900last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv7003535900 dd.yiv7003535900last p span.yiv7003535900yshortcuts {margin-right:0;}#yiv7003535900 div.yiv7003535900attach-table div div a {text-decoration:none;}#yiv7003535900 div.yiv7003535900attach-table {width:400px;}#yiv7003535900 div.yiv7003535900file-title a, #yiv7003535900 div.yiv7003535900file-title a:active, #yiv7003535900 div.yiv7003535900file-title a:hover, #yiv7003535900 div.yiv7003535900file-title a:visited {text-decoration:none;}#yiv7003535900 div.yiv7003535900photo-title a, #yiv7003535900 div.yiv7003535900photo-title a:active, #yiv7003535900 div.yiv7003535900photo-title a:hover, #yiv7003535900 div.yiv7003535900photo-title a:visited {text-decoration:none;}#yiv7003535900 div#yiv7003535900ygrp-mlmsg #yiv7003535900ygrp-msg p a span.yiv7003535900yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv7003535900 .yiv7003535900green {color:#628c2a;}#yiv7003535900 .yiv7003535900MsoNormal {margin:0 0 0 0;}#yiv7003535900 o {font-size:0;}#yiv7003535900 #yiv7003535900photos div {float:left;width:72px;}#yiv7003535900 #yiv7003535900photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv7003535900 #yiv7003535900photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv7003535900 #yiv7003535900reco-category {font-size:77%;}#yiv7003535900 #yiv7003535900reco-desc {font-size:77%;}#yiv7003535900 .yiv7003535900replbq {margin:4px;}#yiv7003535900 #yiv7003535900ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv7003535900 #yiv7003535900ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv7003535900 #yiv7003535900ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv7003535900 #yiv7003535900ygrp-mlmsg select, #yiv7003535900 input, #yiv7003535900 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv7003535900 #yiv7003535900ygrp-mlmsg pre, #yiv7003535900 code {font:115% monospace;}#yiv7003535900 #yiv7003535900ygrp-mlmsg * {line-height:1.22em;}#yiv7003535900 #yiv7003535900ygrp-mlmsg #yiv7003535900logo {padding-bottom:10px;}#yiv7003535900 #yiv7003535900ygrp-msg p a {font-family:Verdana;}#yiv7003535900 #yiv7003535900ygrp-msg p#yiv7003535900attach-count span {color:#1E66AE;font-weight:700;}#yiv7003535900 #yiv7003535900ygrp-reco #yiv7003535900reco-head {color:#ff7900;font-weight:700;}#yiv7003535900 #yiv7003535900ygrp-reco {margin-bottom:20px;padding:0px;}#yiv7003535900 #yiv7003535900ygrp-sponsor #yiv7003535900ov li a {font-size:130%;text-decoration:none;}#yiv7003535900 #yiv7003535900ygrp-sponsor #yiv7003535900ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv7003535900 #yiv7003535900ygrp-sponsor #yiv7003535900ov ul {margin:0;padding:0 0 0 8px;}#yiv7003535900 #yiv7003535900ygrp-text {font-family:Georgia;}#yiv7003535900 #yiv7003535900ygrp-text p {margin:0 0 1em 0;}#yiv7003535900 #yiv7003535900ygrp-text tt {font-size:120%;}#yiv7003535900 #yiv7003535900ygrp-vital ul li:last-child {border-right:none !important;}#yiv7003535900

Mon Oct 16, 2017 1:33 am (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Wa'alaikumussalam wr wb

Alhamdulillah kalau sudah bisa.

Wassalamu'alaikum wr wb
Kid

2017-10-16 15:18 GMT+07:00 paopao daeng daeng_paopao@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.nmkid@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_paopao@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 nangagus@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_paopao@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
>
>
>
>
>
>
>
>

Mon Oct 16, 2017 2:06 am (PDT) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

Wa'alaikumussalam wr wb

Hai PaoPao,

Sesuai pesan diawal, '(alangkah lebih baik bila disesuaikan ulang dengann
kondisi setempat)'

Pada script mas Nang, prosesnya print seluruh sheet.
Jika dikondisi lapangannya adalah print area range dari A1 sampai K17, ya
cukup area range itu saja yang di-print.
Jadi, disesuaikan dengan kondisi setempat.

Wassalamu'alaikum wr wb
Kid

2017-10-16 14:52 GMT+07:00 paopao daeng daeng_paopao@yahoo.com
[belajar-excel] <belajar-excel@yahoogroups.com>:

>
>
> assalamualaikum wr.wb
>
> Maaf mengganggu lagi Mr. Kid
>
> saya mau tanya lagi..
> kalo perintah diatas saya rubah menjadi "PrintOut", dan saya masukkan lagi
> beberapa "Range" yang banyak, sehingga terdiri dari 4 halaman (4 lembar
> kertas), ketika saya ceklis no. 1 - 3 dan saya print kenapa kok tercetak
> semua sebanyak 4 lembar kertas tp lainnya kosong....
> padahal saya mau yang tercetak cuman range yang terceklist saja tanpa yang
> lain ikut..
>
> MOHON PETUNJUKNYA..
> Wassalamualaikum wr. wb.
>
>
> On Monday, October 16, 2017 10:19 AM, "'Mr. Kid' mr.nmkid@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_paopao@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 nangagus@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_paopao@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
>
>
>
>
>
>
>
>

Sun Oct 15, 2017 8:46 pm (PDT) . Posted by:

"Totong Sutiana"

Dear Mr Kid,

Terimakasih penjelasannya.

Sangat bermanfaat dan memudahkan dalam pekerjaan, bukan hanya saya tp rekan
kerja jg.

Semoga Mr Kid & para master selalu diberikan kesehatan supaya bisa terus
berbagi trik excel.

Salam

Totong

On Sunday, October 15, 2017, 'Mr. Kid' mr.nmkid@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com> wrote:

>
>
> Hai Totong,
>
> Alhamdulillah ada manfaatnya.
> Semoga dimanfaatkan secara santun.
>
> #IF ... #ELSE ... #ENDIF secara fungsi adalah sama persis dengan IF ...
> ELSE ... ENDIF
> Perbedaannya adalah waktu diprosesnya baris tersebut.
>
> Contoh :
> Pada event workbook open, diberi script berikut :
>
> #if Win64 then
> msgbox "Office 64 bit"
> #else
> msgbo "Office 32 bit" 'yang dikuning itu sengaja dibuat salah
>
Diposting oleh EXCEL FEED LEARNING di 19.33

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)