I want to click a cell and from there go to another page based on a cell value from the first.
So far I have
-----------------
Open explicit
Private sub Worksheet_Selectionchange(ByVal Target as Range)
If selection.count = 1 Then
If Not intersect(Target, Range("D7")) is Nothing Then
Sheets("Data").Select
Active sheet.Range("$A$1:$BH$1000").AutoFilter Field:=52, Criteria1:=("Details") & Range("B7")
End if
End if
End sub
This selects the second worksheet and shows the heading but is not showing the data from the required cell.
Any help would be appreciated
Bookmarks