Fill down and fill right in contextual menu

S

Steve95682

Version: 2004
Operating System: Mac OS X 10.5 (Leopard)
Processor: Intel

I use he Windows version of Excel at work, and really like the Fill Down and Fill Right options in the right-click contextual menu. Can I add the Fill Right and Fill Down items to the contextual (right-click) menu in
excel 2004 for Mac?
 
C

CyberTaz

The contextual menus can't be modified.

As an alternative -- if you're a dedicated mouser -- use the Fill Handle at
the lower right corner of the cell selector. Also, you can select the cells
to be filled along with the source cell then use either Control+R or
Control+D to fill Right/Down respectively.

A 3rd option is to pre-select the range, type the first cell's content, but
use Command+return (rather than just return) to enter.

HTH |:>)
Bob Jones
[MVP] Office:Mac
 
J

JE McGimpsey

CyberTaz said:
The contextual menus can't be modified.

Oh, that is *SO* not true...!! <g>

Public Sub AddFillCommandsToContextualMenu()
Const nFillDownID As Long = 372
Const nFillRightID As Long = 371
Dim nPosition As Long

With CommandBars("Cell")
nPosition = .Controls("Insert...").Index
If .FindControl(Id:=nFillRightID) Is Nothing Then
With .Controls.Add( _
Type:=msoControlButton, _
Id:=nFillRightID, _
Before:=nPosition, _
Temporary:=False)
.Caption = "Fill Right"
.Visible = True
.Enabled = True
.BeginGroup = False
End With
End If
If .FindControl(Id:=nFillDownID) Is Nothing Then
With .Controls.Add( _
Type:=msoControlButton, _
Id:=nFillDownID, _
Before:=nPosition, _
Temporary:=False)
.Caption = "Fill Down"
.Visible = True
.Enabled = True
.BeginGroup = True
End With
End If
End With
End Sub


Public Sub ResetContextualMenu()
CommandBars("Cell").Reset
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