Yth. Pak MrKid Belum maknyuss, Mungkin kodenya msh kurang pas. Tapi lupakan saja lah, sbb saya sudah 'nggak nafsu lagi sama fitur spreadsheet'. Gara-garanya, Tadi saya jalan2 ke postingan lama dan ke excel help, konon penggunaan fitur spreadsheet lebih ditujukan untuk keperluan sharing data tabel antara bbrp user di Web, agar semua user bisa berinteraksi langsung dengan tabel tsb. Padahal kebutuhan saya nggak se-ribet itu :D.
Yang saya inginkan hanya memfilter data tabel di sheet sumbe sesuai kriteria tertentu, lalu data hasil filter tsb ditampilkan pada control (tool??) Spreadsheet untuk diedit. Nah data hasil editan tsb kemudian dikembalikan lagi ke sheet sumber. Nampaknya control spreadsheet kurang praktis untuk keperluan dimaksud. Mohon komentarnya, Pak MrKid dan rekan-rekan. Terima kasih sebelumnya. Salam Sinurat --- In [email protected], "Mr. Kid" <mr.nmkid@...> wrote: > > Coba ubah bagian yang berbunyi : > With Spreadsheet1 > .Range("A4:F4").Resize(lRec).Value = rngData.Value > .Range("B:B").NumberFormat = "dd MMM yyyy" > .Range("D:F").NumberFormat = "#,##0" > .Range("A:F").AutoFit > End With > > menjadi : > With Spreadsheet1 > .enableevents=false > with.activeworkbook.activesheet > .Range("A4:F4").Resize(lRec).Value = rngData.Value > .Range("B:B").NumberFormat = "dd MMM yyyy" > .Range("D:F").NumberFormat = "#,##0" > .Range("A:F").AutoFit > end with > .enableevents=true > End With > > Jadi, object Application dalam Excel setara dengan object nama object OWC11 > spreadsheet control > Perhatian, Object control OWC11 Spreadsheet tidak sama dengan Excel , > sehingga bisa jadi ada kemampuan Excel yang tidak ada dalam object OWC11 > Spreadsheet. > > Wassalam, > Kid. > > > > > 2013/6/19 Imam Sinurat <sin.ur4t@...> > > > ** > > > > > > Yth. Para pakar dan rekan excelers.. > > > > Mohon dibantu bagaimana cara mengedit data terpilih (hasil filter) via > > spreadsheet control di dalam userform, > > lalu mengembalikannya ke dalam tabel data asli. Saya pakai OWC versi 11. > > > > Terima kasih sebelumnya. > > > > Wassalam > > Sinurat > > > > > > >
