commandbar - rollout problem

M

mango

Dear All, may i know if i need to create the customised toolbar and button at
user's excel before they can use? I have about 20 users sharing this
application and not all users allowed to use the commandbar. only authorised
user can use the commandbar. if i do not create for those unauthorised user
then they will face run time error as button not at their excel.
pls help.
thanks alot



Private Sub Workbook_BeforeClose(Cancel As Boolean)
disable
End Sub

Sub disable()
Dim cmd As CommandBar
Set cmd = Application.CommandBars("Tender Bar")
cmd.controls("&kc").Enabled = False
End Sub


Private Sub CommandButton1_Click()
enable
End Sub

Sub enable()
Dim cmd As CommandBar
Set cmd = Application.CommandBars("Tender Bar")
cmd.controls("&kc").Enabled = True
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top