Mantab... Alhamdulillah sdh work.. Terima Kasih Miss.. Salam
Agam Sent from my BlackBerry® powered by Sinyal Kuat INDOSAT -----Original Message----- From: Jan Raisin <[email protected]> Sender: [email protected] Date: Mon, 15 Jul 2013 09:20:13 To: <[email protected]> Reply-To: [email protected] Subject: Re: [belajar-excel] Mohon bimbingan Kode VBA mungkin seperti file terlampir salam, -Miss Jan Raisin- - Untuk kepentingan belajar bersama, pertanyaan harap ditujukan *hanya*ke [email protected] bukan dikirim japri ke email pribadi member milis; - Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta dengan orang-orang yang sabar QS 2:153; - Harap dipahami bersama bahwa solusi diberikan oleh Be-Exceller yang memiliki waktu untuk on line, mengetahui solusi atas pertanyaan yang ditanyakan, mau dan berani untuk membantu, tanpa mengharap imbalan dari Thread Starter (TS) atau Post Starter (PS), selain itu Be-Excelller juga memiliki kewajiban yang harus dipenuhi di dunia nyata sehingga tidak selalu bisa on line setiap saat; - Semoga semangat berbagi dan membantu semakin meningkat di kalangan Be-Exceller dan menjadi amalan yang baik untuk tabungan di akhirat nanti. اَمِين يَا رَبَّ الْعَالَمِيْن Pada 14 Juli 2013 01.54, <[email protected]> menulis: > Dear Master Be-Exl Dan sahabat > > Saya ingin bertanya tambahan Skript untuk unhide pasword column > Columns("AP:BE") jika ia mengklik lapsopir, maka ia akan meminta password > untuk menampilkan column Columns("AP:BE") yg akan di unhide.. > Apakah memungkinkan ada script tambahan uNtuk pertanyaan yg saya ajukan > tersebut..? > > Sub lapsopir() > Sheets("JULI").Protect Password:="mypassword", userinterfaceonly:=True > Columns("BF:EM").Select > Selection.EntireColumn.Hidden = True > Columns("D:AI").Select > Selection.EntireColumn.Hidden = True > Columns("AP:BE").Select > Selection.EntireColumn.Hidden = False > End Sub > > Demikian pertanyaan yg dpt saya ajukan. > Sebelumnya terima kasih.. > > Salam > > > Agam >
