Terima kasih atas jawaban dan perhatiannya. Tapi sepertinya code ini
sangat panjang menurut saya. Dan code dari Mr. Kid lebih pendek yaitu Range(
Range("d3") , range("d3").end(xldown) ).name = "RangeNama" .
Wassalam.
Tio
[email protected]
Sent by: [email protected]
01/28/2013 10:45 AM
Please respond to belajar-excel
To: [email protected]
cc:
Subject: Re: [belajar-excel] Buat Nama Range di range tertentu
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
From: [email protected]
Sender: [email protected]
Date: Mon, 28 Jan 2013 09:37:52 +0700
To: [email protected]<[email protected]>
ReplyTo: [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