Come selezionare tutte le celle con formule in un foglio di lavoro?

Se nel tuo foglio di lavoro sono presenti diversi tipi di celle, tra cui formule, testo, numeri e così via, e vuoi selezionare solo le celle con formule nel tuo foglio di lavoro o in una selezione, come puoi risolvere il problema in Excel? Ora ti presenterò alcuni metodi rapidi che possono aiutarti.

Seleziona tutte le celle con formule utilizzando la funzione Vai a

Evidenzia tutte le celle con formule con VBA

Seleziona tutte le celle con formule utilizzando la funzione Vai a

In Excel, puoi utilizzare la funzione Vai a per selezionare rapidamente solo le celle con formule da un foglio di lavoro o da una selezione.

1. Premi contemporaneamente Ctrl + G per aprire la finestra di dialogo Vai a, quindi fai clic sul pulsante Speciale. Vedi screenshot:

2. Seleziona l'opzione Formule, quindi fai clic su OK per chiudere la finestra di dialogo. Vedi screenshot:

Ora tutte le celle con formule sono state selezionate nel foglio di lavoro.

Suggerimento:

1. Se desideri selezionare solo le celle con formule all'interno di una selezione, seleziona prima un intervallo prima di applicare la funzione Vai a.

2. Puoi specificare le opzioni nel passaggio 2 per selezionare il tipo di formule, ad esempio solo le formule con errori.

Evidenzia tutte le celle con formule con VBA

Esiste anche un codice VBA che può evidenziare tutte le celle con formule in un intervallo dell'intero foglio di lavoro.

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

2. Clicca su Modulo > Inserisci per inserire una finestra Modulo e copia il seguente codice VBA nella finestra.

VBA: Evidenzia tutte le celle con formule.

Sub SelectFormulaCells()
'Updateby20140827
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeFormulas, 23)
Application.ScreenUpdating = False
For Each Rng In WorkRng
    Rng.Interior.ColorIndex = 36
Next
Application.ScreenUpdating = True
End Sub

3. Clicca sul pulsante Esegui, apparirà una finestra di dialogo KutoolsforExcel per consentirti di selezionare un intervallo. Vedi screenshot:

4. Clicca su OK. E tutte le celle con formule verranno evidenziate.

Suggerimento: Nel codice VBA sopra, puoi cambiare il numero per regolare il colore di evidenziazione che desideri in Rng.Interior.ColorIndex = 36.