السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ



Kepada member B-Excel



Mohon bantuannya untuk mengubah cekrip.



Saya belajar membuat cekrip mencari cell kosong terakhir pada kolom C.

Judul kolom terletak pada baris 2 (“C2”).

Saya membutuhkan nomor baris dengan bantuan cekript:

baris = Range("c1").End(xlDown).Offset(1).Row

sukses untuk data pertama, jika ditambah data selanjutnya akan menumpuk
pada data pertama.



Saya coba dengan mengubah cekript menjadi:

baris = Range("c*2*").End(xlDown).Offset(1).Row

jika cell C3 sudah terisi data pertama, cekript ini sukses untuk mengisi
data ke-2 dan seterusnya, namun apabila data masih kosong melompong cekript
ini menjadi error “ Run-time error ‘1004’:  Aplication-defined or
object-defined error”

Haruskah ditambah IF C3 = “” then …  else …



Atau ada cara lain mengubah cekript tersebut?

Terima kasih.





وَ السَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ



NangAgus

Attachment: Sol_Transpose Data mentah vertikal menjadi table horizontal-1 Macro.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12

Kirim email ke