Andrew muss in seinem Makro ein Dialogfeld anzeigen, in dem ein Benutzer zwischen Fenstern wechseln kann. Wenn jemand die Registerkarte Ansicht des Menübands anzeigt und auf das Windows-Tool wechseln klickt, werden die verfügbaren Arbeitsmappen angezeigt, zu denen der Benutzer wechseln kann. 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 zu präsentieren, 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 (11911) gilt für Microsoft Excel 2007, 2010, 2013 und 2016.

Eine Version dieses Tipps für die ältere Menüoberfläche von Excel finden Sie hier:

Windows in einem Makro wechseln.