Hyperlink A Column

[Kentexpress]

Hi All,

I want to try and hyperlink a whole column which links to a single document in a folder, once I've added the information to a spreadsheet, I have come across a spreadsheet which does this. From my snapshot of the sheet, I have different information in the cells of the column but when you click on any of the column cells (even ones which do not have any text in blue) you are directed to the correct document. Each individual column is a single different document and each blue cell of my spreadsheet contains different information contained in the document.

Many thanks!

 

[daverunt]

Not sure if this is what you are after or if I got the wrong end of the stick, but you can open a file when any cell in column A is clicked on.

In this case the location is C:\junk\test.pdf
The code goes in the relevant sheet not a module.

It does throw up a warning about viruses when opening files of other applications. Not sure of an easy way around that.
You can repeat code for different columns.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim ColACells As Range

        LastRow = ActiveSheet.Range("A:A").Rows.Count
 
' ColCells are the cells of column A that will cause the hyperlink to open. In this case any cell.
        Set ColACells = Range("A1:A" & LastRow)
 
        If Not Application.Intersect(ColACells, ActiveSheet.Range(Target.Address)) Is Nothing Then
        
        ActiveWorkbook.FollowHyperlink Address:="file:///C:\junk\test.pdf", NewWindow:=True

        End If
  End Sub