How do i insert hyperlink so that users would not have to quot;press ctrl clickquot;
but rather just click to get to the desire folder or file?
oro ago
right click on sheet tabgt;view codegt;left window select worksheetgt;right window
select double_click
Sample
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
Application.DisplayAlerts = False
Dim WantedSheet As String
WantedSheet = Trim(ActiveCell.Value)
If WantedSheet = quot;quot; Then Exit Sub
On Error Resume Next
If Sheets(ActiveCell.Value) Is Nothing Then
Else
Sheets(ActiveCell.Value).Select
End If
Application.DisplayAlerts = True
End Sub
--
Don Guillett
SalesAid Software
quot;bimseunquot; gt; wrote in message
...
gt; How do i insert hyperlink so that users would not have to quot;press ctrl
gt; clickquot;
gt; but rather just click to get to the desire folder or file?
gt; oro ago
- Aug 14 Mon 2006 20:08
Hyperlink
close
全站熱搜
留言列表
發表留言