Disabling Excel Menu Items at Runtime

  • Thread starter Thread starter Prasadtvs
  • Start date Start date
P

Prasadtvs

I want to Disable few Menu Items at Runtime based on some condition
 
Prasas,

For the commandbar named "BarName" - an example that works.

Sub PartialCBDisable()
Dim i As Integer

With Application.CommandBars("BarName")
For i = 1 To .Controls.Count
.Controls(i).Enabled = False
If i = 2 And Application.UserName = "Bernie Deitrick" Then
.Controls(i).Enabled = True
End If
If .Controls(i).Caption = "&Test" Then
.Controls(i).Enabled = True
End If
Next i
End With

End Sub

HTH,
Bernie
MS Excel MVP
 
You must log in or register to reply here.

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

Similar Threads

Disabled Start Menu 12
How do I disable a PropertyGrid item at runtime 1
Menu Item Options -> Formulas Disabled for Pivot tables. 2
Macro Runtime errors 8
PowerPoint Powerpoint Slow Animations 2
Best Place to Disable/Enable Menu Items at Runtime 5
Adding Report Filters to Excel Pivot Tables via VB. 1
Menu item Format-->Sheet-->Hide (Unhide) always disabled in Excel 2000 5

Back
Top