Prev: Retrieving Archived (EAS) Outlook Attachment
Next: Get Tooltip Text, 3rd Party App
From: Gord Dibben on 8 Oct 2009 11:40
Works for me.

Could be done with a few less lines.

Private Sub Workbook_Open()
Application.DisplayFormulaBar = False
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFormulaBar = True
End Sub


Gord Dibben MS Excel MVP

On Thu, 8 Oct 2009 07:18:01 -0700, ub <ub(a)discussions.microsoft.com> wrote:

>Hi
>I have written a VBA code to hide formula bar in the Workbook open event.
>The code is :
>If Application.DisplayFormulaBar = True then
>Application.DisplayFormulaBar = False
>End if
>
>To bring the formula bar back once I exit out of this workbook, I wrote a
>code in workbook before close event and the code is
>If Application.DisplayFormulaBar = False then
>Application.DisplayFormulaBar = True
>End if
>
>I am able to hide the formula bar, but it never brings the formula bar
>visible for the application. Every time, after using this sheet, I have to
>manualy add the formula bar.
>
>Please advise, how can I correct this problem

From: ub on 8 Oct 2009 12:03
Hi Gord

Thanks for the reply.

I have a an Exit button on one of the sheets that closes the workbook.
I put the code [application.DisplayFormulaBar = True ] in the code of this
exit button before the [activeworkbook.save ] and it works now.

Thanks to all


"Gord Dibben" wrote:

> Works for me.
>
> Could be done with a few less lines.
>
> Private Sub Workbook_Open()
> Application.DisplayFormulaBar = False
> End Sub
>
> Private Sub Workbook_BeforeClose(Cancel As Boolean)
> Application.DisplayFormulaBar = True
> End Sub
>
>
> Gord Dibben MS Excel MVP
>
> On Thu, 8 Oct 2009 07:18:01 -0700, ub <ub(a)discussions.microsoft.com> wrote:
>
> >Hi
> >I have written a VBA code to hide formula bar in the Workbook open event.
> >The code is :
> >If Application.DisplayFormulaBar = True then
> >Application.DisplayFormulaBar = False
> >End if
> >
> >To bring the formula bar back once I exit out of this workbook, I wrote a
> >code in workbook before close event and the code is
> >If Application.DisplayFormulaBar = False then
> >Application.DisplayFormulaBar = True
> >End if
> >
> >I am able to hide the formula bar, but it never brings the formula bar
> >visible for the application. Every time, after using this sheet, I have to
> >manualy add the formula bar.
> >
> >Please advise, how can I correct this problem
>
>
First  |  Prev  | 
Pages: 1 2
Prev: Retrieving Archived (EAS) Outlook Attachment
Next: Get Tooltip Text, 3rd Party App