Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default Control panel detection


Hi guys,

Im working on a spreadsheet and would like to make sure that when a
viewer opens the spreadsheet the toolbars(the save and open icons etc
etc) on the top of the screen are removed. However, I would like to
return the users choices of toolbars back once they close the
spreadsheet.

I have been looking at envoking a macro on open and close of
spreadsheet but this still does not help me detect which toolbars the
user has selected... below is some test code of a lil something i tried
(didnt work though!)

' TEST Macro
' Macro recorded 14/02/2006 by x

If (Application.CommandBars("Standard").Visible = False) Then
Range("A20").Select
ActiveCell.FormulaR1C1 = "1"
Range("A21").Select
If (Application.CommandBars("Standard").Visible = True) Then
Range("A21").Select
ActiveCell.FormulaR1C1 = "0"
Range("A21").Select
End Sub

thanks in advance for any help :)


--
Jags
------------------------------------------------------------------------
Jags's Profile: http://www.excelforum.com/member.php...o&userid=31527
View this thread: http://www.excelforum.com/showthread...hreadid=512191

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 5,302
Default Control panel detection

Hi Jags,

Try;

'=============
Private Sub Workbook_Activate()
Dim CBar As CommandBar

For Each CBar In Application.CommandBars
CBar.Enabled = False
Next
End Sub
'<<=============

'=============
Private Sub Workbook_Deactivate()
Dim CBar As CommandBar

For Each CBar In Application.CommandBars
CBar.Enabled = True
Next
End Sub
'<<=============

This is workbook event code and should be pasted into the workbook's
ThisWorkbook module *not* a standard module or a sheet module:

Right-click the Excel icon on the worksheet
(or the icon to the left of the File menu if your workbook is maximised)

Select 'View Code' from the menu and paste the code.


---
Regards,
Norman


"Jags" wrote in message
...

Hi guys,

Im working on a spreadsheet and would like to make sure that when a
viewer opens the spreadsheet the toolbars(the save and open icons etc
etc) on the top of the screen are removed. However, I would like to
return the users choices of toolbars back once they close the
spreadsheet.

I have been looking at envoking a macro on open and close of
spreadsheet but this still does not help me detect which toolbars the
user has selected... below is some test code of a lil something i tried
(didnt work though!)

' TEST Macro
' Macro recorded 14/02/2006 by x

If (Application.CommandBars("Standard").Visible = False) Then
Range("A20").Select
ActiveCell.FormulaR1C1 = "1"
Range("A21").Select
If (Application.CommandBars("Standard").Visible = True) Then
Range("A21").Select
ActiveCell.FormulaR1C1 = "0"
Range("A21").Select
End Sub

thanks in advance for any help :)


--
Jags
------------------------------------------------------------------------
Jags's Profile:
http://www.excelforum.com/member.php...o&userid=31527
View this thread: http://www.excelforum.com/showthread...hreadid=512191



  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default Control panel detection


cheers norman, works a treat :)


--
Jags
------------------------------------------------------------------------
Jags's Profile: http://www.excelforum.com/member.php...o&userid=31527
View this thread: http://www.excelforum.com/showthread...hreadid=512191

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Linking dats on a worksheet to control panel sbearman Charts and Charting in Excel 0 June 25th 08 01:35 PM
Excel 2007 using control panel display settings Mark Excel Discussion (Misc queries) 0 June 12th 07 08:36 PM
Control Panel-Dual Display API Vacation's Over Excel Programming 2 September 18th 05 07:37 PM
date format in excel not in line with control panel regional setti GrahamR Excel Discussion (Misc queries) 3 August 2nd 05 06:48 PM
Control Panel Matt Excel Programming 1 March 22nd 05 07:01 PM


All times are GMT +1. The time now is 02:43 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"