Here is some event code that I posted once before that does just that if any
cell in row 1 is selected

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Application.EnableEvents = False
On Error GoTo sub_exit
If Not Intersect(Target, Rows(1)) Is Nothing Then
Application.DisplayFormulaBar = False
Else
Application.DisplayFormulaBar = True
End If
sub_exit:
Application.EnableEvents = True
End Sub



'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Biff" wrote in message
...
Hi!

Maybe temporarily NOT display the formula bar.

Goto ViewFormula Bar

OR, to select C:J

Hit F5

Reference:

C:J

Biff

-----Original Message-----
I create Row 1 headings in a number of Cols. (say A-F)
with alt-enter to
create 2 lines in each cell. The formular bar commences
at about Col C. When
I try to select whole Cols by clicking on any Col
alphabet after C it is as
if I selected a cell in Row 1 and the formula bar entry
completely obscures
the rest of the Col headings I want to select.(it has
expanded to show the 2
lines from the cell entry)
Hope this makes sense - wish I could put in a screen shot

.