Come visualizzare l'intervallo o i valori delle celle selezionati in una finestra di messaggio in Excel?

In alcuni casi, potrebbe essere necessario ricordare l'ambito dell'intervallo selezionato o visualizzare tutti i valori di un intervallo specifico. In questo articolo, scoprirai i metodi per far apparire una finestra di messaggio che mostri il riferimento della cella selezionata o i dettagli dei valori delle celle in Excel.

Finestra di messaggio pop-up per visualizzare un intervallo di celle con codice VBA
Finestra di messaggio pop-up per visualizzare i valori di un intervallo specifico con codice VBA

Finestra di messaggio pop-up per visualizzare un intervallo di celle con codice VBA

Il seguente codice VBA ti aiuta a visualizzare l'ambito dell'intervallo selezionato in una finestra di messaggio pop-up. Procedi come segue.

1. Dopo aver selezionato un intervallo di celle nel foglio di lavoro, premi contemporaneamente i tasti Alt + F11 per aprire la finestra Microsoft Visual Basic for Applications.

2. Nella finestra Microsoft Visual Basic for Applications, clicca su Inserisci > Modulo. Quindi copia e incolla il seguente codice VBA nella finestra del Modulo.

Codice VBA: Finestra di messaggio per visualizzare un intervallo di celle

Sub Test()
    On Error Resume Next
    MsgBox Application.Selection.Address, vbInformation, "Kutools for Excel"
End Sub

3. Premi il tasto F5 per eseguire il codice. Poi appare una finestra di messaggio con l'ambito dell'intervallo delle celle selezionate all'interno.

Finestra di messaggio pop-up per visualizzare i valori di un intervallo specifico con codice VBA

Supponiamo che tu abbia bisogno di una finestra di messaggio per visualizzare tutti i valori delle celle dell'intervallo A1:D13, come mostrato nello screenshot qui sotto. Esegui il seguente codice VBA.

1. Premi simultaneamente i tasti Alt + F11 per aprire la finestra Microsoft Visual Basic for Applications.

2. Nella finestra Microsoft Visual Basic for Applications, clicca su Inserisci > Modulo. Quindi copia e incolla il seguente codice VBA nella finestra del Modulo.

Codice VBA: Finestra di messaggio per visualizzare i valori delle celle selezionate in Excel

Sub message()
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim xStr As String
    Dim xRow As Long
    Dim xCol As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    On Error Resume Next
    For xRow = 1 To xRg.Rows.Count
        For xCol = 1 To xRg.Columns.Count
            xStr = xStr & xRg.Cells(xRow, xCol).Value & vbTab
        Next
        xStr = xStr & vbCrLf
    Next
    MsgBox xStr, vbInformation, "Kutools for Excel"
End Sub

3. Premi il tasto F5 per eseguire il codice, nella finestra di dialogo Kutools per Excel che appare, seleziona l'intervallo di cui vuoi visualizzare i valori delle celle in una finestra di messaggio e poi clicca sul pulsante OK. Vedi screenshot:

Poi otterrai una finestra di messaggio come mostrato nello screenshot sottostante, e tutti i valori delle celle dell'intervallo specificato saranno visualizzati nella finestra di messaggio.

Articoli correlati:

• Come creare un timer per finestra di messaggio per chiudere automaticamente la finestra dopo un certo tempo in Excel?
• Come far apparire una finestra di messaggio quando si fa clic su una certa cella in Excel?
• Come copiare il testo da una finestra di messaggio in Excel?
• Come far apparire una finestra di messaggio all'attivazione/apertura di un foglio di lavoro specifico in Excel?
• Come far apparire una finestra di messaggio se il valore della cella cambia all'interno di un intervallo in Excel?