Home |
Search |
Today's Posts |
#11
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Thank you GS. I had help he
http://www.vbaexpress.com/forum/show...ing-in-between and it works perfectly now. Thanks again for your help. If you want to run *InsertBlankRows* from a custom menu you can use this version... Sub AddMoreRows() InsertBlankRows CommandBars.ActionControl.Tag End Sub ...and add the following menu items to the Cells (right-click) popup: Sub AddToShortcut() With CommandBars("Cell") .Controls(1).BeginGroup = True With .Controls.Add(Type:=msoControlButton, Befo=1) .Caption = "Insert rows below here": .OnAction = "AddMoreRows" .Tag = "Below": .Style = 1 End With With .Controls.Add(Type:=msoControlButton, Befo=1) .Caption = "Insert rows above here": .OnAction = "AddMoreRows" .Tag = "Above": .Style = 1 End With End With End Sub -- Garry Free usenet access at http://www.eternal-september.org Classic VB Users Regroup! comp.lang.basic.visual.misc microsoft.public.vb.general.discussion |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Inserting and copying Rows based on a variable | Excel Programming | |||
need help please inserting multiple rows based on cell value then copying to data sheet | Excel Worksheet Functions | |||
Inserting rows based on count | Excel Programming | |||
Inserting rows based on another cells value | Excel Programming | |||
Inserting rows based on another cells value | Excel Programming |