Solved

Returning to  'calling' hyperlink cell from another hyperlink.

Posted on 2002-05-01
10
292 Views
Last Modified: 2012-02-07
I'm sure this is quite easy to explain, but as usual I’ll drag it out a bit :)  sorry.

In sheet1 of excel I have hyperlinks to sheet2. In sheet 2 I have one hyperlink "BACK".

How do I make the BACK hyperlink go to the cell in sheet1 that just called it? The problem is that the cells in sheet1 that contain the hyperlinks to sheet2 are likely to move about so no 'hard coding' of cell references is possible.

I have tried to think of a way top make VB do this but failed so I turned to the Microsoft Script Editor, but that's written in Java (at a guess) and I’m even worse with that than I am with VB.

Can anyone make a suggestion of how to do this or if I’ve made myself unclear please post a comment or two asking me questions.

Thanks ppl.
0
Comment
Question by:craigewens
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 6
  • 4
10 Comments
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 6983665
Create a global variable of type range.
dim rngHyp as range
When you do click on hyperlink 1, set that variable to cell with hyperlink.
On sheet 2, call hyperlink "back" and do something like:

rngHyp.select


Hope it helps
0
 
LVL 2

Author Comment

by:craigewens
ID: 6985487
Thanks for your comment Richie and i understand what your saying (partially) but all the hyperlinks are created through excel rather than VB, this means (as far as i can figure out) that VB has no knowledge of them.

If you have the time, could you add a little more to your previous comment because atm the vb sheet is blank... :(

Thanks

Craig.
0
 
LVL 2

Author Comment

by:craigewens
ID: 6999158
Richie, i've played about even more with what you suggested but all the stuff i create in VB through excel requires to be 'run' (macro).

Can you think of a way to do this still?

If your unsure open up excel and try what i am trying to do (takes about 10 seconds), you'll soon see where i'm having the troubles.

Thanks.
0
Instantly Create Instructional Tutorials

Contextual Guidance at the moment of need helps your employees adopt to new software or processes instantly. Boost knowledge retention and employee engagement step-by-step with one easy solution.

 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 6999239
For reason thta is unknown, i did not receive your first comment notif.
Let me see....
0
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 6999342
Just a question: why did you use a hyperlink to get this work?
0
 
LVL 16

Accepted Solution

by:
Richie_Simonetti earned 100 total points
ID: 6999420
we could add a custom commandbar and work with two buttons.
the code behind them would be:

'in a module
Public Sub MovePrevious()
On Error GoTo errTrap
Sheets(ActiveSheet.Index - 1).Activate
Exit Sub
errTrap:
If Err = 9 Then
    Resume Next
End If
End Sub
Public Sub MoveNext()
On Error GoTo errTrap
'Set rngActive = ActiveSheet.ActiveCell
Sheets(ActiveSheet.Index + 1).Activate
Exit Sub
errTrap:
If Err = 9 Then
    Resume Next
End If
End Sub
0
 
LVL 2

Author Comment

by:craigewens
ID: 6999560
Thanks ever so much for replying so quickly, once EE started sending out the notifications again :)

But i found this on another question:

Sub BackToWhenceYouCame()
  On Error GoTo skip
  CommandBars("Web").Controls("Back").Execute
  skip:
End Sub

It seems to do what i'm after and works from calling this sub from any command button click.

Can you think of any reasons or situations why i shouldn't use this? (version dependant, OS dependant etc etc)

Of course you can still have the points anyway as almost every question i ask or search for you seem to have given the accepted answer :)

Thanks.
0
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 6999596
I don't know if it would works on office97.
Dont care about points, i like points ONLY if i deserve them.
Cheers
0
 
LVL 2

Author Comment

by:craigewens
ID: 6999633
Well i tested your code and it is just as effective as the other suggestion i found. Seeing as you have your doubts on if it'll work in other versions of office i guess you ONLY deserve the points after all  :)

Thx
0
 
LVL 16

Expert Comment

by:Richie_Simonetti
ID: 7001324
Well, thanks for "A" grade!
0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
I was working on a PowerPoint add-in the other day and a client asked me "can you implement a feature which processes a chart when it's pasted into a slide from another deck?". It got me wondering how to hook into built-in ribbon events in Office.
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

688 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question