Hide Chart Sheets

Jul 19, 2008

I would like to hide all worksheets and chartsheets in a workbook. I use

For Each sh In Sheets
sh.Visible = xlSheetVisible
Next sh
but I think it breaks down for chart sheets. Any solutions?

View 9 Replies


ADVERTISEMENT

Pie Chart - How To Use Hide Values But Not Show In Chart

Dec 17, 2013

I have created a pie chart showing top 10 best selling categories. However, on this pie chart, I want %age of overall sales to be shown.

At the moment say I put in the following

Catalogue 1 100
Catalogue 2 98
Catalogue 3 92
Catalogue 4 85
Catalogue 5 84
Catalogue 6 75

[Code]....

I add Data Labels and select the percentages. This shows at Cat 1 having 12.5% of the sales (100 of 800 sales), Cat 2 having 12.25%, and so on..... However, what you don't see is the following data:

Catalogue 11 60
Catalogue 12 58
Catalogue 13 57
Catalogue 14 57
Catalogue 15 56

So based on 1,088 sales, Cat 1 at 100 is actually only 9.19% of TOTAL sales.

I understand what is happening, the chart is giving the percentage based on the data inputted into the chart.

I did consider adding an 11th category to the chart, which was the total of Catalogues 11-15. Whilst this does give a more accurate percentage figure (as now all sales have been inputted), it makes the chart look ****

Is there a way of either adding the 11th category, and then "hiding" it, so that the chart doesn't display it, but uses it's value to calculate Catalogues 1-10s percentage?

BTW: The reason I ask is that I could be dealing with anywhere from 30 to over 100 catalogues. So it's not ideal showing the others in 1 chart.

View 1 Replies View Related

Delete Chart Series Across Sheets But Skip Protected Sheets

Mar 30, 2008

I have received following macro from someone to delete series but the problem is that it gives error when some sheets are protected, and I want those sheets to protected. When run it will ignore/leave protected sheets but delete series only from unprotected sheets

Private Sub CommandButton1_Click()
Dim Rng As Range, i As Long, r As Range, lVal, uVal
Dim DeleteCount As Double
Dim lRow As Long
Dim dr As Long
Dim dc As Long
dc = Sheets("Deleted Numbers").UsedRange.Columns.Count - 1
dr = Cells(Rows.Count, Sheets("Deleted Numbers").UsedRange.Columns.Count - 1).End(xlUp).Row + 1
If dr = 60001 Then ................

View 4 Replies View Related

Hide All Sheets Except Three Named Sheets

Jul 15, 2013

I am trying to figure out a code where hides all sheets in "ThisWorkbook" veryhidden except the ones names "Template" and "Report" and "Product"

I tried with the code below but the debugger stops at the line highlighted in red. perhaps i am missing something in the code.

Code:
Option Explicit
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Range("rReport").Value = "" Then
Cancel = True

[Code] .........

View 8 Replies View Related

Hide A Chart Which Is Its Own Worksheet

Dec 18, 2007

To hide a worksheet upon open I use: wsSheet.Visible = xlSheetVeryHidden. What do I use to hide a chart which is its own worksheet?

View 3 Replies View Related

Hide Zeros On Pivot Chart

Mar 21, 2008

I have a PivotTable linked to a Bar Chart. (see attached JPG for example)
I do not want the 0% values to show in the chart at all but I do want to see all of the other percentages. I have been able to hide these values in the PivotTable itself by Conditional Formatting or custom number formats but they still show up in the chart!? how I can get the 0% values to be hidden or not show on the charts at all? I don't want to have to do this manually for every 0% that shows because the data changes daily dynamically. A VBA or Macro solution would be preferred.

View 3 Replies View Related

Hide Text Box On Embedded Chart

Mar 27, 2008

I have a workbook with two worksheets. On the second worksheet I have placed a chart, in which several shapes (text boxes) have been added manually. With the help of a TickBox in a UserForm on the first worksheet one can hide / unhide one of those shapes (on the second worksheet). By using the Macro recorder I finally came to this code fragment:

Application.ScreenUpdating = False
Worksheets("Second One").ChartObjects("Chart 41").Activate
ActiveChart.Shapes("Text Box 4").Visible = False
Worksheets("First One").Activate
Application.ScreenUpdating = True

