Доброго времени суток. Подскажите пожалуйста, как преобразовать код выше для того, чтобы создать ссылки на разные страницы разных pdf-докуементов с кликом в разных местах на одном листе excel.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

   If Intersect(Target, Range("L:L")) Is Nothing Then Exit Sub
   Dim pShell As Object
   Set pShell = CreateObject("WScript.Shell")
   pShell.Run pShell.RegRead("HKCR\Software\Adobe\Acrobat\Exe\") & " /A page=" & Target.Value & " " & """C:\123.pdf"""
   Cancel = True
   
End Sub

UPD: два дня копался, не мог разобраться, а как только написал сюда сообщение, то допёрло, magic!  
Не ругайтесь, я только на прошлой неделе узнал о макросах.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim pShell As Object
Set pShell = CreateObject("WScript.Shell")
If Not Intersect(Target, Range("K:K")) Is Nothing Then
       
       pShell.Run pShell.RegRead("HKCR\Software\Adobe\Acrobat\Exe\") & " /A page=12" & Target.Value & " " & """E:\документ 1.pdf"""
   Cancel = True
ElseIf Not Intersect(Target, Range("J:J")) Is Nothing Then
   pShell.Run pShell.RegRead("HKCR\Software\Adobe\Acrobat\Exe\") & " /A page=24" & Target.Value & " " & """E:\ документ 2.pdf"""
   Cancel = True
   Else: Exit Sub
End If
End Sub