I ONLY want to show the status bar, worksheet tabs, horizontal and vertical scroll bars.
I've tried using the code below but the column and row headings will not show on the first sheet i bring up, but it reappears on other sheets. everything else works fine ....
I have a macro that starts when the workbook is open that hides many of the headers and toolbars. It is great and works fine unless you are working on another workbook and need to see those headers and tool bars. Is there a way to display and hide those items per workbook and not for the entire application. here is my failed attempt:
Sub show_excel_headers()
Dim wb As Workbook
Set wb = ThisWorkbook
wb.Application. ScreenUpdating = False
'Display Headings in all worksheets
Dim wsSheet As Worksheet
Dim sSheetStart
Set sSheetStart = ActiveSheet
wb.Application.EnableEvents = False
For Each wsSheet In Worksheets
wsSheet.Activate
ActiveWindow.DisplayHeadings = True
I would like to hide the standard and formatting toolbars in excel when i enable workbook protection, however I have no idea how to get excel to realise when workbook protection has been enabled, and how to hide the toolbars in VBA also. Also i would like to know how to do the reverse (how to show tooldbars when workbook protection has been disabled)
View 3 Replies View RelatedI am looking for a macro to hide all toolbars i am using this at the moment
View 4 Replies View RelatedI have a procedure that stores the Commandbar names and visibility settings in an array on open. Another procedure hides all Commandbars on open and restores their original visibility settings on close. For some reason the "Standard" and " Formatting" toolbars don't return to visible on close.
My error log says "08/13/07 18:21:37 [QA.xls]MCommandBars.bRemoveMenus(), Error -2147467259: Method 'Visible' of object 'CommandBar' failed". I have tried manually testing the hide/unhide procedure with hard coded settings and checked the correct variables are being sent and all seems to be correct.
I am pretty confident that the procedure to store settings is correct but have included the code just in case, also just noticed the "Standard" and "Formatting" toolbars are the only two visible at programme start.
Public gsaMenus() As String
Public Function bMenuSettings() As Boolean
Const sSOURCE As String = "bMenuSettings()"
Dim bReturn As Boolean
Dim iCounter As Integer
Dim cbrMenu As office.CommandBar
This code snippet works when executed from a worksheet (it puts Menu Bar back) but returns an error when used in the This Workbook module.
Application.CommandBars("Worksheet Menu Bar").Enabled = True
CommandBars("ToolBar List").Enabled = True
CommandBars("Ply").Enabled = True
I created 3 custom toolbars. I want toolbar A to be visible only in Workbook A.xls, toolbar B to be visible only in Workbook B.xls and toolbar C to be visible only in Workbook C.xls. while Workbooks A,B, and C are open at the same time. I use Workbook A to automatically open Workbooks B and C.
Problem: Since I'm openning the Workbooks automatically it only keeps the Toolbar C visible on all Woksheets.
I included the following code in the This Workbook Object on each Workbook:
For Workbook A:
Private Sub Workbook_Open()
Application.CommandBars("A").Visible = True
Application.CommandBars("B").Visible = False
Application.CommandBars("C").Visible = False
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("A").Visible = False
Application.CommandBars("B").Visible = False
Application.CommandBars("C").Visible = False..............................
I created a custom toolbar in excel. by right clicking on the toolbar, creating new, adding a couple buttons and assigning them to a couple macros.
I'd like to send this to people, how do i do this.
Obviously, the toobars's would have to reference the macros, these i have in an add-in.
Is there anyway that i could attach the toolbar's to the add-in so i could just send the add-in.
I also created a menu, is there anyway that i can put this into the Add-in also?
Where does the toolbar i created and the menu that i created save down. If i open a new excel without opening personal.xls, the toolbars will still be there (open one excel, then open another and it tells me that my personal.xls is in use by jason harris, i hit cancel so it opens without my personal workbook)
Lastly, if I open excel, then go into VB, I can save my personal workbook. How do I save this as or save a copy?
I lost my command bar and tool bars (excel 97) all I have is the blue bar on top then the column letters. How do I restore them?
View 9 Replies View Relatedmy excel is no longer showing any tool bars and I can not get them back, is there any short cuts to bring back the menus? I can’t even do a right mouse click on the sells for some reason. The only tool bar that is showing is the formula bar.
View 10 Replies View RelatedI have a slight problem with some code I am using. I have a user form where I force the users to enable Macros using the hidden sheets trick. Once the user enables the macros all of the toolbars dissapear from excel. The code I use to do this is below:
View 14 Replies View RelatedI find that the picture toolbar opening automatically when I click on a picture useful (sometimes).
Is there anyway of automating other toolbars to open (such as 'chart') when I click on an object?
I've been looking at various add-ins in google - but can't find one to do that.
Everytime this meant that I had to start from scratch in order to have my customized toolbars. This is a bit inconvenient.
Can I simply save some file (containing my XL toolbar settings) from some location and if I ever run into such a situation again, I can simply copy the saved file back into the same folder...
Thanks in advance for your help and BTW would the solution work the same way for different Excel versions or?? My O/S is XP and I use both Excel 2003 (once in a while I also use Excel 97 but that is installed on my other old pc).
A IT Ordering system has been created using Excel, I am prompted to enable Macros, no problem there. The problem is that when I exit the worksheet using a formulas setup as an exit button, my Excel is displayed with my Toolbars missing. I have been unable right-click at the top and re-add these I am only presented with the option to minimise, close etc. 1. How can I replace my Toolbars? 2. Is there a formula fix so that I can use this worksheet without losing my toolbars?
View 3 Replies View RelatedI use excel 2003 and have maybe 60-70 macros linked to buttons on maybe 6 custom toolbars. The macros are saved on a personal.xls that is saved in the XLStart folder so it will auto start every time I run excel. My excel crashed and my toolbars are all empty nubs and my personal.xls is still in the same folder but does not auto start...did a detect and repair no help...I manually started personal.xls no help...I found a thread that suggested looking for *.xlb didn't find it...a shared file with the same toolbars can be seen by other computers but not mine...
View 6 Replies View RelatedI want a code that removes all toolbars from excel when the .xls file is opened, then restores all toolbars back to their original setting when the .xls file is closed.
View 9 Replies View Relatedis there any way that i can remove the excel title bar and scrolling tabs so that the excel sheet do not resemble an excel document?
View 2 Replies View RelatedI have a custom toolbar created in a workbook. I have coded my workbook so that the full screen is displayed, removing the title bars, status bars etc
Application.DisplayFullScreen = True
However, there is still another menu option I am not able to remove. It is the "Add or Remove Buttons" and when you click that the "Customize..." button also is enabled.
I looked up some code on microsoft and only found code in office97 that gave me errors in 2003:
Sub DisableCustomize()
Application.CommandBars("Tools").Controls("&Customize...").Delete
CommandBars("Toolbar List").Enabled = False
End Sub
The quote from the site says "To prevent others from changing the menus and toolbars in a custom application, remove or turn off the Customize option on the Tools menu and turn off the Toolbar List shortcut menu."
I get an error saying invalid procedure when I run that.
how to disable the button or prevent users from choosing it?
I just attended the Excel Seminar and learned so much! I found out that Hiding a workbook will solve a huge issue I am having with a file popping up everytime I run a macro.
I"ve searched the blogs but can't find the answer. I found some information on how to hide sheets, but I can't find anything on how to hide an entire workbook
I went into the visual basic editor and can't find what I am looking for.
Does hiding all the sheets actually hide the entire workbook, or is there a way to hide the workbook?
I find (what look like) two extra toolbars have appeared at the top (below the standard and formatting toolbars) and to the left of my worksheet.
They have lines, dots and little boxes with an x or - in them, depending if you click on them or not. The +/- box function seems to be to make columns appear and disappear.
How did I turn this function on and more importantly, how do I turn it off?
Is it possible to use a function that removes all toolbars upon opening the workbook and reinstates the same upon closing, the work book i am currently using does the following as described in the code. however the function is limited in that only toolbars stated in the code will be removed, if for instance there was an adobe toolbar, that remains on the screen. or is there a better way of going about this? On open:
Private Sub Workbook_Open()
Run ("CreatePReturn")
Run ("CreateProceed")
With Application
.CommandBars(" Formatting").Visible = False
.CommandBars("Standard").Visible = False
.CommandBars("Drawing").Visible = False
.CommandBars("Return").Visible = False
.CommandBars("Proceed").Visible = False
.CommandBars("Worksheet Menu Bar").Enabled = False
.CommandBars(" Chart Menu Bar").Enabled = False
.DisplayFormulaBar = False
.DisplayStatusBar = False
End With
With ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With.................................
In Windows 98 for example when you created a Customised Toolbar and attached macros to it a file was created with the user name followed by 8.
i.e. timbo8
You could copy this file and keep it was a backup in case you lost the toolbar/s. Which invariably happened whn someone else logged onto your pc. When the company transferred over to Windows 2000 this file was called something else I thing it ended in a .xla extension but I don't know what it was called or where it it located.
We're trying to create an invoicing sheet with MS excel for our sub contractors but we also want the information they input to be transfered onto a second work sheet within the work book that has our mark up added.
Problem is that we don't want our sub contractors to see the sheet with the mark up. Is there any way to hide a work sheet or to limit access to the work sheets some one can veiw with in a workbook?
My goal is to be able to hide certain columns in the workbook based upon certain criteria. Moreover, I need to be able to hide columns in a certain tab even if I working in a different tab (i.e. if I am in Tab "A", I want to be able to hit "Ctrl + Alt + X" and be able to hide columns in Tab "B").
In order to accomplish this, I selected the Visual Basic icon. I then clicked on the "Insert" drop down menu and selected "Module". I have included a sample of the code that I wrote and inserted in to the module (see below). This general pattern of code repeats itself for 16 different macros - all in this same module.
Sub Macro01()
Worksheets("Input - Historical Financials").Columns("A:AD").Hidden = False
Worksheets("Input - Historical Financials").Columns("D:AD").Hidden = True
End Sub
Sub Macro02()
Worksheets("Input - Historical Financials").Columns("A:AD").Hidden = False
Worksheets("Input - Historical Financials").Columns("F:AD").Hidden = True
End Sub
I've stored all my on-line passwords (about 50 of them) in one sheet in an Excel workbook. I want to protect it so that if somebody somehow got access to it, they couldn't see the sheet, much less change anything.
I tried Tools/Protection/Protect Sheet and Tools/Protection/Protect Workbook, using a secret password. Then, nobody could change the data -- but they could still see it.
So then I hid the columns first, and then protected the sheet -- which did the trick. But that seems pretty cumbersome, because it involves two steps for me to open it up (unprotecting and then unhiding).
Is there a way to protect/hide in just one step so my sheet of passwords can't be seen by an intruder?
I created a workbook called "controlelijst.xls" using Excell 2007. In this workbook i created a sheet that i use as a template, it has conditional formatting all over it. That in fact is not the problem. I copy this template for every new issue i have.
The thing i would like to see happening now is when i enter the value "Y" in cell O10 that the active sheet on wich the value is entered becomes hidden. Because the reason for setting this value is that all conditions are met on this sheet and it does not have to be visible anymore unless i unhide it.
I often have several workbooks open and shift from one to another. One of these contains a floating UserForm; and the trouble is that when I leave this workbook and shift to another one, the UserForm belonging to the first remains open and visible in the new workbook; and I cannot hide this nuisance. Within the same workbook, it’s easy to hide the Useform when shifting to another worksheet (through code for Private Sub Worksheet_Deactivate()). Is there something similar for when the whole workbook is deactivated?
View 4 Replies View RelatedWith first code user selects a sheet from drop down and that sheet is activated. (This works fine)
Now hide all other sheets is what I'm trying to do with the second code. (This IS NOT working)
I assume I can either put the second code in the change event code or call it from the change event code once it works.
Code:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address "$A$1" Or Target.Cells.Count > 1 Then Exit Sub
[Code].....
I have a workbook that I edit daily then pass along to another team. All of my modules are passwork protected and there are also several sheets in the workbook that I hide before email it to the other team. I hide the sheets by changing the sheet properties in the VBA editor to "2 - xlSheetveryhidden".
This isn't a very time consuming process but I am wondering if there is a way to automate it through VBA?
I tried the the fail safe of "see what happens when I record it" but all I got was an empty Module.
I have a workbook that I created as an interface for my workplace. I disabled the File, Menu, Edit, etc...menu bars through .Control("x").Visible = False and .Enable = False as well
Now when I open a new workbook all the menus are there still which is good but when I open a previously saved workbook all the menus are missing. Is there a way where I can have ONLY my workbook have the menus gone and for them to appear in other workbooks that were saved?
