セルをダブルクリックすると、そのセルに記入されたファイルを開く
 サンプルマクロは、セルに入力されたファイルをダブルクリックする
ことで開きます。シートのコードウインドに記述してください。

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

Excel97/2000



戻る


Excel Word Access VBA! モーグ