gitu ya.? coba nunggu masukkan BeExceller yang lain dulu ya.. Jan gak punya printer buat ngetes kecepatannya sih.. xixixix ^_^ kasian banget kan.. [?][?][?] (emot gmail kenapa gak ada yang kayak Line ya?)
Wassalam,
-Miss Jan Raisin-
Pada 24 Maret 2014 12.18, prazt <praztm...@gmail.com> menulis:
>
>
> Tapi untuk yg A4 scriptnya ane ganti sbb:
>
> script untuk cetak A4:
>
> Sub Rectangle1_Click()
>
> Worksheets("Sheet1").PageSetup.PrintArea = "$C$4:$I$322"
>
> With Worksheets("Sheet1").PageSetup
>
> .Orientation = xlPortrait
>
> .PaperSize = xlPaperA4 'saya ganti disini
>
> .FirstPageNumber = xlAutomatic
>
> .Zoom = 100
>
> .RightMargin = Application.InchesToPoints(0.2)
>
> .LeftMargin = Application.InchesToPoints(0.6)
>
> .TopMargin = Application.InchesToPoints(0.4)
>
> .BottomMargin = Application.InchesToPoints(0.2)
>
> End With
>
> End Sub
>
>
>
> Kecepatan loadingnya tidak selama yg Folio mis Jan, gmn itu hehehehe
>
> *From:* belajar-excel@yahoogroups.com [mailto:
> belajar-excel@yahoogroups.com] *On Behalf Of *Jan Raisin
> *Sent:* 24 Maret 2014 11:55
>
> *To:* belajar-excel@yahoogroups.com
> *Subject:* Re: [belajar-excel] mengatur ukuran kertas dengan vba
>
>
>
>
>
> Oh.. begitu ya..
>
>
>
> maaf Jan yang salah kalo gitu xixixixi ^_^
>
> yuk kita bandingkan script antara cetak Folio dengan cetak A4
>
>
>
> script untuk cetak Folio:
>
> Sub Rectangle1_Click()
>
> Worksheets("Sheet1").PageSetup.PrintArea = "$C$4:$I$322"
>
> With Worksheets("Sheet1").PageSetup
>
> .Orientation = xlPortrait
>
> .PaperSize = 220
>
> .FirstPageNumber = xlAutomatic
>
> .Zoom = 100
>
> .RightMargin = Application.InchesToPoints(0.2)
>
> .LeftMargin = Application.InchesToPoints(0.6)
>
> .TopMargin = Application.InchesToPoints(0.4)
>
> .BottomMargin = Application.InchesToPoints(0.2)
>
> End With
>
> End Sub
>
>
>
> script untuk cetak A4:
>
> Sub Rectangle2_Click()
>
> Worksheets("Sheet1").PageSetup.PrintArea = "$C$4:$H$22"
>
> Worksheets("Sheet1").PageSetup.PaperSize = xlPaperA4
>
> End Sub
>
>
>
> setiap 1 buah titik mewakili 1 buah tugas yang harus dikerjakan oleh Excel
>
> pada script yang untuk cetak A4 hanya ada 4 buah titik yang berarti ada 4
> buah tugas yang dikerjakan oleh Excel, yaitu:
>
> 1. masuk ke page setup
>
> 2. atur print area mulai cel C4 sampai H22
>
> 3. masuk ke page setup
>
> 4. pilih ukuran kertas menjadi A4
>
>
>
> sekarang bandingkan dengan script yang folio.. kelihatan kan yang
> menyebabkan perbedaan
>
>
>
> berikutnya adalah luas area yang mau dicetak,
>
> Awal | Akhir
>
> A4 : C4 | H22
>
> Folio : C4 | I322
>
>
>
> posisi cel awal sama.. tetapi posisi Cel ahirnya berbeda, yang satu di
> kolom H sedangkan yang satunya lagi di kolom I
>
> yang satu cuma sampai baris 22 (puluhan), sedangkan yang satunya lagi
> sampai baris 322 (ratusan)
>
>
>
> kira-kira begitu kali ya..
>
>
>
> Wassalam,
>
>
>
> -Miss Jan Raisin-
>
>
>
> Pada 24 Maret 2014 11.29, prazt <praztm...@gmail.com> menulis:
>
>
>
> Maaf mis Jan jika salah persepsi, yang saya maksud bukan kecepatan
> cetaknya, tapi kecepatan loading macronya, jika saya ceklik untuk tombol
> yang F4 (folio) loading macronya agak lambat sedangkan jika saya ceklik
> pada tombol yang A4 dengan scribd seperti yang tadi saya lampirkan kok
> cepat, nah pertanyaan bagaimana supaya jika di ceklik tombol F4 (folio)
> loading macronya tidak terlalu lama ya minimal secepat yang tombol A4
>
>
>
>
>
> ------------------------------
> <http://www.avast.com/>
>
> Email ini bebas virus dan malware karena avast!
> Antivirus<http://www.avast.com/>proteksi aktif.
>
>
>
<<inline: image001.png>>
<<inline: 334.gif>>
