Auto Unhide Worksheet
Mar 7, 2007
What I am trying to do is keep a few worksheets hidden until something is entered onto that sheet using a vlookup formula.
My Setup is that we have a daily schedule that is on "sheet 1" when we enter certain items on that sheet, vlookup allows them to appear on "sheet 4". now when an Items appears on "Sheet 4" that is when we would like the sheet to become "unhidden".
Using MVB I found - Sheets("Sheet4").Visible = True
I tried attaching an IF;then statement to it referencing cell (A5) but either it doens't work like that or the code was wrong.
View 10 Replies
ADVERTISEMENT
Dec 15, 2008
I'm using this VBA code which is hiding cells in rows 59:111. Some of these cells have formulas and some don't.
Private Sub Hide_Unhide()
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
For i = 59 To 111
Rows(i).Hidden = (Cells(i, "b").Value = 0) + (Cells(i, "b").Value = "")
Next i
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub
Here is the problem I'm running into: I want this to run in the background so the user won't have to click anything to hide/unhide the cells whenever the options in the drop down list are changed and the data expands/collapses.
View 9 Replies
View Related
Mar 5, 2009
I have an Excel schedule with subtotals and between 1 and 50 rows under each subtotals. The subtotals contain totals of the rows below them. Is it possible to link code to an object (say a 'down arrow' next to each subtotal) and when it is hit, it unhides the rows beneath the subtotals? At the same time the 'down arrow' changes to an 'up arrow' and when that it hit it re-hides the rows.
There is also the possibility that the user will unhide rows and move down the spreadsheet unhiding/rehiding other areas before coming back and wanting to re-hide the first area he revealed. When the spreadsheet is closed, all the arrows should revert to 'down arrows' and all the non-subtotals' rows should be hidden.
View 6 Replies
View Related
Aug 23, 2013
I have a very long spreadsheet and want to keep it manageable by hiding rows until they are needed.
Example:
Column
Row A B C D E
1 Line1
2 Reg
3 OT
4 Min
5 Line2
6 Reg
7 OT
8 Min
I want to click on A1 and auto hide rows 2-4. Then I want to click on A1 and auto unhide rows 2-4. Then I would copy the idea to Line2, etc.
View 4 Replies
View Related
Mar 18, 2014
I want to click on a cell and automatically hide the 3 rows underneath where I clicked. Then unhide them when clicked again.
I will assign the vba code to the specific cells of the sheet where I need it. But it will always hide/unhide the 3 rows underneath the click.
View 2 Replies
View Related
Feb 27, 2009
The workbook contains 5 worksheets, 4 of which will unhidden just fine; the remaining worksheet ("AnnualBudget" refuses to unhide columns AD to IV. Of course, this is the sheet that contains data in those hidden cells and I cannot get to the data. The sheet is unprotected and all freeze panes removed.
I have copied this sheet to a new sheet in the same workbook:
If I copy only formulas and number formats, the new sheet has all columns unhidden. If I copy formats, I have the same issue with the new worksheet. It’s like these columns are forever locked from view.
FYI I am using Excel 2007 with a 2003 compatability worksheet
A copy of the workbook is attached. Any idea what’s happening?
View 6 Replies
View Related
Apr 30, 2009
i was trying to hide my worksheet menu bar, i was searching the web & i got this macro
View 3 Replies
View Related
Mar 30, 2004
I put the correct cell in place $K$23, now I want to hide a worksheet called "DutyCode" when info!$k$23 is blank or has "xx" or "XX" in the cell, and then unhide "DutyCode" when the number 27 is inputed in info!$k$23
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address "$k$23" Then Exit Sub
If Target.Value = 1234 Then
Worksheets("Sheet2").Visible = True
Else
Worksheets("Sheet2").Visible = False
End If
End Sub
View 5 Replies
View Related
Jul 21, 2007
I have a workbook with quite a few worksheets, along with a summary page. The summary page has a list of names of all the worksheets in the workbook. I am still learning to use Macro. So far, I have created buttons to hide the individual worksheets (each component is on a worksheet by itself). But I can't figure out how to unhide a specific worksheet from a group of worksheets without creating just as many macros calling specific worksheet names. I don't really want to create 100s of little macros. I am sure there is a better way out there.
Here is a concept of the workbook:
On the summary page, the user supposed to click on a label ("T1000" for example), and this will unhide a worksheet with the same name (T1000). There are hundreds of these worksheets, how does it find
This is my idea of how the function supposed to work.
First determine the label text as a string.
Then locate the worksheet with the name equals to the string
then set visibility = true.
View 9 Replies
View Related
Mar 17, 2014
My goal when the value in cell K14 is >= 149 then UnHide the worksheet called / labled "Operational"
I have written the statement below: I am not getting a debug error nor is my statement doing what I expect i am not sure what is wrong.
Sub test1 ()
If Range("I14").Value >=149 Then
Workbook.Sheets("Operational").Visible = True
Else
Workbook.Sheets("Summary").Visible = True
End If
End Sub
I also have this statement executing when the workbook opens:
Private Sub Workbook_Open()
ThisWorkbook.Sheets("Operational").Visible = False
ThisWorkbook.Sheets("Summary").Visible = False
End Sub
View 4 Replies
View Related
May 22, 2009
I am having difficulties with this one. I have a button on my worksheet (sheet1) that runs a macro.
View 4 Replies
View Related
Aug 4, 2014
Within a worksheet "Page_2" I would like VBA to perform following calculation: IF(COUNTIF(R:R;1);1;2)
Basically, look into column R of worksheet "Page_2" and look if there is in the column at least one number with the value 1, if there isn't show me value 2.
Depending on the value coming out of this function, VBA needs to hide worksheet "Page_3" if the value is 2 and unhide worksheet "Page_3" if the value is 1.
Here is the code which I'm using and that is not working.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Application.WorksheetFunction.CountIf(Range("R1:R5000"), 1) = 1 Then
Worksheets("Page_3").Visible = True
[Code]...
View 2 Replies
View Related
Feb 5, 2012
I have a workbook with daily sales information for each week in a period (4,5 or 6 weeks) depending on the fiscal year calendar. I have a dashboard to select the weekending date in cell D7. I used mscal 7.exe to embed the calendar. I need the date to remain the same, but want the calendar to show the current date. Cell H5 shows the current period;i.e. 1,2,3,4 etc. Cell H7 shows the week number of the period (1,2,3,4,5 and 6 for December).
I need vba code to showthe appropriate week's daily sales worksheet based on the info in cell H7 on the dashboard. The week number on the dashboard page is obtained fromthe calendar worksheet with a vlookup formula. These sheets are named "week 1, week 2, week 3, week 4, week 5 and week 6". I need to assign this code to a shape with the caption Create New Week.
View 1 Replies
View Related
Jun 15, 2007
I have a protected sheet so specific people can only see certain things. I would like code to Unhide a tab called "Estimating" and unhide Rows 2 through 9 and rows 24, 26 and 27.
View 9 Replies
View Related
Sep 27, 2006
I want to make a hidden sheet visible. Except that i want to use the name of the sheet (the thing that stays the same even when you change the sheet tab name). I also want to select the name based on a variable called Year which the user adds elsewhere (eg as 2006).
wf = "WF_Edin_" + Year 'So for 2006 this would read WF_Edin_2008
wf.Visible = True
The above doesnt work as wf becomes a string which i dont think i want do i?
View 7 Replies
View Related
Jul 18, 2010
I would like to create a macro/vb code that will unhide a worksheet if cell value is greater than zero, or hide the worksheet if the cell value is zero.
I'm not too familiar with VB code and was wondering if this is possible? I have my doubts, since it means that the code must constantly be running in an endless loop, checking to see if the value has changed?
View 9 Replies
View Related
Oct 24, 2006
Need the VBA script to hide/unhide specific columns within a worksheet.
View 9 Replies
View Related
May 29, 2012
I have Columns A to C which are hidden. I have tried to unhide these bey selecting the entire worksheet but to no avail. I am using Office 2010.
View 4 Replies
View Related
Dec 15, 2009
I'm a novice Excel 2007 user and appreciate all the help I can get. I have a workbook with monthly worksheets in it. When a certain data Type is selected from a drop down menu in that monthly worksheet than I would like to have it automatically enter specific data (Name, Date, Eval, Type) copied to another worksheet (CC) in the same workbook. I have been manually entering the data so far. Another thing, some of the data will be entered into the Monthly worksheets and some will only be manually entered into the CC worksheet so it would need to accomodate both methods of data entry. Please let me know if I need to clarify. I have attached the workbood, too.
View 11 Replies
View Related
Sep 2, 2013
The new worksheet is created to the left of the existing source worksheet.
View 2 Replies
View Related
Feb 23, 2014
I am copying data from worksheet "Microsoft" to another workbook and paste in sheet1, i want the cell G1 to auto input the worksheet name "Microsoft" where i copy the data from,
How to have G1 show the worksheet name after i copy and paste the data from worksheet name "Microsoft".
View 6 Replies
View Related
Apr 23, 2009
using Excel 2007/Vista
when I go a new edit a macro, I get the message
"Cannot edit a macro in a hidden workbook. Unhide the workbook using the unhide command"
Where do I find the relevant "unhide command"?
View 9 Replies
View Related
Mar 12, 2007
I have a worksheet in Excel which contains scores for a quiz I am organizing. The rows contain the team names, the columns the scores per round per team.
I would like to have the worksheet automatically sort the columns in descending order (so that the winner will come out on top after the quiz has finished), everytime I change something (everytime a score is updated). I can't find anything in Excel which would allow me to do that, so I'm guessing it's only possible in VBA? Unfortunately, I don't know anything about VBA, so I'm stuck.
These are the ranges I would like to have sorted, in order of priority:
Row 1 is the row with the column titles (Round 1, Round 2,...).
C2: C26
N2:N26
M2:M26
L2:L26
K2:K26
J2:J26
I2:I26
H2:H26
G2:G26
F2:F26
E2:E26
D2:D26
View 9 Replies
View Related
Oct 5, 2009
I want to try and rename a worksheet tab according to the value in a cell.
I have a worksheet with a column of cells each having list boxes, i want the following to change. If i select a value from the list box in worksheet 2 cell A2 it should change the worksheet 3 tab name to equeal the list box value.
And so on, If i select a value from the list box in worksheet 2 cell A3 it should change the worksheet 4 tab name to equeal the list box value.
View 9 Replies
View Related
Dec 3, 2008
I am trying to write a macro that auto filters a worksheet automatically any time a user activates the worksheet. I already have the macro in place to autofilter the worksheet and have it linked to a push button on the worksheet, but would much prefer the worksheet to auto filter automatically if possible.
View 2 Replies
View Related
Oct 28, 2013
I have a PO Template, which I use it to issue Purchase Order and keep track on monthly purchases.
This PO template allow me generate a fresh PO with feature of auto "Name" which is the running number for the PO.
However, i have a problem to generate the reference number in the sequence which tirelessly seach a way to work this out.
Below is my current code, as i tried to set my statting code say "87500", the next incremental number just dont generate according to it sequence..
Code:
Sub AddSheet()
Dim strName As String
Dim intNum As Integer, intLastNum As Integer
Dim wsh As Worksheet
Dim lngRow
For Each wsh In Worksheets
[Code]....
View 4 Replies
View Related
Jul 31, 2012
How can I auto populate certain relevant cells that has been chosen by input in a different worksheet?
Example:
Input cells in Worksheet 1:A1= 100 (Data to Show in Periods chosen below)
A2= 3 (begin period)
A3= 5 (end period)
Result on worksheet 2: A1(PERIOD 1) = 0
A2(PERIOD 2) = 0
A3(PERIOD 3) = 100
A4(PERIOD 4) = 100
A5(PERIOD 5) = 100
A6(PERIOD 6) = 0
A7(PERIOD 7) = 0
View 4 Replies
View Related
Nov 26, 2012
I'm trying to figure out a way to populate multiple cells automatically with certain information after entering info into a single cell on a separate worksheet in a separate workbook.
Our "master" sheet has 22 total columns (A-V), and our weekly "status" sheet only has 7 total columns (A, E, P, L, M, N, R).
Column A on both sheets is labeled "Sample Number". On the "status" sheet I want to be able to type, for instance, "2012-228" into A2 and have the corresponding values from Columns E, P, L, M, N, R on the "master" sheet automatically populate into B2-G2 on the status sheet if this is at all possible.
View 5 Replies
View Related
Feb 26, 2009
i can place a tick box on a worksheet that will turn auto calc on/off? The same exact as going through the tools menu but for a lazy person?
View 2 Replies
View Related
Jun 27, 2013
I've created an Auto_Run macro that imports a CSV file into a specified worksheet. That worksheet is referenced by VlookUp in another worksheet within the workbook. Everything works perfectly EXCEPT, in the midst of running the macro, the user is prompted to (RE)choose the csv file already specified in the macro. Neither the folder nor the filename ever changes, so I'm not sure why I have to keep indicating the file every time the macro runs.
PHP Code:
 'Sub Auto_Run() ' ' Auto_Run Macro ' '    Sheets("CSVData").Select    Cells.Select   Â
Selection.Delete Shift:=xlUp    With ActiveSheet.QueryTables.Add(Connection:= _  "TEXT;
G:TestProjectsWorkOrderTest.csv", Destination:=Range("$A$1"))       Â
.Name = "WorkOrderTest"        .FieldNames = True        .RowNumbers = False       Â
[Code] .......
View 7 Replies
View Related
