Note: The other languages of the website are Google-translated. Back to English

Cum să evidențiați toate celulele la care face referire o formulă în Excel?

Acest articol vorbește despre evidențierea tuturor celulelor la care se face referire printr-o formulă în Excel. Vă rugăm să urmați cele două metode de mai jos pentru a o face.

Evidențiați toate celulele la care se face referire printr-o formulă cu tasta de comandă rapidă
Evidențiați toate celulele la care se face referire printr-o formulă cu cod VBA


Evidențiați toate celulele la care se face referire printr-o formulă cu tasta de comandă rapidă

Această secțiune vă va recomanda să utilizați tasta de comandă rapidă pentru a selecta toate celulele la care se face referire printr-o formulă, apoi să completați manual culoarea acestora.

1. Să presupunem că E1 este o celulă formulă și trebuie să evidențiați toate celulele la care a făcut referire. Selectați formula celulă E1, apoi apăsați Ctrl + [ (tastele deschise-paranteză) simultan.

2. Acum sunt selectate celulele la care se face referire prin această formulă, vă rugăm să specificați o culoare de umplere pentru a le evidenția. Vedeți captura de ecran:


Evidențiați toate celulele la care se face referire printr-o formulă cu cod VBA

De asemenea, puteți rula codul VBA pentru a evidenția toate celulele la care a făcut referire o formulă în Excel.

1. presa Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastra, faceți clic pe Insera > Module. Apoi copiați și lipiți codul VBA de mai jos în fereastra Module.

Cod VBA: evidențiați toate celulele la care face referire o formulă în Excel

Sub HighlightCellsReferenced()
    Dim rowCnt As Integer
    Dim i As Integer, j As Integer, strleng As Integer
    Dim strTxt As String, strFml As String
    Dim columnStr, cellsAddress As String
    Dim xRg As Range, yRg As Range
    On Error Resume Next
    Set xRg = Application.InputBox(Prompt:="Please select formula cell(s)...", _
    Title:="Kutools For Excel", Type:=8)
    
    strTxt = ""
    Application.ScreenUpdating = False
    For Each yRg In xRg
        If yRg.Value <> "" Then
            strFml = yRg.Formula + " "
            strFml = Replace(strFml, "(", " ")
            strFml = Replace(strFml, ")", " ")
            strFml = Replace(strFml, "-", " ")
            strFml = Replace(strFml, "+", " ")
            strFml = Replace(strFml, "*", " ")
            strFml = Replace(strFml, "/", " ")
            strFml = Replace(strFml, "=", " ")
            strFml = Replace(strFml, ",", " ")
            strFml = Replace(strFml, ":", " ")
              
            For j = 1 To Len(strFml)
                If Mid(strFml, j, 1) <> " " Then
                    cellsAddress = cellsAddress + Mid(strFml, j, 1)
                Else
                    On Error Resume Next
                    Range(cellsAddress).Interior.ColorIndex = 3
                    cellsAddress = ""
                End If
            Next
        End If
    Next yRg
    Application.ScreenUpdating = True
End Sub

3. apasă pe F5 tasta pentru a rula codul. În pop-up Kutools pentru Excel casetă de dialog, vă rugăm să selectați o celulă de formulă sau mai multe celule de formulă pe care trebuie să evidențiați celulele de referință bazate pe, apoi faceți clic pe OK buton. Vedeți captura de ecran:

Acum, toate celulele la care se face referire, bazate pe celula (celulele) formulei selectate, sunt evidențiate în roșu imediat, așa cum este prezentat mai jos.


Articole pe aceeași temă:


Cele mai bune instrumente de productivitate Office

Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%

  • reutilizarea: Introduceți rapid formule complexe, diagrame și orice ai folosit anterior; Criptați celulele cu parola; Creați o listă de corespondență și trimiteți e-mailuri ...
  • Super Formula Bar (editați cu ușurință mai multe linii de text și formulă); Layout de citire (citiți și editați cu ușurință un număr mare de celule); Lipiți la interval filtrat...
  • Merge celule / rânduri / coloane fără a pierde date; Conținut de celule divizate; Combinați rânduri / coloane duplicate... Prevenirea celulelor duplicate; Comparați gamele...
  • Selectați Duplicat sau Unic Rânduri; Selectați Rânduri goale (toate celulele sunt goale); Super Find și Fuzzy Find în multe cărți de lucru; Selectare aleatorie ...
  • Copie exactă Mai multe celule fără modificarea referinței formulelor; Creați automat referințe la foi multiple; Introduceți gloanțe, Casete de selectare și multe altele ...
  • Extrageți textul, Adăugați text, eliminați după poziție, Eliminați spațiul; Creați și imprimați subtotaluri de paginare; Convertiți conținutul dintre celule și comentarii...
  • Super Filtru (salvați și aplicați scheme de filtrare altor foi); Sortare avansată după lună / săptămână / zi, frecvență și multe altele; Filtru special cu bold, italic ...
  • Combinați cărți de lucru și foi de lucru; Merge Tables pe baza coloanelor cheie; Împărțiți datele în mai multe foi; Conversia în loturi xls, xlsx și PDF...
  • Peste 300 de funcții puternice. Suportă Office / Excel 2007-2021 și 365. Acceptă toate limbile. Implementare ușoară în întreprinderea sau organizația dvs. Funcții complete Probă gratuită de 30 de zile. Garanție de returnare a banilor de 60 de zile.
fila kte 201905

Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
fundul officetab
Comentarii (5)
Încă nu există evaluări. Fii primul care evaluează!
Acest comentariu a fost redus la minimum de moderatorul de pe site
Chiar mi-a placut! Dar un singur lucru -- colonul ar trebui să fie îngrijit separat, deoarece se referă la un interval.
Acest comentariu a fost redus la minimum de moderatorul de pe site
Asta a fost cu adevărat util. O întrebare în plus. Ar putea cineva să-mi spună cum să ajustez codul, astfel încât NUMAI celulele goale de referință să fie evidențiate și nu toate?
Acest comentariu a fost redus la minimum de moderatorul de pe site
Asta a fost cu adevărat util. O întrebare în plus. Ar putea cineva să-mi spună cum să ajustez codul, astfel încât NUMAI celulele goale de referință să fie evidențiate și nu toate?
Acest comentariu a fost redus la minimum de moderatorul de pe site
Vă mulțumim, dar putem obține și celulele la care se face referire dintr-o altă foaie de lucru evidențiate?
Acest comentariu a fost redus la minimum de moderatorul de pe site
Pare a fi o problemă atunci când faceți referire la o serie de celule.
Nu există comentarii postate aici încă
Lăsa comentarii
Postare ca invitat
×
Evaluează această postare:
0   Caractere
Locații sugerate

Urmărește-ne

Copyright © 2009 - www.extendoffice.com. | Toate drepturile rezervate. Cu sprijinul ExtendOffice. | Harta site-ului
Microsoft și sigla Office sunt mărci comerciale sau mărci comerciale înregistrate ale Microsoft Corporation în Statele Unite și / sau în alte țări.
Protejat de Sectigo SSL