Try it without the .TransitionNavigKeys = True

or change to False


Gord Dibben MS Excel MVP

On Tue, 26 Aug 2008 10:30:02 -0700, MARSON PROBLEMS <MARSON
wrote:

Hello,

I recently received a workbook that had some input cells that were formatted
to be dates. These were formatted as Custom, with "mmmm, d yyyy"

I then wrote a macro for the workbook. All this macro did was to unhide and
hide back a few rows and columns in every tab.

Somehow now those cells that used to be inputs for dates are automatically
placing an equals sign before the date. So if you type 12/31/2007 the cell
"result" would be =12/31/2007, which then gives you a very small number
(since it's dividing by these values!), and tries to make that very small
number into a date, so you get something like 01/01/1900.

Anybody know what is going on? The only code in the macro that could
possibly be having an effect is as follows:
With Application

.ScreenUpdating = False
.OnKey "^{PGUP}"
.OnKey "^{PGDN}"
.DisplayFormulaBar = True
.DisplayStatusBar = True
.DisplayNoteIndicator = True
.TransitionNavigKeys = True

End With

With ActiveWindow

.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayHeadings = True

End With

Application.ScreenUpdating = True
ActiveWorkbook.Close savechanges:=True
Application.Quit

However as I am aware right now all this code would do is not display
certain things on the screen (I turn them back on later with similar VBA
code).


PLEASE HELP!

Thanks!