Terima kasih pak Tomy atas tambahan penjelasannya. Itu sangat berguna untuk dipelajari
Namun sayangnya [sheets name] yg ada pada workbook saya tidak selalu "Sheet1", "Sheet2",.. "Sheet9" dst Bisa: "Pohon", "Daun", "Bunga", "Buah", "Sayur" dst urutan-letak-nya pun sering ditukar-tukar oleh para user jumlah sheet berkembang; sering bertampah kadang berkurang, tetapi memang keperluannya tetap: ketika worokbook dibuka = diinginkan Sheet terakhir (sheet yg posisi Tab-nya ada di paling kanan) yg otomatis aktif / selected. Dengan makro dari pak Tomy, makro akan selalu membuka sheet bernama "Sheet"&N di mana N adalah jumlah sheet yg ada saat itu misal 5, sedangkan pada workbook, Nama Sheet5 = tidak ada. Ini menyebabkan error msg / memunculkan dialogbox minta pilihan : debugging.. atau [End] mengakhiri eksekusi makro tanpa menghasilkan kehendak yg diinginkan. Mohon bantuannya sekali lagi pak... HerrSoe baru mau jadi pemula makro 2009/12/2 tomy gurtama <[email protected]> > > Dear Pak Herssoe, > Berikut modifikasi untuk memilih sheet yang terakhir. Bila ada 3 sheet dalam > file tersebut maka saat dibuka makro akan menyampaikan pesan (sekedar > mengingatkan ke user), kemudian macro akan memilih sheet yang terakhir > (sheet3). Bila ada 7 sheet...maka macro akan menyesuaikan secara otomatis. > > Dim n As Integer > Dim LastSheet > Sub Auto_Open() > n = Sheets.Count > LastSheet = "Sheet" & n > MsgBox "Last Sheet = Sheet" & n > Sheets(LastSheet).Select > End Sub > > Met dicoba ya pak :D > > Regards, > Tomy GS > > > --- Pada Ming, 29/11/09, HerrSoe <[email protected]> menulis: > Dari: HerrSoe <[email protected]> > Judul: Re: ]] XL-mania [[ Makro untuk sheet terakhir > Kepada: [email protected] > Tanggal: Minggu, 29 November, 2009, 9:51 AM > > Yth Bp Tomy, > wah kebetulan, saya juga mempunyai keperluan yg sama dgn pak Ali > Sayang sekali pak tomy gurtama belum tuntas memberikan pencerahannya. . > > Kalau WORKSHEET TERAKHIR / TERKANAN kami tulis > Sheet5.Select (karna di workbook saat itu ada 5 sheets) > yaitu mengikuti saran Bp Tomy > (= " Kalo mau dimodif ke sheet yang paling kiri atau kanan, silahkan dimodif > aja." ) > maka di lain waktu jika workbook di update (yg menyebabkan jumlah sheet yg > berkurang atau bertambah, maka perintah tsb tidak tidak lagi berlaku; bahkan > dapat menimbulkan > "error" jika saat itu tidak ada Sheet5. > > Keinginan kami: bagaimana cara menuliskan object worksheet terakhir / terkanan > secara soft-coded bukan hard-coded seperti yg sudah Bapak contohkan. > > Mohon pencerahannya pak.. > > best regards, > Heru Soetimbull > > > 2009/11/28 tomy gurtama <gurt...@yahoo. com> > > Coba bikin module baru di VB Editor. Misal yang mau dibuka paling awal > > adalah sheet3, maka codingnya : > > > > Sub Auto_Open() > > Sheet3.select > > Sub > > > > Kalo mau dimodif ke sheet yang paling kiri atau kanan, silahkan dimodif aja. > > Met coba ya :D > > > > --- Pada Rab, 25/11/09, ali_fatkhuri@ yahoo.com <ali_fatkhuri@ yahoo.com> > > menulis: > > kalau aku mau buka file excel otomatis buka sheet yg paling akhir atau > > sheet paling kanan sekali dan select cellnya di A1, makronya gimana ya?
