- -Windows 10でグローバルキーボードショートカットを表示する方法

Windows 10でグローバルキーボードショートカットを表示する方法

よく使うアプリには、おそらく一般的なアクションのキーボードショートカット。たとえば、ブラウザを例にとると、マウスを使用して新しいタブボタンをクリックするよりも、Ctrl + Tを使用して新しいタブを開く可能性が高くなります。キーボードショートカットを使用すると作業が速くなり、どこからでも実行できるいくつかのグローバルショートカットが設定されている可能性があります。一部のアプリは、グローバルキーボードショートカットも有効にします。ただし、グローバルキーボードショートカットを表示する必要がある場合は、簡単な方法はありません。ただし、これらのショートカットの完全なリストを取得するために実行できる小さなスクリプトがあります。
スポイラー警告:下にスクロールして、この記事の最後にあるビデオチュートリアルをご覧ください。

グローバルキーボードショートカットを表示

メモ帳を開き、以下を貼り付けます。 意味のある名前とVBS拡張子を付けて保存します。 [保存]ダイアログで、ファイルの種類をTXTから[すべてのファイル]に変更してください。このスクリプトは、SuperUserユーザーのJack Whiteによって作成されました。

このファイルを編集する必要があります。最初の行で、パスを独自のユーザーフォルダーへのパスに置き換えます。

Const rootdir = "C:Usersfatiw"
Set fso = CreateObject("Scripting.FileSystemObject")
Set wshell = CreateObject("WScript.Shell")
logname="GlobalHotkeys.txt"
Set logfile = fso.CreateTextFile(logname,True)
logfile.Write "Searching for shortcuts with hotkeys" & vbCrLf
recursedirs( fso.GetFolder(rootdir) )
logfile.Write "Done searching" & vbCrLf
logfile.Close
Sub recursedirs(dir)
If trylistdir(dir) Then
For Each subdir In dir.SubFolders
recursedirs subdir
Next
For Each file In dir.Files
extn = fso.GetExtensionName(file.Path)
if LCase(extn) = "lnk" Then
check(file.Path)
end if
Next
End If
End Sub
Function trylistdir(dir)
On Error Resume Next
trylistdir = (dir.SubFolders.Count + dir.Files.Count >= 0)
End Function
Sub check(fname)
Set lnk = wshell.CreateShortcut(fname)
hk = lnk.Hotkey
if (hk<>"") then
logfile.Write fname & " : " & hk & vbCrLf
end if
End Sub

ファイルを保存してから実行します。 スクリプトの実行を通知するGUIは表示されませんが、「GlobalHotkeys.txt」という名前の新しいTXTファイルが、このスクリプトを保存したディレクトリと同じディレクトリに作成されます。すぐに開けないでください。スクリプトが検出した設定済みのキーボードショートカットをスキャンして書き込むことができるように、数分待ちます。

ファイルを開いて、ユーザー用に設定されたグローバルキーボードショートカットを表示します。

Windowsキーボードショートカット

このスクリプトは、Windowsグローバルキーボードをリストしません。ショートカット。たとえば、Win + Aキーボードショートカットはアクションセンターを開きます。このキーボードショートカット、およびWindows 10に付属している他のデフォルトのショートカットは、TXTファイルにリストされません。専用のメディアキー、輝度、音量、Bluetooth、WiFiなどのコントロールも表示されません。

このスクリプトはほとんどのアプリで機能しますが、いくつかの例外があります。

コメント