]] XL-mania [[ Refresh Menu Bar

 

Yth Rekan-rekan milis

Lasung aja yah, saya membuat sebuah maacro dengan tujuan untuk menghilangkan menu bar (misalnya menghilangkan menu data)
dengan langkah sebagai berikut:

Public Sub RemoveMenu()
    Dim cbWSMenuBar As CommandBar
    On Error Resume Next
    Set cbWSMenuBar = CommandBars("Worksheet Menu Bar")
    cbWSMenuBar.Controls("Data").Delete
End Sub

Saya kesulitan untuk memunculkan (refresh) menu bar yang telah terhapus, sudah saya coba dengan:

Public Sub RemoveMenu()
    Dim cbWSMenuBar As CommandBar
    On Error Resume Next
    Set cbWSMenuBar = CommandBars("Worksheet Menu Bar")
    cbWSMenuBar.Controls("Data").Add
End Sub

ternyata tidak berhasil, yang saya maksudkan tentunya merefresh dengan macro, bukan dengan toll customize.
Atau ada rekan milis yang dapat mengubah penghapusannya hanya sementara, sehingga jika excell di restart menu tidak rusak.
tolong diberi pencerahan. terima kasih.

__._,_.___

Reply to sender | Reply to group | Reply via web post | Start a New Topic

Messages in this topic (1)

Recent Activity:

• New Members 97

Visit Your Group

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| sOrRy dOrRy j3K... m0m0dS LaGi HeC-tiC... waQaQaQa...             |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+

MARKETPLACE

Hobbies & Activities Zone: Find others who share your passions! Explore new interests.

---

Get great advice about dogs and cats. Visit the Dog & Cat Answers Center.

---

Stay on top of your group activity without leaving the page you're on - Get the Yahoo! Toolbar now.

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use

.

__,_._,___