Dear Mr Kid…
Alhamdulillah… Amazing, setelah diotak-atik dibolak-balik sukses 100%, terima kasih atas masukannya. File terlampir adalah bukti kesuksesannya. Semoga Anda selalu diberi kesehatan khususnya dan seluruh member group ini umumnya. Salam, DD From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] Sent: 27 November 2015 09:39 To: BeExcel Subject: Re: [belajar-excel] Hide Row jika Cell Blank hmmm... No.1 data hanya dilihat dan tidak diinput No.3 yang dilakukan user hanya memilih outline number saja dan angka di cell yang terlihat hanya ada angkanya Coba begini : 1. disebuah cells bantu diberi formula =Now() lalu di atur format number custom diisi ;;; (3 bijik titik koma). letak cells bantu dalam sheet output tersebut adalah bebas alias dimana saja. Kalau ingin lebih nyaman, jangan di area yang dikenai outline dan bila perlu di-hide kolom atau barisnya. 2. semua event milik worksheet tersebut, yang bukan event calculate, diberi tambahan baris kode : > di baris pertama setelah baris deklarasi variabel di setiap prosedur event application.enableevents=false > di baris terakhir sebelum end sub di setiap prosedur event application.enableevents=true 3. di event calculate milik si worksheet, diisi baris kode berikut : Asumsi : a. nama object dari worksheet bernama 'Sheet1' (di preview, tab sheet nya bertuliskan begitu) adalah Sheet1 (biasanya, sheet pertama yang masih ori peletakannya, akan diberi object name Sheet1) -> sesuaikan dengan keadaan setempat b. kolom kuncinya adalah kolom C, misal range c1:c17 (di preview, data terakhir di c16, lalu dilewatkan 1) -> sesuaikan dengan keadaan setempat. c. kriteria yang di-hide adalah yang blank cells dan bukan yang berisi nullstring alias hasil "" di formula if activesheet.name=sheet1.name then 'yang dikalkulasi adalah sheet yang aktif [sesuaikan dengan keadaan setempat] on error resume next 'abaikan error application.enableevents=false 'turnoff responsif excel terhadap suatu tindakan range("c1:c17").specialcells(xlcelltypeblanks).entirerow.hidden=true 'hide yang sesuai kriteria application.enableevents=true 'turnon responsif excel terhadap suatu tindakan err.clear 'hapus error on error goto 0 'kembalikan trap error ke default setting nya endif Selamat mencoba. Wassalamu'alaikum wr wb Kid 2015-11-27 8:02 GMT+07:00 'Dede Sulaeman' pmaho_l...@pinusmerahabadi.co.id [belajar-excel] <belajar-excel@yahoogroups.com>: Dear : Mr. Kid Untuk pertanyaan : No.1 data hanya dilihat dan tidak diinput No.2 memilih outline karena file sudah berat dan untuk melihat cell yang ada isinya lebih simple dibanding pivot, dikarenakan form sudah baku dan memilih dengan outline lebih mudah untuk yang awam menggunakan excel ^_^. No.3 yang dilakukan user hanya memilih outline number saja dan angka di cell yang terlihat hanya ada angkanya, karena Row terlalu banyak sehingga lebih mudah user melihat angka dengan menggunakan outline. Mohon Bantuannya para suhu ^_^ Salam, DD From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] Sent: 27 November 2015 07:46 To: BeExcel Subject: Re: [belajar-excel] Hide Row jika Cell Blank Hai DD, hmm... maaf ya, nambah nanyanya gpp kan ya... 1. sheet ini sebagai salah satu output untuk melihat-lihat data atau sebagai area input data ? 2. kenapa memilih outline ? apa tujuan awalnya, sehingga memilih menggunakan fitur outline ? 3. apa saja yang bisa dilakukan user terhadap outline tersebut ? Bukan masalah bisa atau tidak bisa, tetapi diperkirakan ada yang tidak pas antara apa yang Anda inginkan dengan menfaat outline itu sendiri. Jadi, kasus ini bukan sekedar bisa hide blank cells yang bisa diatur dengan hide row. Pokok masalahnya justru bukan diproses hide/unhide nya. btw, bisa jadi dugaan saya yang tersebut di atas justru keliru. Akhirnya, malah jadi kebanyakan bertanya daripada urun solusi. maaf ya. pertanyaan pertama tentang penggunaan pivot table di email lalu bukanlah saran untuk menggunakan pivot table, tetapi lebih mengarah ke batasan struktur dan memastikan tujuan utama kasus yang menyebabkan penghindaran pemanfaatan proses yang lebih mudah dan lebih tepat guna. sedangkan rangkaian pertanyaan yang ini akan mengarah kemana ya... wakakaka... mungkin karena kid lagi iseng... Wassalam, Kid 2015-11-27 7:23 GMT+07:00 'Dede Sulaeman' pmaho_l...@pinusmerahabadi.co.id [belajar-excel] <belajar-excel@yahoogroups.com>: Dear Mr Kid, File lampiran yang lalu adalah sebagai contoh dari form asli, sedangkan form asli sudah dibakukan sehingga tidak dapat untuk dirubah. Apakah macro memungkinkan bekerja dengan form seprti itu (bekerja saat outline dipilih 2,3,dan4) Note: form Asli sebenarnya mencapai level 4 Salam, DD From: belajar-excel@yahoogroups.com [mailto:belajar-excel@yahoogroups.com] Sent: 26 November 2015 11:19 To: BeExcel Subject: Re: [belajar-excel] Hide Row jika Cell Blank Wa'alaikumussalam wr wb Hai DD, Boleh tahu kenapa tidak pakai Excel Pivot Table ? Wassalamu'alaikum wr wb Kid 2015-11-26 10:52 GMT+07:00 'Dede Sulaeman' pmaho_l...@pinusmerahabadi.co.id [belajar-excel] <belajar-excel@yahoogroups.com>: Dear BeExceller, Assalamu’alaikum Wr Wb... Mohon koreksinya trhadap sricpt macro pada file terlampir. Harapannya adalah pada saat saya klik Group OutLine no 2 dan 3, maka cell kosong (Blank) terhidden otomatis. Wassalamu’alaikum Wr Wb... Salam, DD
Mr Dav.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12
