Kako izbrati vse celice formule na delovnem listu?

Če je na vašem delovnem listu več vrst celic, vključno s formulami, besedilom, številom in tako naprej, in želite na svojem delovnem listu ali izboru izbrati samo celice formule, kako lahko to rešite v Excelu? Zdaj vam predstavljam nekaj hitrih načinov, ki vam lahko naredijo uslugo.

Izberite vse celice formule s funkcijo Pojdi na

Označite vse celice formule z VBA

Izberite vse celice formule s funkcijo Pojdi na

V Excelu lahko s funkcijo Pojdi na hitro izberete celice formule samo na delovnem listu ali v izboru.

1. Pritisnite Ctrl + G skupaj odpreti Pojdi na pogovorno okno in nato kliknite Poseben . Oglejte si posnetek zaslona:

2. Preveri Formule in kliknite OK , da zaprete pogovorno okno. Oglejte si posnetek zaslona:

Zdaj so na delovnem listu izbrane vse celice formule.

Nasvet:

1. Če želite samo izbrati celice formule v izboru, izberite selekcijo, preden se prijavite Pojdi na Funkcija.

2. V koraku 2 lahko določite možnosti, da izberete vrsto formule, na primer samo formulo napake.

Označite vse celice formule z VBA

Obstaja koda VBA, ki lahko označi vse celice formule v območju celotnega delovnega lista.

1. Pritisnite Alt + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. klik Moduli > Vstavi vstaviti a Moduli okno in v okno kopirajte spodnji VBA.

VBA: Označite vse celice 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. klik Run gumb, a KutoolsforExcel odpre se pogovorno okno, da izberete obseg. Oglejte si posnetek zaslona:

4. klik OK. In označene so vse celice formule.

Nasvet: V zgornji kodi VBA lahko spremenite številko, da prilagodite želeno barvo osvetlitve Rng.Interior.ColorIndex = 36.