Add value to cell when clicking on hyperlink/cell

Ramballah

Active Member
Joined
Sep 25, 2018
Messages
334
Office Version
  1. 365
Platform
  1. Windows
Hi everyone,

I am working in a sheet that whenever I click on a hyperlink, I then need to fill in the column next to it "Ja" meaning that I opened the hyperlink.
This has been very tedious for me especially since I got hundreds left to do.
Is there a way that when I click on the link in B2 for example that cell C2 will go from empty to "Ja"

I downloaded it from spreadsheets to Excel 365. I know I have a duplicate thread in a different section but I simply am not getting a response there and I don't have a whole lot of time. I can't delete my thread either afaik.

1640866014679.png

Here's an example.

Thanks in advance,
Ramballah
 

Excel Facts

Formula for Yesterday
Name Manager, New Name. Yesterday =TODAY()-1. OK. Then, use =YESTERDAY in any cell. Tomorrow could be =TODAY()+1.
Perhaps this idea
Instead of entering text in an adjacent cell, try using VBA to change the cell color after clicking the hyperlink.
 
Upvote 0
Perhaps this idea
Instead of entering text in an adjacent cell, try using VBA to change the cell color after clicking the hyperlink.
No can do, a robot checks the file for "Ja" and once its "Ja" theres the conditional formatting. So I need it to say Ja.
 
Upvote 0
Maybe try using the "Worksheet_FollowHyperLink" event procedure code in VBA?

If you right-click on the sheet tab name at the bottom of the sheet, and select "View Code", and paste this VBA code in the resulting VB Editor window:
VBA Code:
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
    ActiveCell.Offset(0, 1) = "Ja"
End Sub
then whenver you click on a hyperlink on that sheet, it will put "Ja" in the column just to the right of that hyperlink.
 
Upvote 0
Solution
Maybe try using the "Worksheet_FollowHyperLink" event procedure code in VBA?

If you right-click on the sheet tab name at the bottom of the sheet, and select "View Code", and paste this VBA code in the resulting VB Editor window:
VBA Code:
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
    ActiveCell.Offset(0, 1) = "Ja"
End Sub
then whenver you click on a hyperlink on that sheet, it will put "Ja" in the column just to the right of that hyperlink.
Ill test this once New Years Eve passed. Have a nice holiday!
 
Upvote 0
Perhaps this idea
Instead of entering text in an adjacent cell, try using VBA to change the cell color after clicking the hyperlink.
Cinema HD V2 APK on Firestick, Nvidia Shield, PC & Android
Thank you very much for the solution.
 
Upvote 0
Maybe try using the "Worksheet_FollowHyperLink" event procedure code in VBA?

If you right-click on the sheet tab name at the bottom of the sheet, and select "View Code", and paste this VBA code in the resulting VB Editor window:
VBA Code:
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
    ActiveCell.Offset(0, 1) = "Ja"
End Sub
then whenver you click on a hyperlink on that sheet, it will put "Ja" in the column just to the right of that hyperlink.
this works, thanks
 
Upvote 0

Forum statistics

Threads
1,223,373
Messages
6,171,698
Members
452,418
Latest member
kennettz

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top