【】
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'確認Double Click的儲存格範圍要求
'連結到外部股票資訊網站並開啟指定資訊
If Target.Row > 8 And Target.Column = 8 And Target.Text <> "" Then
ThisWorkbook.FollowHyperlink "https://goodinfo.tw/StockInfo/StockDetail.asp?STOCK_ID=" & Target.Text
Cancel = True
End If
End Sub
相關課程:
章老師的電腦小講堂 https://www.facebook.com/ScenicSchool/
※※ 本區做為經常使用之程式碼複製區,提問請至小講堂唷 ※※