Hide and unhide groups of worksheets automatically in Excel

Hide and unhide groups of worksheets automatically in Excel. Hide and unhide groups of worksheets by drop-down list selection. Free templates and templates with code are available for purchase for $50 USD
https://www.easyexcelanswers.com/templates.html

For more help visit my website www.easyexcelanswers.com or email me at easyexcelanswers@gmail.com.

Contact me regarding customizing this template for your needs.

Click for online Excel Consulting http://www.calendly.com/easyexcelanswers

I am able to provide online help on your computer at a reasonable rate.

https://www.amazon.com/shop/barbhenderson

I use a Blue condenser Microphone to record my videos, here is the link
https://amzn.to/37gyyGa

Check out Crowdcast for creating your webinars
https://app.linkmink.com/a/crowdcast/83

If you need to buy Office 2019 follow
https://amzn.to/2VX5dv8

I use Tube Buddy to help promote my videos
Check them out
https://www.Tubebuddy.com/easyexcelanswers

Follow me on Facebook
https://www.facebook.com/easyexcel.answers

TWEET THIS VIDEO https://youtu.be/ZBfp-8OYu0U

Follow me on twitter
easyexcelanswers

IG @barbhendersonconsulting

You can help and generate a translation to you own language
http://www.youtube.com/timedtext_cs_panel?c=UCFH2kZykqt-VX5W9waJzYvQ&tab=2

*this description may contain affiliate links. When you click them, I may receive a small commission at no extra cost to you. I only recommend products and services that I've used or have experience with.

code for worksheet
Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Me.Range("c3")) Is Nothing Then

Call hidews
Application.EnableEvents = True
End If

End Sub

code for module
Sub hidews()
Dim which As String

which = Sheet1.Range("C3").Value
Sheet1.Range("C3").Select

Select Case which
Case Is = "one"
Worksheets("A").Visible = True
Worksheets("B").Visible = True
Worksheets("c").Visible = True
Worksheets("D").Visible = False
Worksheets("e").Visible = False
Worksheets("f").Visible = False
Case Is = "two"
Worksheets("A").Visible = False
Worksheets("B").Visible = False
Worksheets("c").Visible = False
Worksheets("D").Visible = True
Worksheets("e").Visible = True
Worksheets("f").Visible = True
Case Is = "three"
Worksheets("A").Visible = True
Worksheets("B").Visible = True
Worksheets("c").Visible = False
Worksheets("D").Visible = False
Worksheets("e").Visible = False
Worksheets("f").Visible = True
End Select
End Sub

Видео Hide and unhide groups of worksheets automatically in Excel канала Barb Henderson