Find Value and go to that Value in Another Sheet
 

I, I recorded a macro to go to a value on another sheet ("Hlist") as
specified on the first sheet ("Snapshot") in cell c4, but it's not working.
The recording only allows me to look for a set value ("Apples") not a value
located in C4 on sheet "SnapShot"... Thanks for any suggestions.

Sub Go_To_Value()
'
' Macro3 Macro
'
Sheets("SnapShot").Select
Range("C4").Select
Selection.Copy

Sheets("HList").Select
Columns("D:D").Select
Selection.Find(What:="Apples", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate


End Sub

Find Value and go to that Value in Another Sheet
 

Change What:="Apples" to What:=Range("C4").Value

HTH

Die_Another_Day
SteveC wrote:
I, I recorded a macro to go to a value on another sheet ("Hlist") as
specified on the first sheet ("Snapshot") in cell c4, but it's not working.
The recording only allows me to look for a set value ("Apples") not a value
located in C4 on sheet "SnapShot"... Thanks for any suggestions.

Sub Go_To_Value()
'
' Macro3 Macro
'
Sheets("SnapShot").Select
Range("C4").Select
Selection.Copy

Sheets("HList").Select
Columns("D:D").Select
Selection.Find(What:="Apples", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate


End Sub

Find Value and go to that Value in Another Sheet
 

Sry forgot the sheet name:
What:=Sheets("SnapShot").Range("C4").Value

Die_Another_Day

Die_Another_Day wrote:
Change What:="Apples" to What:=Range("C4").Value

HTH

Die_Another_Day
SteveC wrote:
I, I recorded a macro to go to a value on another sheet ("Hlist") as
specified on the first sheet ("Snapshot") in cell c4, but it's not working.
The recording only allows me to look for a set value ("Apples") not a value
located in C4 on sheet "SnapShot"... Thanks for any suggestions.

Sub Go_To_Value()
'
' Macro3 Macro
'
Sheets("SnapShot").Select
Range("C4").Select
Selection.Copy

Sheets("HList").Select
Columns("D:D").Select
Selection.Find(What:="Apples", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate


End Sub

Find Value and go to that Value in Another Sheet
 

Thank you!