Bu Siti, saya sudah coba file yang Ibu kirimkan
dan sesuai dengan apa yang saya harapkan.
Dan maaf kalau penjelasan yang saya berikan kurang Ibu mengerti
Kemudian tks all untuk Pak Slamet dan Nm kid atas masukkannya
 
tks
ca2


--- Pada Sab, 20/6/09, siti <[email protected]> menulis:


Dari: siti <[email protected]>
Topik: Re: [belajar-excel] autofill dengan macro excel
Kepada: [email protected]
Tanggal: Sabtu, 20 Juni, 2009, 4:13 PM









Berhubung siti belum faham benar apa yg ingin dilakukan oleh pak iskandar
maka siti hanya kira-kira saja sbb:
1. pak is akan sudah punya FORMULA / RUMUS tertentu
2. rumus itu bisa ditulis dimana saja (di SATU Cell)
(misal di sheet "bgr" cell B2, atau di sheet "rumus" cell A1; terserah saja,
  sheet LAIN tidak jadi masalah)
3. kemudian rumus itu ingin di"Auto-Fill" kebawah sehingga jumlah row yg terisi 
rumus
menjadi SAMA dengan jumlah row yg berisi data di Kolom A pada sheet "bgr"
Makro dalam workbook terlampir dapat melaksanakan pekerjaan tsb
dengan syarat: sebelum dijalankan,  1 (satu) cell pertama berisi RUMUS
misal  B2 di sheet "bgr", harus sudah di-Select (sedang menjadi cell-aktif)
Barulah makro dijalankan.

Mohon dicoba dulu pak
 
'------------ ---
Sub Do_AutoFill_ 1()
   Dim xRange As Range
   Set xRange = Sheets("bgr").Range("A2")
   Set xRange = Range(xRange, xRange.End(xlDown) )
   
   ActiveCell.Resize( xRange.Rows. Count, 1).Select
   Selection.DataSerie s Rowcol:=xlColumns, Type:=xlAutoFill, _
   Date:=xlDay, Trend:=False
End Sub
'------------ ---
2009/6/20 Iskandar Caca <iskandarcaca@ yahoo.co. id>
>
> Dear Bu Siti
> Berikut saya kirimkan contoh
> pada sheet bogor berisi data dan pada sheet rumus saya isikan rumus
> tetapi karena saya tidak tahu syntack yang harus saya gunakan
> autofill tersebut saya lakukan secara manual
> padahal step yang lain menggunakan macro walaupun saya rekam dengan recorder
>  
> masalahnya pada kolom bgr akhir dari baris data kolom A tidak tetap (dinamis)
>  
> tks
> ca2

















      Lebih Bersih, Lebih Baik, Lebih Cepat - Rasakan Yahoo! Mail baru yang 
Lebih Cepat hari ini! http://id.mail.yahoo.com

Kirim email ke