Pak Hendrik,
saya pakai cara ke 2 yaitu
Workbooks("Keuangan.xlsx").Worksheets("Dataku").Range("B3:G9").Copy
dan saya tekan "ENTER" di workbooks laporan.xlsx barulah data2 yang ada di
worksheet "Dataku" workbooks "Keuangan.xlsx masuk ke laporan.xlsx.
terima kasih banget sudah memberikan solusi kepada saya yang rendah ilmu dan
gak sanggup belajar teori2 macro, gak sanggup memory saya pak.
Cuman saya mau tanya lagi nih, apakah memang mesti ditekan "ENTER" dulu baru
data2 yang mau dicopy bisa masuk ke worksheets dimaksud. tolong dong gimana
caranya. Dari solusi2 inilah baru saya dapat memahami fungsi dan kegunaan macro
tsb. semoga gak bosan ya pak Hendrik.
terima kasih.
ASL
To: [email protected]
From: [email protected]
Date: Mon, 12 Aug 2013 20:25:28 -0700
Subject: Re: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
Pak Ahmad,Dari contoh file yang anda lampirkan, anda pasti memakai Excel Versi
2007 ke atas.Default file extensionnya adalah .xlsx (save as Excel Workbook)
dan file yang berisi Macro harus disave dengan extension .xlsm (Excel
Macro-Enabled
Workbook). Namun demikian, sesuai saran Mr Kid, kedua file tsb (keuangan dan
laporan) bisa di save dengan extension .xls (Excel 97-2003 workbook).
Jadi dengan menggunakan Excel Versi 2007 ke atas, ada 2 alternatif code yang
bisa dibuat:1. Jika file diSave as sebagai Excel 97- 2003 (sesuai saran Mr.
Kid) Workbooks("Keuangan.xls").Worksheets("Dataku").Range("B3:G9").Copysuai
saran Mr. Kid2. Jika file diSave as sebagai Excel 2007 ke atas (sesuai contoh
file anda) Workbooks("Keuangan.xlsx").Worksheets("Dataku").Range("B3:G9").Copy
(perhatikan warna hijau).
Code tsb harus berada di dalam suatu Prosedur (diantara Sub ..... End Sub),
bukan di luarnya.
Jadi di VBE Sheet module1 (setelah insert module) harus tertulis seperti ini:1.
Jika file diSave as sebagai Excel 97- 2003 (sesuai saran Mr. Kid)
Public Sub Tes()
Workbooks("Keuangan.xls").Worksheets("Dataku").Range("B3:G9").Copy 'Code berada
diantara Sub .... End SubEnd Sub2. Jika file diSave as sebagai Excel 2007 ke
atas (sesuai contoh file anda)Public Sub Tes()
Workbooks("Keuangan.xlsx").Worksheets("Dataku").Range("B3:G9").Copy 'Code
berada diantara Sub .... End SubEnd Sub
JIka File diSave as sebagai Excel 2007 (extension.xlsx) tapi Codenya
menggunakan Excel 97-2003 (extension .xls) maka akan timbul pesan (error)
"Subscript out of range). Pesan yang sama akan terjadi jika file keuangan dalam
keadaan tertutup (lihat hasil uji coba saya di bawah).
Pesan (error) "compile error: invalid outside procedure"
terjadi karena Codenya berada di luar struktur "Sub .... End Sub".
Terlampir adalah file laporan versi Excel 2007 ke atas yang sudah ada macronya
(extension .xlsm) dan contoh code yang berada di luar prosedur.
Untuk menjalankan file berisi macro, macronya harus
diaktifkan terlebih dahulu; coba link ke
https://www.dropbox.com/s/shjx4cfdukukg07/Cara%20buka%20Macro%20Security.docx
Selamat mencoba.
Salam,HK
From: Ahmad Syaifullah Lubis <[email protected]>
To: "[email protected]" <[email protected]>
Sent: Monday, 12 August 2013, 10:01
Subject: RE: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
Mr Kid,
Maaf saya tidak mengerti cara memulai macronya.
ASL
To: [email protected]
From: [email protected]
Date: Tue, 6 Aug 2013 21:27:29 -0700
Subject: Re: [belajar-excel] BelajarVBA : Kenalan dengan object Range yuk...
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.