Obviously another part of the code is used to make the shape visible again. roblem: The screen flickers. And I want to be able to do this without flickering. Searching Ozgrid revealed that the use of "Activate" makes the screen flicker. Hence, my question: How can I hide / unhide a shape (textbox) in a chart on another worksheet without of using "activate"? r: Any other way to hide / unhide a shape (textbox) in a chart on another worksheet without flicker?

View 2 Replies View Related

Selectively Show Or Hide Chart Series

Feb 27, 2013

I have a chart with multiple series which I am hoping to show/hide based upon a particular value attached to each series. I was therefore wondering if it was possible to extend the Series object class so that I could have something along the lines of a "Series.specialvalue" property which I could assign and then check to decide whether to show or hide the series?

View 1 Replies View Related

Hide Minus Values On Y-axis On A Chart

Jun 25, 2007

column chart displaying various pieces of data.

At the top of my worksheet I have a combo box which allows you to select a local authority name; and all relevant information in the worksheet is highlighted (using conditional formatting, extra series in charts to make relevant points highlight in red, etc).

I've added a series to the chart and changed it's type to line - then with the data labels positioned beneath the points on the line I can get conditional formatted x category labels - all outlined here: [url]

Because my x category labels are fairly long I've had to give them an orientation of -90 and make the minimum y-axis value equal to -200 to give enough room beneath the chart to fit the text in.

As I said above, the values below 0 are just there to provide space at the bottom of the chart, so my question is: is there a way to hide these negative values? I'm sure I've done it before, but can't remember how - I thought maybe a custom number format of #;[White]# would work, but it just inverted my text (white text on black background).

View 11 Replies View Related

Hide & Show Chart Series Via CheckBox

Aug 25, 2004

Attached is a simple chart and I would like Users to be able to tick a checkbox to show/don't show 'available' series. In the example If the User clicks for Group 1, then only Customer A's data is shown. If Only Checked Group B, then Customer B and C are displayed. If both boxes are checked, then all three Customer's figures will show. (Hopefully depending on what's ticked, the chart's scale would adjust accordingly)

View 3 Replies View Related

Conditionally Hide Chart Axis Labels

Sep 4, 2007

Is it possible to hide some of the number labels on an axis; e.g. in on the chart below to hide the X-axis label 96? Or only start numbering from 97 while the chart displays from 96. Auto Merged Post;Well I have a solution to hiding the first value on the excel X axis values labels just using a custom number format;

[Black][>96]General;

but is there anyway of formating more than a couple of the number labels individually?

View 2 Replies View Related

Excel 2010 :: Hide Zero Values In Pivot Chart

Nov 29, 2011

Excel 2010 how to not chart zero values in a Pivot Chart?

View 1 Replies View Related

Hide ALL Sheets

Oct 15, 2008

I am trying to get a code that will Hide ALL sheets (xlVeryHidden) except for "Meeting Minutes" and "Index"

I want to do it 2 ways.

1) User Click a button and it happens
2) Upon Exiting the Workbook it happens

I tried modifying a code that I had to Reveal sheets but I can get it to operate the other way:

Sub HideMINUTESandMASTER()

Dim Sh As Worksheet
If Sheets("Meeting Minutes").Visible = True Then
End If

If Sheets("Index").Visible = True Then
End If

For Each Sh In Worksheets
Sh.Visible = xlVeryHidden
Next Sh
Sheets("Meeting Minutes").Select
Range("C1").Select
End Sub

View 9 Replies View Related

VBA To UnHide / Hide Sheets

Feb 20, 2014

I have a workbook with about 20 worksheets in it.

6 are visible
3 are hidden

the remaining are very hidden

I'm creating a "welcome" page to the workbook with instructions on how to update data. The data between the 20 sheets consists of pivot tables, charts and summary data. The Visible sheets are data for management's review (all protected). The 3 hidden sheets are pivot tables that the user needs to pull data from and the very hidden sheets are not to be seen by anyone.

In my "welcome" page, I added the instructions of how to update data, but wanted an area where I could assign a checkbox or button to click on for the user to unhide my 3 hidden sheets (say Sheet1, Sheet2 and Sheet3). I do not want it to unhide my very hidden sheets. Then, when the information needed is retrieved from those sheets, I would like the user to use a checkbox or button to hide the 3 hidden sheets again. Is there a way to do this?

I tried creating custom view but couldn't do that because of the pivot tables (the option was disabled). I'm a beginner in VBA so don't even know how to begin.

