Sub proses()
Dim barisakhir as range
Dim rangenama, rangeD as range
With activesheet
barisakhir = cells.specialcells(xlcelltypelastcell).row
End with
Set rangeD = Activesheet.range([D3], ”D” & barisakhir)
Activeworkbook.names.Add Name:=”rangenama”, refersTo:rangeD
End Sub
-----Original Message-----
From: [email protected]
Sender: [email protected]
Date: Mon, 28 Jan 2013 09:37:52
To: [email protected]<[email protected]>
Reply-To: [email protected]
Subject: [belajar-excel] Buat Nama Range di range tertentu
Dear Be-Exceller,
Saya mau buat nama range dari cel D3:D7, saya sudah buat code VBA sbb. :
tapi tidak berhasil, file terlampir :
Tolong pencerahannya,
Terima kasih,
Wassalam,
Tio
