Andrew ha bisogno di visualizzare una finestra di dialogo nella sua macro che consenta a un utente di cambiare finestra. Quando qualcuno visualizza la scheda Visualizza della barra multifunzione e fa clic sullo strumento Cambia Windows, mostra le cartelle di lavoro disponibili a cui l’utente può passare. Questi sono ciò che Andrew deve mostrare nella finestra di dialogo. Si chiede se ci sia una finestra di dialogo incorporata per farlo, o se ha bisogno di crearne una propria.

La risposta breve è che non esiste una finestra di dialogo incorporata per eseguire questa operazione. Tuttavia, puoi facilmente crearne uno tuo. Ecco un semplice esempio:

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

Tutto ciò che fa è creare un elenco dei nomi per ogni finestra nel tuo sistema. Li presenta in un InputBox e quindi passa a qualsiasi finestra selezionata dall’utente.

Se stai cercando modi diversi per presentare le stesse informazioni, puoi fare riferimento a questo suggerimento.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (11911) si applica a Microsoft Excel 2007, 2010, 2013 e 2016.

Puoi trovare una versione di questo suggerimento per la vecchia interfaccia del menu di Excel qui: