Andrewは、ユーザーがウィンドウを切り替えることができるダイアログボックスをマクロに表示する必要があります。誰かがリボンの[表示]タブを表示し、[ウィンドウの切り替え]ツールをクリックすると、ユーザーが切り替えることができる使用可能なブックが表示されます。これらは、アンドリューがダイアログボックスに表示する必要があるものです。彼は、これを行うための組み込みのダイアログボックスがあるのか​​、それとも自分で作成する必要があるのか​​疑問に思います。

簡単に言うと、このタスクを実行するための組み込みのダイアログボックスはありません。ただし、独自のものを簡単に作成できます。簡単な例を次に示します。

Sub SwitchWindows()

Dim i As Integer     Dim n As Integer     Dim s As String     Dim v As Variant

n = Windows.Count     s = "Choose Window from:"

For i = 1 To n         s = s & Chr(10) & i & ")  " & Windows(i).Caption     Next     s = s & Chr(10) & "Enter a number from 1 to " & n     v = Application.InputBox(prompt:=s, Type:=2)

i = Val(v)

If i >= 1 And i <= n Then         Windows(i).Activate     End If End Sub

これは、システムの各ウィンドウの名前のリストを作成するだけです。それらをInputBoxに表示してから、ユーザーが選択したウィンドウに切り替えます。

同じ情報を提示するさまざまな方法を探している場合は、 linkこのヒントを参照できます。

注：

このページ（または_ExcelTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント（11911）は、Microsoft Excel 2007、2010、2013、および2016に適用されます。

Excelの古いメニューインターフェイス用のこのヒントのバージョンは、次の場所にあります：

linkマクロでのウィンドウの切り替え。