選択中セルをVSCodeで開くマクロ

動作確認済み
バージョン次第だが、
本来、Ctrl＋Shift＋V ショートカットは「値のみ貼り付け」

' OpenInVSCode Macro
' 起動中のVSCodeでファイルを開く
' Keyboard Shortcut: Ctrl+Shift+V
Sub OpenInVSCode()
    Dim filePath As String
    Dim vscodePath As String

    ' 選択中セルのファイルパスを取得
    filePath = ActiveCell.Value

    ' VSCodeのインストールパス（パスを適宜変更してください）
    vscodePath = "C:\Program Files\Microsoft VS Code\Code.exe"
'    vscodePath = "C:\Users\ユーザー名\AppData\Local\Programs\Microsoft VS Code\Code.exe"

    ' VSCodeを起動してファイルを開く
    Shell """" & vscodePath & """ """ & filePath & """", vbNormalFocus
End Sub

あと、個人用マクロのコメント

'//////////////////////////////////////////////////////////////////////////
'// ■Index■
'// Module1: FontColor, BackColor, SheetColor
'// Module2: AddShape
'// Module3: Image
'// Module4: TextBox
'// Module5: Others
'// Module6: Unpublished Side
'// Module7: Draft
'//////////////////////////////////////////////////////////////////////////

'//////////////////////////////////////////////////////////////////////////
'// ■Keyboard Shortcut Management■
'// 日本語はデフォルトのショートカットコマンド
'// Ctrl＋Shift＋
'// A: InsertArrow
'// B: BackColorLightBlue
'// C: BackColorTransparent
'// D: FontColorDefault
'// E:
'// F: FloatingComment/セルの書式設定
'// G: BackColorGray
'// H:
'// I: InsertRedRectangle
'// J:
'// K: SheetColorKiiro
'// L:
'// M: SheetColorMushoku
'// N:
'// O: BackColorOrange
'// P: フォント設定
'// Q: BackColorYellow
'// R: FontColorRed
'// S: BackColorBeige
'// T: SearchTextInTextBoxes（一部機能未完成）
'// U:
'// V: OpenInVSCode/値のみ貼り付け
'// W: 数式バー開閉
'// X: FontColorBlue
'// Y:
'// Z: ImageSixtyPercent

'// 以下は参考用。Alt＋F8からのショートカット登録ができないので登録しない
'//（登録するなら、おそらくキーダウンイベントを定義）
'// 1: 書式_通貨 1,234
'// 2: 書式_上のセル値をコピー
'// 3: 書式_日付
'// 4: 書式_通貨 \1,234
'// 5: 書式_パーセンテージ
'// 6: 罫線_外枠
'// 7:
'// 8:
'// 9: セルの高さ？不明
'// 0:
'// @: 表示拡大？
'// [: 
'// ;: 挿入
'// :: 表示範囲を全選択
'// ]: 
'// ,: 
'// .: 
'// /:
'// \: 罫線_線なし
'//////////////////////////////////////////////////////////////////////////