Hasil uji coba saya,
- Ok, jika Workbooks("Keuangan.xls") dalam keadaan terbuka
- Tidak Ok, jika Workbooks("Keuangan.xls") dalam keadaan tertutup (ada pesan
Run-time Error '9", Subscript out of Range)
Salam,
HK
________________________________
From: Mr. Kid <[email protected]>
To: BeExcel <[email protected]>
Sent: Wednesday, 7 August 2013, 5:08
Subject: Re: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
ops, kok sampai sekarang belum ada lampiran hasil uji cobanya ya.
Adakah BeExceller yang bersedia berbagi hasil uji cobanya, terutama yang baru
bersemangat belajar VBA.
Ditunggu loh share hasil uji cobanya.
Wassalam,
Kid.
2013/8/2 Mr. Kid <[email protected]>
Bagaimana jika Anda melampirkan kedua file (laporan.xls dan keuangan.xls) yang
bermasalah. Justri belajar dari suatu kesalahan akan lebih banyak bermanfaat
bagi khalayak. Bukankah banyak orang tidak mau mengalami nasib serupa dengan si
A yang begini begitu dibandingkan meneladani si B yang tidak pernah tertimpa
hal begono atau begunu.
>
>Wassalam,
>Kid.
>
>
>
>
>
>
>
>
>2013/8/2 Ahmad Syaifullah Lubis <[email protected]>
>
>
>>
>>Mr Kid,
>>ijinkan saya diberikan contoh file xls yg sudah ada macro dimaksud. karena
>>saya bolak balik ikutin instruksinya gak bisa2 juga. errornya di ("B3:G9")
>>
>>yang mana setelah ALT 11 saya klik insert procedure kan. terus saya langsung
>>copy macronya. saya run , tapi error hasilnya.
>>
>>
>>>> aktifkan workbook bernama Laporan.xls, ke VBE (ALT F11) -> Insert sebuah
>>>> general module -> buat sebuah blok prosedur Sub ber-scope public dengan
>>>> nama sesukanya -> isi blok persedur tersebut dengan script :
>> Workbooks("Keuangan.xls").Worksheets("Dataku").Range("B3:G9").Copy
>>[pastikan tidak ada spasi dan seluruhnya sebagai 1 (satu) baris kode]
>>
>>
>>
>>________________________________
>>To: [email protected]
>>From: [email protected]
>>Date: Fri, 2 Aug 2013 10:17:21 +0700
>>Subject: Re: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
>>
>>
>>
>>
>>
>>Hai Ahmad,
>>
>>Jika diikuti ceritanya :
>>1. Misalkan ada dua buah workbook yang terbuka
>>
>>>> Artinya, buka Excel. Lalu menu File Open -> pilih workbook pertama,
>>>> kemudian menu FIle Open -> pilih workbook kedua
>>
>>2. yaitu bernama Keuangan.xls dan Laporan.xls
>>>> jadi, workbook pertama dinomor 1 itu adalah memilih file bernama
>>>> Keuangan.xls
>>dan workbook kedua dinomor 1 itu adalah memilih file bernama Laporan.xls
>>
>>>> Jika belum punya, maka harus buat dulu file Keuangan.xls dan Laporan.xls
>>(2 bijik workbook format xl2003 file karena xls. kenapa ? agar seluruh
>>BeExceller yang masih pakai xl2003 bisa ikut menikmatinya)
>>
>>
>>3. yang masing-masing berisi banyak worksheet.
>>
>>>> setiap file dipastikan berisi banyak sheet (minimal 3 atau 4 sheet lah
>>>> biar muanteb), lalu di save
>>
>>4. Ketika bekerja pada workbook Laporan.xls bisa menggunakan nilai yang ada
>>dalam workbook Keuangan.xls pada sheet bernama Dataku
>>>> berarti di file Keuangan.xls, salah satu sheet dari banyak sheet yang ada
>>>> di file tersebut harus diberinama Dataku
>>
>>
>>5. di range dengan alamat B3 sampai G9.
>>
>>>> isilah nilai sesuka Anda dari B3 sampai G9. Bisa copas dari mana saja atau
>>>> buat acak.
>>
>>
>>6. Artinya, dari workbook Laporan.xls
>>
>>>> aktifkan workbook bernama Laporan.xls, ke VBE (ALT F11) -> Insert sebuah
>>>> general module -> buat sebuah blok prosedur Sub ber-scope public dengan
>>>> nama sesukanya -> isi blok persedur tersebut dengan script :
>> Workbooks("Keuangan.xls").Worksheets("Dataku").Range("B3:G9").Copy
>>
>>[pastikan tidak ada spasi dan seluruhnya sebagai 1 (satu) baris kode]
>>
>>
>>7. Simpan kedua workbook dan aktifkan workbook Laporan.xls
>>
>>
>>8. Jalankan blok prosedur yang Anda buat
>>
>>
>>9. Lihat di workbook keuangan pada sheet bernama Dataku diarea range B3:G9
>>sudah ada semut jalan dipinggir areanya.
>>
>>;)
>>
>>
>>Wassalam,
>>Kid.
>>
>>
>>
>>
>>
>>2013/8/1 Ahmad Syaifullah Lubis <[email protected]>
>>
>>
>>>
>>>
>>>
>>>Mr Kid,
>>>saya sudah masuk object2 utama dalam excel. saya baru masuk pada contoh 1:
>>>menggunakan workbook lain, saya ingin coba jalankan macro yg tertera disitu,
>>>tetapi gak jalan, pesan errornya compile error: invalid outside procedure.
>>>di VBA tersorot ("B3..G9") itu yang salah.
>>>Panduan Penggunaan object-nya adalah sebagai berikut :
>>> Workbooks("Keuangan.xls").Worksheets("Dataku").Range("B3:G9").Copy
>>>
>>>Artinya, dari workbook Laporan.xls, hubungi workbook bernama
Keuangan.xls yang sedang terbuka. Kemudian ke worksheet bernama Dataku
yang ada di workbook Keuangan.xls yang telah dihubungi tersebut. Di
worksheet bernama Dataku tersebut, lakukan pemilihan cells agar didapat
range mulai dari B3 sampai G9. Range yang dituju tersebut di-Copy ke
clipboard.
>>>
>>>mohon bantuannya.
>>>terima kasih.
>>>ASL
>>>
>>>
>>>
>>>________________________________
>>>To: [email protected]
>>>From: [email protected]
>>>Date: Sun, 28 Jul 2013 00:04:33 +0700
>>>Subject: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
>>>
>>>
>>>
>>>
>>>
>>>Dear BeExceller,
>>>
>>>Dalam Excel VBA akan sering berseliweran yang namanya Workbook, Worksheet,
>>>maupun range. Hal yang disebutkan tersebut adalah object-object utama dalam
>>>Excel.
>>>
>>>
Ada baiknya, sebelum melangkah lebih jauh, kita kenal lebih dulu tentang
object-object utama tersebut. Untuk hal ini, silakan jalan-jalan kesini.
>>>
>>>
>>>
>>>Wassalam,
>>>
>>>Kid.
>>>
>>>
>>>
>>>
>>
>>
>