View 6 Replies View Related

Hide Sheets Via Autofilter?

Nov 23, 2009

I have a workbook w/ 120+ sheets, and the first one is a table of contents, while each following sheet is a record sheet for one of 10 individuals. That is, sheets 2-8 are for Alice, 9-12 for Bob, 13-29 for Charles, etc. Individual names are in column C, sheet names are hyperlinked text in column A on the table of contents sheet.

I want to know how to hide all the sheets which are not meant for the individual based on the autofilter of Column C. If I select Alice as the autofilter criteria for Column C, I want all the sheets except the table of contents and her sheets 2-8 to be hidden.

View 14 Replies View Related

VBA Across Sheets Reference And Row Hide?

Jan 11, 2012

Im working across Multiple Sheets and trying to get the following working.

I want a an input by the user of "NO" in cell M11 on Sheet 1 of my workbook to hide rows 32 - 41 on Sheet 2 and not to hide them if the user keys in "YES"

View 9 Replies View Related

Hide Rows In All Sheets?

Oct 19, 2012

I have a workbook where each sheet is password protected. I'm trying to find some code that would unprotect each sheet, and hide rows 1-12 on each sheet, and then re-protect all sheets.

View 4 Replies View Related

Hyperlink & Hide Sheets

Feb 22, 2007

I need to hide all sheets appart from one sheet.

View 4 Replies View Related

Hide All Sheets But 1 When Saving

Oct 24, 2007

I would like to have all my worksheets except one hidden when a user saves the workbook. I can do it with a macro but not all users use the macro to save the document and sheets are left visible.

View 3 Replies View Related

Hide All Sheets When Macro Is Disabled?

Aug 2, 2014

continued from: [URL]

Option Explicit forces explicit declaration of all variables in the code. That is why i had to declare ws as worksheet using the Dim statement before using it in the code. It is recommended to have it - however for this code it wouldn't have mattered.

I'm not sure I exactly follow what you imply here. But yes, you can hide all the sheets at first and then "unhide" at the start of the macro. Let's say you have a "Start" sheet.. then:

[Code] .....

The workbook is used by other people too. I cannot just tell them to hide the sheets, it defeats the purpose. What I want is, when macro is disabled, they will only see the START sheet, otherwise, all sheets will be visible. To add to this, a new sheet is added everyday. Sheets name are calendar dates in mmdd format

View 4 Replies View Related

Show / Hide Sheets Per Username

Mar 8, 2014

I'm trying to only show specific sheets per user using the environ variable and this code seems to work for the single user / sheet but the master user does not function correctly i.e. the code does not show all sheets, this is the code I am using:

[Code] ......

Why the above code does not respect the Master User "Jane" should be able to see all sheets?

Original source for this code was found here:

HTML Code:  [URL]....

View 7 Replies View Related

Hide/ Unhide Sheets With Macro

Nov 6, 2008

I want to run 2 different macros:

Macro 1- hides Sheet1 and unhides Sheet2
Macro 2- Hides Sheet2 and unhides Sheet1

I used the macro recorder to attempt to make this work but am running into a problem if Macro1 is run two times consecutively. In this situation the macro displays a debugging error b/c Sheet1 is hidden. Is there a way to get around this...possibly using an if then statement?

View 6 Replies View Related

Hide Sheets While Updating Records

Dec 3, 2011

I have these following codes. when i click button then it updates the records, like pulling data from sheets and putting it into one. thats working fine. only things is, when it update the records, then it shows whats going on behind, all updating sheets get visiable. is it possible can i just hide whats going on in the back? when i click the button msg box comes up that please wait its updating the record.

Dim Response As Integer
MsgStr = "ARE YOU SURE YOU WANT TO UPLOAD NOW?, PLEASE CONSIDER RE-CHECKING YOU INPUT!!"
TitleStr = "USER MESSAGE"
If MsgBox(MsgStr, vbYesNo, TitleStr) = vbYes Then

Sheets("Employee Data Input").Select

[Code] ...........

View 4 Replies View Related

Hide Sheets Except With Wild Card

Apr 3, 2013

Heres My Code...

Code:

Sub HideDatedSheets()
Dim wb As Workbook
Dim ws As Worksheet
Dim dDate As Date

[Code]...

So what im trying to do is keep the Union* sheets shown as well as the Report* sheets shown. But i believe i have the code wrong because they are not showing up when the work book opens...

