Lebih baik posting sample workbooknya atau mungkin gini maksudnya
With Range(B1)
.FormulaR1C1 = =RC[-1]*RC[-1]
.Select
.AutoFill Destination:=Range(B1:B10)
End With
Wassalam
2009/6/20, iskandarcaca iskandarc...@yahoo.co.id:
Dear All,
Salam kenal,
saya baru kali ini bergabung di
masalah *data dinamis* di kolom A
dapat diatasi dengan mendifine variable ObjectRange yg memanfaatkan method
End(parameter)
misalnya
dim MyDataInA as range
set MyDataInA = *Range(*Range(A1), Range(A1).End(xlDown)*)*
trusss..
di range tsb anda dapat menuliskan autofill (angka urutkah?)
dlm gaya
menulis:
Dari: Slamet Harto slametha...@wiendi.web.id
Topik: Re: [belajar-excel] autofill dengan macro excel
Kepada: belajar-excel@yahoogroups.com
Tanggal: Sabtu, 20 Juni, 2009, 6:43 AM
Lebih baik posting sample workbooknya atau mungkin gini maksudnya
With Range(B1)
.FormulaR1C1 = =RC[-1]*RC
Ikutan ya...
Public Sub CopyRumus()
Dim sArea As String
sArea =
Range(a2).CurrentRegion.Offset(columnoffset:=1).Resize(columnsize:=1).Address
Range(b1).Copy 'copy rumus dari cell b1 yang ada template
rumusnya
Range(sArea).PasteSpecial xlPasteFormulas
Ok saya coba dulu ya
tks
ca2
--- Pada Sab, 20/6/09, nm kid nmkid.fam...@gmail.com menulis:
Dari: nm kid nmkid.fam...@gmail.com
Topik: Re: [belajar-excel] autofill dengan macro excel
Kepada: belajar-excel@yahoogroups.com
Tanggal: Sabtu, 20 Juni, 2009, 12:12 PM
Ikutan ya...
Public Sub
Ok saya coba dulu ya Pak Slamet
Maaf mungkin penjelasan saya kurang dimengerti
tks
ca2
--- Pada Sab, 20/6/09, Slamet Harto slametha...@wiendi.web.id menulis:
Dari: Slamet Harto slametha...@wiendi.web.id
Topik: Re: [belajar-excel] autofill dengan macro excel
Kepada: belajar-excel
6 matches
Mail list logo