untuk lebih memudahkan memahami maksud dari yang diharapkan coba dikirimkan attachment riil yang bisa menggambarkan keinginan yang dimaksud. jadi tanggapan yang diberikan akan berusaha mendekati yang diharapkan.
wassalam Ghozi Alkatiri --- Pada Sen, 4/7/11, Bachelor Ard <[email protected]> menulis: Dari: Bachelor Ard <[email protected]> Judul: Re: [belajar-excel] Duplikat data di sheet lain Kepada: [email protected] Tanggal: Senin, 4 Juli, 2011, 12:56 AM terimakasi atas tanggapan guru2 saya.., tapi sebelumnya saya mohon maaf sebelumnya ini dikarenakan pertanyaan saya tadi yang kurang lengkap 1. untk "mas ghozi" saya sudah mencoba karyanya dng mengisi nilai belanja di catatan namun di grand total tidak muncul jumlah grand totalnya malah baris jumlah totalnya tertimpah dengan tambahan data di post pengeluaran 2. untk "mba citi" betul sekalai baris kosong yg ada di antara "nama ProgramSekolah" dan "Subtotal" itu dimaksudkan untuk diisi data unit belanja per-post (dengan manual (diketikkan) pun area bulan jan s/d des. untuk memasukkan besar belnjaan. Mba..... sya cba menambah item post pengeluaran tapi; nomor kode tdk otomatis muncul, dan di gran total tidak muncul sama sekali tambahan itemnya demikian 2 point konfirmsi diatas, semoga masih berkenan membantu, sekali lagi mohon dimaklumi kalau maksud saya belum nyambung From: STDEV(i) <[email protected]> To: [email protected] Sent: Sun, July 3, 2011 9:44:17 PM Subject: Re: [belajar-excel] Duplikat data di sheet lain Seandainya baris kosong yg ada di antara "nama ProgramSekolah" dan "Subtotal" itu dimaksudkan untuk diisi data lain (dengan manual (diketikkan) maupun dng formula) maka penyelesaian dengan rumus tentunya tidak cocok. Karena baris kosong itu dicipta juga dengan rumus, dan harus menghapus data yg sudah ada.. Mungkin... pilihan penyelesaian lain adalah dengan : benar-benar mengcopy (mengisi cell dgn value dari cell lain). Dan ini akan terlaksanan otomatis jika diperbolehkan adanya makro: '--------------Private Sub Worksheet_Change(ByVal Target As Range) '-siti Vi, 03 Juli 2011'---------------------- Dim DafPost As Range, Catatan As RangeDim i As Long, r As Long If Target.Column = 2 Then If Target.Count = 1 Then If Target.Row > 1 Then Set DafPost = Cells(1).CurrentRegion.Offset(1, 0) Set Catatan = Sheets("Catatan Pengeluaran").Range("A2") For i = 1 To DafPost.Rows.Count - 1 r = i * 6 - 5 Catatan(r, 1) = DafPost(i, 1) Catatan(r, 2) = DafPost(i, 2) Catatan(r + 5, 2) = "Subtotal" Next i End If End If End If End Sub'-------------- 2011/7/3 Bachelor Ard <[email protected]> Ass.. alkm.... Bagaimana carany duplikasi data ke-sheet lain dengan posisi t4 beda baris? lebih jelasnya di attac. mohon....!
