即効テクニック |
サンプルマクロは、セルに入力されたファイルをダブルクリックすることで開きます。シートのコードウインドに記述してください。
Private Sub Worksheet_BeforeDoubleClick _
(ByVal Target As Range, Cancel As Boolean)
'セルに入力されているファイルが存在するフォルダ
Const myDir As String = "C:\"
ChDrive myDir
ChDir myDir
On Error Resume Next
Workbooks.Open Target.Value
Cancel = True
End Sub