# Keeping Formulas in the Formula Bar From Covering Up Data

#### SonicBoomGolf

##### Active Member
I have some ginormous formulas in my sheet, and they spill out of the Formula Bar onto the spreadsheet, covering up some of the data. I remember reading about how to correct this, but can't remember the process. Any ideas?

### Excel Facts

How to find 2nd largest value in a column?
MAX finds the largest value. =LARGE(A:A,2) will find the second largest. =SMALL(A:A,3) will find the third smallest
Hi,

Hide the formula bar, or make your formula(s) smaller.

You can format the cells as hidden then protect the sheet, then you wouldn't see the formulas at all

Record a macro to increase row height for Row 1. Assign that macro to a button and click when you need to edit formulas. Record another macro to decrease row height back to normal and assign that to another button. Or, instead of buttons use: CTRL + I for increase and CTRL + D for decrease.

Hmm, interesting. As far as a row/column increment goes, this may help with that ..

<font face=Tahoma New><SPAN style="color:#00007F">Option</SPAN> <SPAN style="color:#00007F">Explicit</SPAN>

<SPAN style="color:#00007F">Sub</SPAN> ChangeRowSize(ChangePercent <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Long</SPAN>)

<SPAN style="color:#00007F">Dim</SPAN> r <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Long</SPAN>, i <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Long</SPAN>
<SPAN style="color:#00007F">Dim</SPAN> iStart <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Long</SPAN>, iEnd <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Long</SPAN>

Application.ScreenUpdating = <SPAN style="color:#00007F">False</SPAN>

iStart = Selection.Row
iEnd = Selection.Rows.Count + iStart - 1

<SPAN style="color:#00007F">For</SPAN> r = iStart <SPAN style="color:#00007F">To</SPAN> iEnd
i = Rows(r).RowHeight
Rows(r).RowHeight = i + i * (ChangePercent / 100)
<SPAN style="color:#00007F">Next</SPAN> r

Application.ScreenUpdating = <SPAN style="color:#00007F">True</SPAN>

MsgBox "Complete!" & vbNewLine & "Adjusted " & ChangePercent & "%"

<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN>

<SPAN style="color:#00007F">Sub</SPAN> ChangeColumnSize(ChangePercent <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Long</SPAN>)

<SPAN style="color:#00007F">Dim</SPAN> r <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Long</SPAN>, i <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Long</SPAN>
<SPAN style="color:#00007F">Dim</SPAN> iStart <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Long</SPAN>, iEnd <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Long</SPAN>

Application.ScreenUpdating = <SPAN style="color:#00007F">False</SPAN>

iStart = Selection.Column
iEnd = Selection.Columns.Count + iStart - 1

<SPAN style="color:#00007F">For</SPAN> r = iStart <SPAN style="color:#00007F">To</SPAN> iEnd
i = Columns(r).ColumnWidth
Columns(r).ColumnWidth = i + i * (ChangePercent / 100)
<SPAN style="color:#00007F">Next</SPAN> r

Application.ScreenUpdating = <SPAN style="color:#00007F">True</SPAN>

MsgBox "Complete!" & vbNewLine & "Adjusted " & ChangePercent & "%"

<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN>

<SPAN style="color:#00007F">Sub</SPAN> RunIt_Rows()
<SPAN style="color:#007F00">'Figure will be used as a percentage increment/decrement</SPAN>
ChangeRowSize 10
<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN>

<SPAN style="color:#00007F">Sub</SPAN> RunIt_Columns()
<SPAN style="color:#007F00">'Figure will be used as a percentage increment/decrement</SPAN>
ChangeColumnSize -10
<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></FONT>

Replies
34
Views
729
Replies
4
Views
258
Replies
2
Views
278
Replies
9
Views
183
Replies
0
Views
189

1,214,766
Messages
6,121,418
Members
449,032
Latest member
egspen2

### We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.

### Which adblocker are you using?

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

### Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

### Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back