Wa'alaikum Salam Wr. Wb.
mencoba menjawab, semoga sesuai dengan harapan.
dim rgData as Range
set rgData=Range("A1:AZ1")
'jika ingin mencari data dikolom 50
itung=rgData(1,50).value
'sebaliknya jika ingin mengisi di kolom 50
rgData(1,50).value=itung
maaf jika kurang pas...
Wassalam,
-zainul
From: [email protected] [mailto:[email protected]]
Sent: Wednesday, August 27, 2014 9:11 AM
To: BExcel
Subject: [belajar-excel] Alamat Cell
Asalamualaikum warahmatullah;
Saya mau mencari alamat cell (Range) dengan vba, saya terbiasa
menggunakan alamat range menggunakan syntax : Range("A1"),
karena cekrip yang mau dibuat perintahnya membaca Range("A1") sampai
Range("AZ1") berturut-turut satu persatu. (bukan A1:AZ1). Hal ini akan
mudah jika digunakan Loop, namun saya kesulitan mengubah kolom
berdasarkan huruf.
Saya cari di
http://b-excel.blogspot.com.au/2013/09/belajarvba-011-range-01-berdasar-alamat.html
tidak ada, dapatkah ditambah?
Bagaimanakah caranya menulis cekrip, mencari alamat Cell dengan menggunakan RC1?
Tolong diubah cekrip saya di bawah ini.
For itung = 1 to 100
Range("A1").Value = isine (itung) 'sudah saya coba dengan
Cell(1,itung) tidak bisa
Next itung
Terima kasih
Wasalamualaikum
NangAgus
