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

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

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トレーニングのソースです。

このヒント（11910）は、Microsoft Excel 97、2000、2002、および2003に適用されます。

Excel（Excel 2007以降）のリボンインターフェイスに関するこのヒントのバージョンは、次の場所にあります：

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