terima kasih mr kid & mbak siti atas responnya semua akan saya jadikan tambahan referensi saya. ada keinginan saya yang masih belum terpenuhi saya biasanya menggunakan record macro untuk mencuri point step by step dengan modifikasi beberapa step sebatas yang saya sudah pahami carannya. untuk kasus yang saya tanyakan ini biasanya saya membuat cell bantu yang berisi formula yang akan menjadi tujuan paste dari input data di cell asal. misalkan dalam kasus ini cell asal yang hasilnya akan dicopy adalah E6 cell bantu yang berisi formula yang akan menghasilkan target adalah A1. dan cell A1 ini saya beri nama refcell maka selama ini prosedur macro yang saya gunakan adalah sbb:
Sub Macro2()
'
' Macro2 Macro
'
'
Range("E6").Select
Application.CutCopyMode = False
Selection.Copy
Range(Range("refcell").Value).PasteSpecial xlPasteValues, Transpose:=False
Application.CutCopyMode = False
Range("E6").Select
End Sub
secara hasil no problem .tapi kurang keren gitu lho.
yang saya inginkan adalah bagaimana seandainya saya tidak menggunakan cell
bantu di dalam perujukan ke cell target .
tapi bunyi formulanya atau define name dari formulanya dimasukkan langsung ke
dalam prosedur macro tanpa merujuk ke cell bantu lebih dulu seperti contoh
prosedur macro tersebut di atas.
wassalam
Ghozi Alkatiri
--- Pada Rab, 18/5/11, STDEV(i) <setiyowati.d...@gmail.com> menulis:
Dari: STDEV(i) <setiyowati.d...@gmail.com>
Judul: Re: [belajar-excel] macro ke referensi cell hasil formula
Kepada: belajar-excel@yahoogroups.com
Tanggal: Rabu, 18 Mei, 2011, 4:58 AM
sebagai penggemar berat FORMULA, pak ghozi akan menuliskan sesuatu
di cell dengan makro, tetapi letak cell dimana data harus dituliskan; =
tetap dicari dengan FORMULA. Kombinasi dua kekuatan excel !
Dari sisi lain ( ini sekedar memperkenalkan kerja makro) bahwa letak cellyg
dicari dengan formula itu, tidak harus dicari dengan formula;
Berhubung kita sudah "terlanjur" memakai makro, maka makro itu pulalah yg
dapat kita SURUH sekaligus mencari posisi cell tempat data akan di tuliskan.
di sini kita pakai versi panjang dulu
- pencarian posisi cell dengan mencari koordinatnya (Row Index & Kolom Index)
disuatu TABEL yg kita tentukan POJOK KIRI ATASnya lebih dulu. Set Tabel =
Sheet1.Range("D12")
- Row Index maupun Kolom Index dicari dengap LOOP For - Next
(mungkin ada yg bilang kelamaan, tetapi ini kan sambil belajar loop
lain kali kita praktekkan dgn WorksheetFunction.Match(------) )- setiap cell
di kolom/baris berisi label, ditest apakah berisi label yg dicari
Jika suatu saat ketemu, maka Nilai R (atau C) diberi nilai = pencacah Loop
(counter) Proses seperti ini persis dengan cara-kerja fungsi MATCH dgn
match_type = 0.
- sekalian: jika ternyata Row/Kolom Index tidak ditemukan (misalnya dicari
label
"duabelas" padahal label terbesar hanya "sebelas"); maka sambil
menghentikan proses, juga dimunculkan pemberitahuan (MsgBox)
- setelah sepsang koordinat ditemukan; yaitu RowIndex (diwakili variable R) dan
Kolom Index (diwakili variabel C); maka alamat cell yg akan diberi data
hanyalah
sebuah object range yg dapat diexpresikan dengan : TABEL(R,C)
Sedangkan Proses pengisiannya: TABEL(R,C) = Sheet1.Range("G7").Value
Mudah mudahan semakin jatuh cinta kpd vba...
2011/5/17 ghozi alkatiri <ghozialkat...@yahoo.co.id>
gantian aku yang mau tanya soal macro sekarang
bagaimana bunyi
prosedur macro yang bisa mengcopy nilai dari sebuah cell, ke cell
lainnya yang referensi cell targetnya dihasilkan dari sebuah formula.
unutk lebih jelasnya contoh kasus ada di attachment, dengan command
button yang siap diassign maco tersebut.
wassalam
Ghozi Alkatiri
ghozi 18052011 makro ke referensi cell yg letaknya masih harus dikalukasi dulu.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12
