Linking a Cell to Pull Up a Hidden Worksheet on Click

LactoseO.D.'d

Board Regular
Joined
Feb 22, 2010
Messages
52
I am creating a macro that will be available from the menu when the user right clicks on a cell in a space we'll call worksheet 1. When they select the macro, a new worksheet (worksheet 2) will populate from a hidden worksheet and name itself after the cell two columns to the right of the selected cell. Worksheet 2 has an area for computations and a value that is ultimately linked back to the original right clicked cell on worksheet 2. When the user clicks worksheet 1, or leaves worksheet 2 in general, I want worksheet 2 to hide until the user left clicks on the original cell in worksheet 1.

That sounds like a lot, but the good news I can handle most of it (I was completely green when I first started coming here, *muscle flex* look at me now). I do not know how to write a macro that will call up the generated worksheet on click for any cell. I am also not sure about what event handler I can use to hide the sheet when it is no longer selected.
 

Excel Facts

Easy bullets in Excel
If you have a numeric keypad, press Alt+7 on numeric keypad to type a bullet in Excel.
Could the user click on lots of different cells, and this would have to work for all of them ?
Or is there only ever one cell that they will click ?
 
Upvote 0
They should be able to assign this to any cell. So lots of cells. Only one would be something I could handle... this... baffles me and I hope its possible.
 
Upvote 0
I'll post some sample code tomorrow. Right now, I think it can be done, but I'm not really sure about the two parts I wrote about above.
 
Upvote 0
Ok here is what I have so far:

Code:
Sub Makenew()
Dim Act As Range
Dim target As Range
Dim Name As String
Set Act = ActiveCell


Name = Act.Offset(0, -2)
ActiveWorkbook.Names.Add Name:=("data" & Name), RefersTo:=Act
Sheets("WBS.CostTemp").Copy After:=Worksheets(Worksheets.Count)
ActiveWindow.ActiveSheet.Name = Name

Worksheets(wkstname).Select

ActiveCell.Select
Selection.Formula = "='" & Name & "'!B3"

If target.Address = "data" & Name Then MsgBox "I'm A1"

End Sub

wkstname is a global variable defined from an input box

Everything works except the last bit. I am trying to get the selected cell to run a macro on click. Right now, it is a msgbox, but it will eventually load the created sheet.
 
Upvote 0

Forum statistics

Threads
1,224,522
Messages
6,179,299
Members
452,904
Latest member
CodeMasterX

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top