Hi,
I have 2 worksheets (January & February).
If you check the box "Show February", i would like to do the following actions:
*Un tick the "Show February" then hide the "January" tab and unhide the "February" tab and select cell A1.
Attached is a sample file.
Something like this?(for the first part). If yes we'll do the other one too.
Private Sub CheckBox1_Click() Sheets("February").Select ActiveWindow.SelectedSheets.Visible = False Sheets("January").Range("A1").Select End Sub
Regards
Fotis.
-This is my Greek whisper to Europe.
--Remember, saying thanks only takes a second or two. Click the little star * below, to give some Rep if you think an answer deserves it.
Advanced Excel Techniques: http://excelxor.com/
--KISS(Keep it simple Stupid)
--Bring them back.
---See about Acropolis of Athens.
--Visit Greece.
Ive tried the following:
Private Sub Checkbox1_Click() If Checkbox1.Value = True Then Application.ScreenUpdating = False Sheet2.Visible = xlSheetVisible Sheet1.Visible = xlSheetHidden Sheets("sheet2").Activate Else Sheet2.Visible = xlSheetHidden Application.ScreenUpdating = True End If End Sub
How do i add uncheck the box once the above action has been completed?
Last edited by batchy; 02-20-2014 at 09:01 AM.
This is my best.
Private Sub CheckBox1_Click() Sheets("January").Select Sheets("February").Visible = True Range("A1").Select Sheets("January").Visible = False End Sub
I have resolved this by doing the following:
Private Sub Checkbox1_Click() If Checkbox1.Value = True Then Application.ScreenUpdating = False Sheet2.Visible = xlSheetVisible Sheet1.Visible = xlSheetHidden Sheet2.Activate sheet1.Checkbox1.value = False Else Sheet2.Visible = xlSheetHidden Application.ScreenUpdating = True End If End Sub
Well done!
thanks for the feed back.
As that takes care of your original question, please select Thread Tools from the menu link above and mark this thread as SOLVED,as per Forum Rule #9. Thank you.
Also, as a new member of the forum, you may not be aware that you can thank those who have helped you by clicking the small star icon located in the lower left corner of the post in which the help was given. By doing so you can add to the reputation(s) of those who helped.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks