Mr Kid, Thanks respon nya.
Mungkin pertanyaan nya apakah metode memasukan nilai yang ada di range, dengan cara For Next di code saya sudah benar ? :) mohon koreksi dari Mr Kid dan teman2 disini terhadap code saya. Salam Sony 2013/6/14 Mr. Kid <[email protected]> > ** > > > Eh lupa. > > Untuk copy paste data dari suatu range ke range lain, bisa dengan : > 1. copy paste seluruhnya > range(asal).copy range(tujuan) > contoh : > range("a1:a4").copy range("j1:j4") > atau > range("a1:a4").copy range("j1") > > jika antar worksheet > sheets("nama sheet asal").range("a1:a4").copy sheets("nama > sheet tujuan").range("j1") > > 2. copy paste special values > range(asal).copy > range(tujuan).pastespecial xlpastevalues > > Wassalamu'alaikum Wr. Wb. > Kid. > > > > > 2013/6/14 Mr. Kid <[email protected]> > >> 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 >>> >>> >>> >>> >> > >
