Add to existing VB code to auto hide and show rows based on a certain cell value

[kwoltman]

Sorry I cannot share my file as it's super large and would break if I strip things out of it and it would take way too long to remove all confidential data.

2 tabs are affected by what I'm doing/or trying to do here:
- Tab 1 is named "Weekly Review"
- Tab 2 is named "Hidden - Weekly Pivots"

The following code, thanks to WBD, works perfectly.
This code updates 6 pivot tables on tab 2 when any 1 of 4 named cells changes (see the 4 named cells below all starting with "fld").
Along with the pivot table refresh, there's a Form/Timed Message Box that shows to the user telling them that the update is in progress, this msg box auto closes in approx. 15 seconds, and then a 2nd Message Box appears telling the user the update is complete. The user hits OK to close this 2nd message box.

Please Login or Register  to view this content.

Here's what I'm trying to add to the above.
- If "fld_SelectWeeklyPullRangeType" (which is a 2 list drop-down) changes to "Latest # of Weeks", then
- Show rows 3-4 and Hide rows 5-9
- If "fld_SelectWeeklyPullRangeType" is changed to "Date Range", then
- Show rows 5-9 and Hide rows 3-4

Here's the updated code where I added 7 additional lines of code, all commented out currently because with these new lines the code does nothing now and I do not know why.

Please Login or Register  to view this content.

[WideBoyDixon]

I stared at this for a while and could only guess that the values "Latest # of Weeks" and "Date Range" do not match the values in the cell exactly. If you want to check whether the lines are being executed then put a breakpoint on the line (highlight the line and hit F9) then go back to the sheet and change the value and check to see what's happening. If you put the break on the first If statement then you can step through the code using F8 and just run the remaining code using F5. You can also highlight variables and expressions and hit Shift+F9 to check the values.

WBD