Hi All,

The script below works by adding a hyperlink with a custom screentip on-the-fly. However, the custom screentip only displays on the 1st hyperlinked cell.

- Does anyone know how to get the "custom" screentip to show on "EACH" hyperlink being created, on-the-fly?
or if that's not possible, does anyone know how to update "EVERY" hyperlink with custom screentip on-the-fly (instead of just the 1st)

Private Sub Worksheet_Change(ByVal Target As Range)
    
  On Error Resume Next
  If Not Target.Value = "" And Not Target.Row = 1 And Not Target.Row = 2 Then
    If Target.Value >= 1 And Target.Value <= 9999 Then
      Application.EnableEvents = False
      Hyperlinks.Add Target, Address:="http://www.internalsite.com/value?" & Target.Value
      Hyperlinks.ScreenTip = "Click to load item #" & Target.Value & vbLf & "Hold down mouse button 2-Seconds to Edit"
      Application.EnableEvents = True
    End If
  
  End If

EndSub
ps: This is using Excel 2007. Thanks so much, JMC