Wa'alaikumussalam Wr. Wb.
Coba baris :
Dim Data1() As String
diganti dengan :
dim Data1( 1 to 4 ) as string
Sekalian juga, coba diperhatikan baris berbunyi :
Data1(N) = ActiveCell.Value
Artinya :
"Simpan nilai dalam aktif cell ke variabel data1 elemen ke-N"
Jadi, yang dikiri tanda sama dengan adalah tujuan atau lokasi penyimpanan
dan yang dikanan sama dengan adalah nilai yang akan disimpan.
Menyimpan data ke variabel tertentu artinya, variabel tertentu diletakkan
di kiri sama dengan
Menyimpan data ke cell tertentu (atau menulis ke cell) artinya, cell
tertentu diletakkan di kiri sama dengan
Wassalam,
Kid.
2013/6/14 Sony Ario <[email protected]>
> **
>
>
> Assalamualaikum Be-Excelers.
>
> Mohon bantuan. Di file terlampir saya bermaksud mengisi variable Data1
> dengan menggunakan looping (For... Next) yang data nya ada di range G1
> sampai dengan G4. Sudah coba berapa kali tapi tetap nggak bias ya ? yang
> ingin saya lakukan adalah isi variable Data1 tsb, setelah terisi, dengan
> menggunakan looping, menulis data tsb mulai dari Range J1.
>
> Kendengaran nya simple ya ? maklum saya nubie banget. Disisi lain pikiran
> juga lagi buntu banget.. hehehe..
>
> terima kasih sebelumnya.
>
> Wassalam
> Sony
>
>
>
>
>