need VBA to allow Double click on Employee Name and it will take me to the employee name on another sheet

[time4tg]

I have some knowledge of VBA, but not very proficient. I am looking if someone could help me with my workbook issue. I have a spreadsheet that I get filled with a lot of data for employees. On separate sheets I have a list of the employee names with summary information that I pulled from the original worksheet. I want to be able to double click on the employee name and take it to the data worksheet so that I can see the detail
Sheet 1

Util Report Sample.xlsx
	B	C	D	E
3		H	L
4	Employee 1 - Total	Employee 1	146.3%
5	Employee 2 - Total	Employee 2	59.6%
6
Sheet1

Cell Formulas
Range	Formula
D4:D5	D4	=VLOOKUP($B4,Sheet2!$H:AI,5,0)

Sheet 2

Util Report Sample.xlsx
	A	B	C	D	E	F	G	H	I	J	K	L	M
1
2		Title
3	Week	User Role	Geo	Market	Main Department	Country	Year	Month	Week	LOB	Emp Status	Major	Practitioner
4								January, February, March, April, May
5
6		Report Selection
7		User Role		Type	View	Show Activity Details
8
9
10
11
12		Geo		Market		Country		Main Department		Major	Line of Business
13
14		Year		Month		Week				Employee Status	Practitioner
15
16
17
18		Employee (6pos)
19
20		Department Nbr (7pos)
21
22
23
24
25
26				Report creation Time :
27	A	B	C	D	E	F	G	H	I	J	K	L	M
28	Place	Region	Area	000		Manager 1	XXXXXX1	Employee 1	01XXXX	January	01	146.3%
29										January - Total		146.3%
30								Employee 1 - Total				146.3%
31							xxxxxx1 - Total					146.3%
32						Manager 1 - Total						146.3%
33						Manager 2	XXXXX2	Employee 2	02XXXX	January	01	4.8%
34											02	0.0%
35											03	59.3%
36											04	39.8%
37											05	0.0%
38										January - Total		20.8%
39										February	06	113.5%
40											07	102.0%
41											08	84.0%
42											09	87.5%
43										February - Total		96.8%
44										March	10	75.0%
45											11	87.8%
46											12	65.0%
47											13	57.5%
48										March - Total		71.3%
49										April	14	38.0%
50											15	81.5%
51											16	85.5%
52											17	51.8%
53										April - Total		64.2%
54										May	18	42.5%
55											19	88.0%
56											20	57.5%
57											21	31.0%
58										May - Total		54.8%
59								Employee 2 - Total				59.6%
Sheet2

 

[My Aswer Is This]

You said:
I want to be able to double click on the employee name and take it to the data worksheet so that I can see the detail

So where are these employee names?
And you said "Take it"

Does that mean activate the sheet?
So if you double click on "Alpha" Sheet named "Alpha" will be activated.
Is that what you want?
So tell me are these sheet names in column A and you want to double click on a cell in column A and be taken to the sheet name you double click on. Is that correct? If not please explain with more specific details

 

[time4tg]

You said:
I want to be able to double click on the employee name and take it to the data worksheet so that I can see the detail

So where are these employee names?
And you said "Take it"

Does that mean activate the sheet?
So if you double click on "Alpha" Sheet named "Alpha" will be activated.
Is that what you want?
So tell me are these sheet names in column A and you want to double click on a cell in column A and be taken to the sheet name you double click on. Is that correct? If not please explain with more specific details

I just used names of Employee 1 and Employee 2. In Sheet I just have 3 columns, Employee 1 - Total, Employee 1 and the percent listed in column L from Sheet 2. Sheet 2 has the employee name in Column H. When I am looking at the information in Sheet one, I would like to be able to double click on Employee 1 (the name) and it will take you to Sheet 2 to that matching employee name. ()this name is in column H on Sheet 2) Hope that explains better.

 

[My Aswer Is This]

Assuming your sheet name is "Sheet 2" like in your image
And not "Sheet2")
There is a differents.

This is an auto sheet event script
Your Workbook must be Macro enabled
To install this code:
Right-click on the sheet tab
Select View Code from the pop-up context menu
Paste the code in the VBA edit window

Put this script in the sheet where you plan to double click on a cell in column H

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Modified  6/7/2022  10:17:45 PM  EDT
If Target.Column = 8 Then
Cancel = True
Dim ans As String
Dim SearchString As String
Dim SearchRange As Range
SearchString = Target.Value
Dim lastrow As Long
lastrow = Sheets("Sheet 2").Cells(Rows.Count, "H").End(xlUp).Row
Set SearchRange = Sheets("Sheet 2").Range("H1:H" & lastrow).Find(SearchString, LookIn:=xlValues, lookat:=xlWhole)
If SearchRange Is Nothing Then MsgBox SearchString & "  Not Found": Exit Sub
ans = SearchRange.Address
Application.Goto Sheets("Sheet 2").Range(ans)
End If
End Sub

 

[time4tg]

Thank you, My Answer is This. I got it to work perfectly!!

 

[My Aswer Is This]

Thank you, My Answer is This. I got it to work perfectly!!

Glad I was able to help you.
Come back here to Mr. Excel next time you need additional assistance.