Excel 2007

T

TWG

Can anyone help me to hide the title-bar in a workbook by means of code in
Excel 2007?
 
S

Simon Lloyd

TWG;439436 said:
Can anyone help me to hide the title-bar in a workbook by means of cod
i
Excel 2007
Click to expand...
What is it you mean by "Title Bar"? do you mean the bar that display
"Book1 - Microsoft Excel"

--
Simon Lloy

Regards
Simon Lloy
'Microsoft Office Help' (http://www.thecodecage.com
 
S

Simon Lloyd

The only way to do this is to use full screen

Code
-------------------
Private Sub Workbook_Activate()
Application.DisplayFullScreen = False
End Sub

Private Sub Workbook_Deactivate()
Application.DisplayFullScreen = True
End Sub

-------------------

*How to Save a Workbook Event Macro*
1. *Copy* the macro using *CTRL+C* keys.
2. Open your Workbook and *Right Click* on any *Worksheet's Name Tab*
3. *Left Click* on *View Code* in the pop up menu.
4. Press *ALT+F11* keys to open the *Visual Basic Editor.*
5. Press *CTRL+R* keys to shift the focus to the *Project Explore
Window*
6. Press the *Down Arrow Key* until *ThisWorkbook* is highlighted i
blue.
7. *Press* the *Enter* key to move the cursor to the *Code Window*
8. *Paste* the macro code using *CTRL+V*
9. *Save* the macro in your Workbook using *CTRL+S

TWG;440242 said:
Ye

Simon Lloyd skrev



Lloyd' (http://www.thecodecage.com/forumz/member.php?userid=1
(http://www.thecodecage.com/forumz/showthread.php?t=121919
Click to expand...

--
Simon Lloy

Regards
Simon Lloy
'Microsoft Office Help' (http://www.thecodecage.com
 
T

TWG

As you can see, I already have this command in the workbooks AUTO_OPEN - thus:

Sub auto_open()
With ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = False
.DisplayZeros = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
Application.DisplayFullScreen = True
End Sub

BUT - it does not make the title-bar invisuable


Simon Lloyd skrev:
 
S

Simon Lloyd

Hmmm, you no longer need to use Auto_open since xl97 you can use Wth
Workbook_Open event in the thisworkbook module, anyway did you at leas
try said:
As you can see, I already have this command in the workbooks AUTO_OPEN
thus

Sub auto_open(
With ActiveWindo
.DisplayGridlines = Fals
.DisplayHeadings = Fals
.DisplayZeros = Fals
.DisplayHorizontalScrollBar = Fals
.DisplayVerticalScrollBar = Fals
.DisplayWorkbookTabs = Fals
End Wit
Application.DisplayFullScreen = Tru
End Su

BUT - it does not make the title-bar invisuabl


Simon Lloyd skrev





Microsoft Office Discussion' (http://www.thecodecage.com)
Click to expand...

--
Simon Lloy

Regards
Simon Lloy
'Microsoft Office Help' (http://www.thecodecage.com
 
G

Gord Dibben

You are missing a few things.

Private Sub Auto_Open()
With ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
With Application
.DisplayStatusBar = False
.CommandBars("Worksheet Menu Bar").Enabled = False
.DisplayFullScreen = True
.DisplayFormulaBar = False
End With
End Sub

Don't forget to code to change reset when the workbook is closed.

Or you can use Thisworkbook Activate and Deactivate events as Simon points
out.


Gord Dibben MS Excel MVP
 
Top