+ Reply to Thread
Results 1 to 5 of 5

Hyperlink Screen Tips in Excel

  1. #1
    Dave
    Guest

    Hyperlink Screen Tips in Excel

    Hi All

    I paste Hyperlinks into Excel, When I paste them, they are highlighted and
    have Screen Tips if your hover the mouse over them. The Screen Tips look
    like Comments you can give a Cell. What I'd like to do is if the Screentip
    hyperlink in column (I) has the word "uk" in it I'd like that Row to turn
    Yellow. Would it be possible so I could press a macro button to search the
    highlighted cells and look for uk and make those rows yellow.

    Thanks in Advance

    Dave



  2. #2
    Dave Peterson
    Guest

    Re: Hyperlink Screen Tips in Excel

    Maybe something like this will get you started.

    Option Explicit
    Sub testme()

    Dim myCell As Range
    Dim myRng As Range

    Set myRng = Selection.Areas(1).Columns(1)

    For Each myCell In myRng.Cells
    myCell.EntireRow.Interior.ColorIndex = xlNone
    If myCell.Hyperlinks.Count > 0 Then
    If LCase(myCell.Hyperlinks(1).ScreenTip) Like "*uk*" Then
    myCell.EntireRow.Interior.ColorIndex = 36
    End If
    End If
    Next myCell

    End Sub



    Dave wrote:
    >
    > Hi All
    >
    > I paste Hyperlinks into Excel, When I paste them, they are highlighted and
    > have Screen Tips if your hover the mouse over them. The Screen Tips look
    > like Comments you can give a Cell. What I'd like to do is if the Screentip
    > hyperlink in column (I) has the word "uk" in it I'd like that Row to turn
    > Yellow. Would it be possible so I could press a macro button to search the
    > highlighted cells and look for uk and make those rows yellow.
    >
    > Thanks in Advance
    >
    > Dave


    --

    Dave Peterson

  3. #3
    Dave
    Guest

    Re: Hyperlink Screen Tips in Excel

    Works fine

    Thanks Dave

    How would I make the highlighted none uk rows colour blue, should of thought
    of this at the time.




    "Dave Peterson" <ec35720@netscapeXSPAM.com> wrote in message
    news:42AADC2B.DBD9EFB6@netscapeXSPAM.com...
    > Maybe something like this will get you started.
    >
    > Option Explicit
    > Sub testme()
    >
    > Dim myCell As Range
    > Dim myRng As Range
    >
    > Set myRng = Selection.Areas(1).Columns(1)
    >
    > For Each myCell In myRng.Cells
    > myCell.EntireRow.Interior.ColorIndex = xlNone
    > If myCell.Hyperlinks.Count > 0 Then
    > If LCase(myCell.Hyperlinks(1).ScreenTip) Like "*uk*" Then
    > myCell.EntireRow.Interior.ColorIndex = 36
    > End If
    > End If
    > Next myCell
    >
    > End Sub
    >
    >
    >
    > Dave wrote:
    >>
    >> Hi All
    >>
    >> I paste Hyperlinks into Excel, When I paste them, they are highlighted
    >> and
    >> have Screen Tips if your hover the mouse over them. The Screen Tips look
    >> like Comments you can give a Cell. What I'd like to do is if the
    >> Screentip
    >> hyperlink in column (I) has the word "uk" in it I'd like that Row to turn
    >> Yellow. Would it be possible so I could press a macro button to search
    >> the
    >> highlighted cells and look for uk and make those rows yellow.
    >>
    >> Thanks in Advance
    >>
    >> Dave

    >
    > --
    >
    > Dave Peterson




  4. #4
    Dave Peterson
    Guest

    Re: Hyperlink Screen Tips in Excel

    Record a macro when you change the fill color of a cell.

    Look at the code and pick out that number.

    Colors can vary for each workbook (if the user/developer change them). But 41
    was a lighter blue on my test workbook.



    Dave wrote:
    >
    > Works fine
    >
    > Thanks Dave
    >
    > How would I make the highlighted none uk rows colour blue, should of thought
    > of this at the time.
    >
    > "Dave Peterson" <ec35720@netscapeXSPAM.com> wrote in message
    > news:42AADC2B.DBD9EFB6@netscapeXSPAM.com...
    > > Maybe something like this will get you started.
    > >
    > > Option Explicit
    > > Sub testme()
    > >
    > > Dim myCell As Range
    > > Dim myRng As Range
    > >
    > > Set myRng = Selection.Areas(1).Columns(1)
    > >
    > > For Each myCell In myRng.Cells
    > > myCell.EntireRow.Interior.ColorIndex = xlNone
    > > If myCell.Hyperlinks.Count > 0 Then
    > > If LCase(myCell.Hyperlinks(1).ScreenTip) Like "*uk*" Then
    > > myCell.EntireRow.Interior.ColorIndex = 36
    > > End If
    > > End If
    > > Next myCell
    > >
    > > End Sub
    > >
    > >
    > >
    > > Dave wrote:
    > >>
    > >> Hi All
    > >>
    > >> I paste Hyperlinks into Excel, When I paste them, they are highlighted
    > >> and
    > >> have Screen Tips if your hover the mouse over them. The Screen Tips look
    > >> like Comments you can give a Cell. What I'd like to do is if the
    > >> Screentip
    > >> hyperlink in column (I) has the word "uk" in it I'd like that Row to turn
    > >> Yellow. Would it be possible so I could press a macro button to search
    > >> the
    > >> highlighted cells and look for uk and make those rows yellow.
    > >>
    > >> Thanks in Advance
    > >>
    > >> Dave

    > >
    > > --
    > >
    > > Dave Peterson


    --

    Dave Peterson

  5. #5
    Dave
    Guest

    Re: Hyperlink Screen Tips in Excel

    ok thanks Dave

    "Dave Peterson" <ec35720@netscapeXSPAM.com> wrote in message
    news:42AB1E8E.75841BFB@netscapeXSPAM.com...
    > Record a macro when you change the fill color of a cell.
    >
    > Look at the code and pick out that number.
    >
    > Colors can vary for each workbook (if the user/developer change them).
    > But 41
    > was a lighter blue on my test workbook.
    >
    >
    >
    > Dave wrote:
    >>
    >> Works fine
    >>
    >> Thanks Dave
    >>
    >> How would I make the highlighted none uk rows colour blue, should of
    >> thought
    >> of this at the time.
    >>
    >> "Dave Peterson" <ec35720@netscapeXSPAM.com> wrote in message
    >> news:42AADC2B.DBD9EFB6@netscapeXSPAM.com...
    >> > Maybe something like this will get you started.
    >> >
    >> > Option Explicit
    >> > Sub testme()
    >> >
    >> > Dim myCell As Range
    >> > Dim myRng As Range
    >> >
    >> > Set myRng = Selection.Areas(1).Columns(1)
    >> >
    >> > For Each myCell In myRng.Cells
    >> > myCell.EntireRow.Interior.ColorIndex = xlNone
    >> > If myCell.Hyperlinks.Count > 0 Then
    >> > If LCase(myCell.Hyperlinks(1).ScreenTip) Like "*uk*" Then
    >> > myCell.EntireRow.Interior.ColorIndex = 36
    >> > End If
    >> > End If
    >> > Next myCell
    >> >
    >> > End Sub
    >> >
    >> >
    >> >
    >> > Dave wrote:
    >> >>
    >> >> Hi All
    >> >>
    >> >> I paste Hyperlinks into Excel, When I paste them, they are highlighted
    >> >> and
    >> >> have Screen Tips if your hover the mouse over them. The Screen Tips
    >> >> look
    >> >> like Comments you can give a Cell. What I'd like to do is if the
    >> >> Screentip
    >> >> hyperlink in column (I) has the word "uk" in it I'd like that Row to
    >> >> turn
    >> >> Yellow. Would it be possible so I could press a macro button to search
    >> >> the
    >> >> highlighted cells and look for uk and make those rows yellow.
    >> >>
    >> >> Thanks in Advance
    >> >>
    >> >> Dave
    >> >
    >> > --
    >> >
    >> > Dave Peterson

    >
    > --
    >
    > Dave Peterson




+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1