Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Creating a Custom commandbar button
i have made a code to generate a Custom button when
the workbook opens (placed it in Workbook_Open() ) _________ Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim i For Each i In Application.CommandBars("Formatting") ..Controls.Delete Next i 'myControl.Delete 'Application.CommandBars("Formatting").Controls(my Control).Delete End Sub Private Sub Workbook_Open() Dim myControl Set myControl = Application.CommandBars("Formatting").Controls _ ..Add(Type:=msoControlButton, ID:=2950, Befo=19) With myControl .DescriptionText = "Pastes the Data from Windows Clipboard" .Caption = "Paste the Clipboard" .OnAction = "PasteTxT" .Style = msoButtonIconAndCaption End With End Sub i want to delete the custom button on Workbook close. i dont know how to do the same. Please help ASAP. Rgds, Sifar |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to exchange Custom Commandbar buttons between PC's? | Excel Discussion (Misc queries) | |||
Custom Commandbar | Excel Programming | |||
static commandbar Button | Excel Programming | |||
Creating a CommandBar - what's wrong? | Excel Programming | |||
Value of ComboBox on Custom CommandBar | Excel Programming |