Andrew muss in seinem Makro ein Dialogfeld anzeigen, in dem ein Benutzer zwischen Fenstern wechseln kann. Wenn jemand auf das Menü Fenster (in Excel) klickt, werden die verfügbaren Arbeitsmappen unten im Menü aufgelistet. Das muss Andrew im Dialogfeld anzeigen. Er fragt sich, ob es dafür ein eingebautes Dialogfeld gibt oder ob er sein eigenes erstellen muss.

Die kurze Antwort lautet, dass es kein eingebautes Dialogfeld gibt, um diese Aufgabe auszuführen. Sie können jedoch ganz einfach Ihre eigenen erstellen. Hier ist ein einfaches Beispiel:

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

Dazu wird lediglich eine Liste der Namen für jedes Fenster in Ihrem System erstellt. Sie werden in einer Eingabebox angezeigt und wechseln dann zu dem vom Benutzer ausgewählten Fenster.

Wenn Sie nach verschiedenen Möglichkeiten suchen, um dieselben Informationen darzustellen, können Sie siehe diesen Tipp.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (11910) gilt für Microsoft Excel 97, 2000, 2002 und 2003.

Eine Version dieses Tippes für die Multifunktionsleistenoberfläche von Excel (Excel 2007 und höher) finden Sie hier:

Windows in einem Makro wechseln.