Kira Excel worksheet yang terlalu banyak

Bila seorang staff merungut yang satu file Excel dia tiba2 jem, kita pun buatlah satu edisi siasat. Bila dah siasat on-site, baru la kita tahu yang workbook (File Excel) dia tu ada banyak sangat worksheet. Lepas tu pulak, memory pc dia pun minimum saja, pc lama pulak tu. Patut pun..

Sebenarnya keupayaan maksima bagi jumlah worksheet untuk di dalam sesuatu workbook bergantung kepada ukuran memory pc itu sendiri. Tapi untuk versi Excel 2003 dan ke bawah, jumlah maksima worksheet adalah 255.

Jadi untuk mengelak masalah ni dari berulang, workbook yang besar ni kena dipecah dan pisah sebelum boleh disusun-atur kepada beberapa workbook kecil. Tapi macam mana nak tahu dengan tepat berapa jumlah worksheet dalam workbook tu? Nak kira secara manual setiap satu worksheet memang tak praktikal. Cara yang lebih mudah ialah mengguna-pakai UDF (user-define-function). Cara2nya:

1. Buka satu workbook.
2. Masuk dalam VBA (Alt+F11 atau Tool – Macro – VB Editor)
3. Masukkan Module baru (Insert – Module)
4. Copy dan Paste function ini:

Function worksheetcount()
worksheetcount = Worksheets.Count
End Function

5. Keluar dari VBA (Alt+Q)
6. Gunakan function ni (Shift+F3 atau Insert – Function), di bawah select a category pilih user defined. Di bawah select a function, select UDF anda dan klik OK.


cheers.