Trim(ws.Name) = "Union*" Or _
Trim(ws.Name) = "Report*" Or _

View 4 Replies View Related

Userform To Use 2 Comboboxes To Hide Sheets

Jun 6, 2013

Let's say I have Sheet1-Sheet6. I also have combobox1 (with item 1, 2, & 3 as the list items) & combobox 2 (with items 1 & 2 as the list items).

If combobox1 = 1 & combobox2 = 1 then hide Sheets 2,3,4,5,6
if combobox1 = 1 & combobox2 = 2 then hide Sheets 1,2,4,5,6
If combobox1 = 1 & combobox2 = 3 then hide sheets 1,2,3,4,6
If combobox1 = 2 & combobox2 = 1 then hide sheets 1,3,4,5,6
If combobox1 = 2 & combobox2 = 2 then hide sheets 1,2,3,5,6
If combobox1 = 2 & combobox2 = 3 then hide sheets 1,2,3,4,5

I would like to also make both of these combo boxes required fields and to default text to say 'Select One...'

View 1 Replies View Related

Macro - Hide Multiple Sheets

Mar 10, 2014

What would be the macro if i need to hide multiple select sheets? I'm working on a test with 12 sheets. Even number sheets contains the fields that they need to answer and the Odd number sheets contains the formula for score computing including the answers so it needs to be like this:

Sheet 2 - The test
Sheet 3 - Must be hidden
Sheet 4 - The test
Sheet 5- Must be hidden
Sheet 6- The test
Sheet 7 - Must be hidden

I already have the code to unhide all sheets, just need the macro to hide specific sheets like the ones above.

View 2 Replies View Related

Hide All Sheets Except Those Previously Visible

Mar 23, 2014

Here is what I think I want to do (however there may be a better way to get to the end result).

Macro 1:
Unhide all worksheets however, first list only the worksheets that are visible.

Macro 2:
I want to be able to hide all worksheets except those in the above list.

My intent would be to have these in the personal file so I could run either process on any file I have open so I think I would need to insert a tab for the list when unhiding & remove the tab after hiding.

I have found many strings unhiding all & hiding all except a named sheet... but can't find anything on the above?

View 2 Replies View Related

Macro To Hide Sheets In Workbook

Jun 3, 2014

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.

View 2 Replies View Related

Hide Sheets By Report User?

Jun 18, 2014

I developed some pivot table reports and macro'd out pdf'ing them for the users but now management want the users to be able to manipulate the data themselves !! The file is 31 sheets and I'm figuring they'll only want to see the sheets that are relevant to them so is there a way to macro it out?? Perhaps when the file opens it asks, "Who do you want to see?" Jack? Joe? or Rudy?, Month or YTD, or Both? or Everything? and it will hide the sheets that are not selected. The words "month" and "YTD" is in Cell "N1" and the individuals names are in Cell "M1".

View 6 Replies View Related

Hide All The Sheets Except Important Sheet

Feb 28, 2007

I wanted to force the user to "enable macros." Searching online brought me to the method of hiding all sheets but one and only un-hiding the important sheets if the user accepts macros. This is done with event procedures as shown below ( I stole this code from a webpage and only added unprotect/protect workbook and made the Hideall and Showall subs private also since I don't want the user to have any idea what's going on):

The code below starting with BEGIN works but my problem is I need to add some additional stuff to the WorkBook_BeforeClose procedure. What I added to the BeforeClose procedure is a series of IF statements that follow this form:

If IsEmpty(Range("C9").Value) = True Then
MsgBox "Please enter data in this Cell C9", vbExclamation + vbOKOnly, "Validation"
Cancel = True
End if
The problem occurs if the User attempts to close without entering the required data. This will correctly trigger the above IF statements as desired. However, after Canceling, if the user decides to Save (without closing, by say clicking the floppy disk button in the upper left), then "HideAll" is executed which I do not want. I assume this is because bIsClosing has been set to TRUE and was never reset after the IF statements triggered a Cancel? Is this correct? How can I fix this? I tried adding a bIsClosing = False line at the end of every IF statement, but I think that just made things more screwy.

BEGIN

Private Sub Workbook_BeforeClose(Cancel As Boolean)

bIsClosing = True
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Cancel = True Or bIsClosing = False Then Exit Sub
Run "HideAll"........................

View 9 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved