こんにちは、エクセルVB初心者です。.vbs ファイルの試行では、おそらく実際の例が必要になります。（ここで行間隔を機能させようとしています..）
私は.vbsファイルをデスクトップに直接貼り付けて、機能するファイル名拡張子を非表示にする設定を切り替えます。手動で設定した場合と同じように（ファイルの最初のクリックで）デスクトップとエクスプローラーを更新しません（以下を参照）。更新の部分で助けが必要です。
以下を使用した .vbs ファイルの例があります。
手動設定: (非表示拡張機能: デスクトップとエクスプローラーを 1 回無料で更新できます)
エクスプローラー、ツール、オプション、ビュー、チェック ボックス: 既知のファイル タイプの拡張子を非表示にします (その項目はデスクトップと Windows エクスプローラーの両方を自動更新します)。
それをスクリプトに組み込みたいと思います。同じ基本的な考え方: スクリプトをテキスト/.vbs ファイルに変換して、デスクトップでクリックできるようにします (トグルとして、つまり、1 回のクリックでオンになり、次のクリックでオフになります。わかった/動作します)。それに追加して、デスクトップとエクスプローラーの両方と同じ、または同等の更新を生成します。
以下をテキストファイルに貼り付けます（または同じ結果になる同等のもの）：
FileExt = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt"
Set Sh = WScript.CreateObject("WScript.Shell")
St = Sh.RegRead(FileExt)
If St = 1 Then
Sh.RegWrite FileExt, 0, "REG_DWORD"
Else
Sh.RegWrite FileExt, 1, "REG_DWORD"
End If
Sh.SendKeys("{F5}")
テキスト ファイルの名前を .txt ではなく HIDE EXT.vbs に変更し、デスクトップに貼り付けます。
必要なもの：
それに追加する必要があるのは、デスクトップとエクスプローラー ウィンドウの更新です。手動で設定する場合と同じです。ここでの F5 は、最初は機能していないようです。ファイルを2回クリックすると、ビューの「状態」が実際にあるビューの反対側にビューを送信するように機能します。