H
hickymanz
Hi there
We've just upgraded to Office 2007, and Id created some handy chart tools
for my team. Obviously these didnt work first off and had to do a bit of
fiddling to get these to work again!
strangely i thought that problem would have been harder than getting the
context menu items to appear!
In 2003 I was able to Add items to the RMB context menus for Object/Plot and
Plot Area and they would appear without issue.
in 2007 These get added although they arent visible, i can see them when I
run a script to look at all the context menus, but they never appear with the
RMB!
I've not managed to get an answer as to why I can add Context Menu items for
cells but not Charts!
The Script for adding them I used was
With Application.CommandBars("Object/Plot").Controls
With .Add
.Caption = "Chart Tidy"
.OnAction = "BarChartTools.ChartTidy"
.BeginGroup = True
End With
End With
With Application.CommandBars("Plot Area").Controls
With .Add
.Caption = "Chart Tidy"
.OnAction = "BarChartTools.ChartTidy"
.BeginGroup = True
End With
End With
We've just upgraded to Office 2007, and Id created some handy chart tools
for my team. Obviously these didnt work first off and had to do a bit of
fiddling to get these to work again!
strangely i thought that problem would have been harder than getting the
context menu items to appear!
In 2003 I was able to Add items to the RMB context menus for Object/Plot and
Plot Area and they would appear without issue.
in 2007 These get added although they arent visible, i can see them when I
run a script to look at all the context menus, but they never appear with the
RMB!
I've not managed to get an answer as to why I can add Context Menu items for
cells but not Charts!
The Script for adding them I used was
With Application.CommandBars("Object/Plot").Controls
With .Add
.Caption = "Chart Tidy"
.OnAction = "BarChartTools.ChartTidy"
.BeginGroup = True
End With
End With
With Application.CommandBars("Plot Area").Controls
With .Add
.Caption = "Chart Tidy"
.OnAction = "BarChartTools.ChartTidy"
.BeginGroup = True
End With
End With