Coba tambahkan Code:
Sheet2.Cells(Baris + 1, 1).Value = "=N(R[-1]C)+1" 


setelah Code:
Baris = Sheet2.Cells(Sheet2.Rows.Count, "B").End(xlUp).Offset(0, 0).Row




Salam,
HK






________________________________
 From: Endut Karim <[email protected]>
To: [email protected]
Sent: Saturday, 14 September 2013, 0:09
Subject: ]] XL-mania [[ Nomor Urut pada Sheet Hasil [1 Attachment]





 
Yth. Pakar XL-Mania


Saya punya problem masalah Nomor Urut yang tercatat otomatis pada sheet Hasil 
yang data inputnya bersumber pada Sheet Input, penomoran urut sudah saya cari 
di email terdahulu kok belum ketemu.
Mohon solusinya dengan macro, File terlampir


Terima kasih


 

Kirim email ke