Link question
Solved/Closed
BB
-
May 6, 2010 at 09:51 AM
rizvisa1 Posts 4478 Registration date Thursday January 28, 2010 Status Contributor Last seen May 5, 2022 - May 6, 2010 at 01:41 PM
rizvisa1 Posts 4478 Registration date Thursday January 28, 2010 Status Contributor Last seen May 5, 2022 - May 6, 2010 at 01:41 PM
Related:
- Link question
- Facebook unlock link - Facebook Forum
- Facebook unlock link needed urgently - Facebook Forum
- Link manipulation - Guide
- Create whatsapp link - Guide
- Hp smart download link - Download - Other
2 responses
rizvisa1
Posts
4478
Registration date
Thursday January 28, 2010
Status
Contributor
Last seen
May 5, 2022
766
May 6, 2010 at 10:01 AM
May 6, 2010 at 10:01 AM
I am not sure exactly what you asked ( though your question was very simple). It seem that you would using find with macro, that you would need to define an event for your summary sheet
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub
Could you please upload a sample file with sample data etc on some shared site like https://authentification.site and post back here the link to allow better understanding of how it is now and how you foresee.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub
Could you please upload a sample file with sample data etc on some shared site like https://authentification.site and post back here the link to allow better understanding of how it is now and how you foresee.
rizvisa1
Posts
4478
Registration date
Thursday January 28, 2010
Status
Contributor
Last seen
May 5, 2022
766
May 6, 2010 at 10:47 AM
May 6, 2010 at 10:47 AM
Assumptions:
1. The summary sheet is called Detail
2. The summary sheet is named Sheet1 in VBE
steps:
1. Press ALT + F11 to goto VBE
2. Press CTRL + R to open Project Explorer
3. Double click on your Summary sheet
4. Paste this code
5. Double click on your Detail Sheet and paste this
1. The summary sheet is called Detail
2. The summary sheet is named Sheet1 in VBE
steps:
1. Press ALT + F11 to goto VBE
2. Press CTRL + R to open Project Explorer
3. Double click on your Summary sheet
4. Paste this code
Public lLocation As Variant
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column <> 1 Then Exit Sub
On Error Resume Next
lLocation = 0
lLocation = Sheets("Detail").Cells.Find(Target, Cells(1, 1), SearchOrder:=xlByColumns, SearchDirection:=xlNext).Row
On Error GoTo 0
End Sub
5. Double click on your Detail Sheet and paste this
Private Sub Worksheet_Activate()
If (Sheet1.lLocation <> "" And Sheet1.lLocation > 0) Then
Cells(Sheet1.lLocation, "a").Select
Sheet1.lLocation = ""
End If
End Sub
rizvisa1
Posts
4478
Registration date
Thursday January 28, 2010
Status
Contributor
Last seen
May 5, 2022
766
May 6, 2010 at 01:41 PM
May 6, 2010 at 01:41 PM
you are welcome Brad. You have doing some thing very rare, which is you have posted a feedback.once getting the answer. Not many do that. So thank you for doing that. :)
