Přejít k hlavnímu obsahu

Jak rychle nitkový kříž zvýraznit aktivní buňku v aplikaci Excel?

Pokud je v listu více dat sloupců a řádků, zobrazilo se vám při aktivaci buňky, že je zvýrazněn její relativní sloupec a řádek? Například klikněte na F11 a sloupec F a řádek 11 jsou zvýrazněny současně s níže uvedeným zobrazením obrazovky. Zde tento článek představuje rychlé triky, které vám pomohou zaměřit nitkový kříž na aktivní buňku v aplikaci Excel.
zvýraznění křížku doc ​​1

Zvýrazněte aktivní buňku pomocí VBA

Křížkem zvýrazněte aktivní buňku pomocí Kutools for Excel dobrý nápad3


Zvýrazněte aktivní buňku pomocí VBA

V aplikaci Excel neexistuje žádná vestavěná funkce, která by vám pomohla zvýraznit aktivní buňku zaměřovacím křížem, ale zde představuji, že vám VBA může pomoci zvýraznit řádek a sloupec aktivní buňky.

1. lis Alt + F11 klíče k otevření Microsoft Visual Basic pro aplikace okno.

2. Pak v Projekt v podokně poklepejte na list, na který chcete použít tento VBA, a poté zkopírujte a vložte pod kód VBA do pravého skriptu. Viz snímek obrazovky:

Tip: Pokud je podokno Projekt skryté, klikněte na Pohled > Průzkumník projektu in Microsoft Visual Basic pro aplikace okno pro jeho zobrazení.

VBA: Křížek zvýrazní aktivní buňku.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice6/1/2016
    Application.ScreenUpdating = False
    With Target
        .Worksheet.Cells.Interior.ColorIndex = 0
        .EntireRow.Interior.Color = vbYellow
        .EntireColumn.Interior.Color = vbYellow
    End With
    Application.ScreenUpdating = True
End Sub
zvýraznění křížku doc ​​2

3. Poté uložte a zavřete VBA a nyní, když aktivujete buňku, je zvýrazněn její relativní řádek a sloupec.
zvýraznění křížku doc ​​3

Pokud chcete zvýraznit pouze aktivní buňku, můžete použít následující VBA.

VBA: Zvýrazněte aktivní buňku, kterou jste vybrali

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice6/1/2016
    Application.ScreenUpdating = False
    Target.Worksheet.Cells.Interior.ColorIndex = 0
    Target.Interior.Color = vbYellow
    Application.ScreenUpdating = True
End Sub

Poznámka: Ve výše uvedených kódech VBA se ColorIndex může měnit, jak chcete.


Křížkem zvýrazněte aktivní buňku pomocí Kutools for Excel

Pokud nejste obeznámeni s VBA, můžete zkusit použít Kutools for ExcelJe Rozložení pro čtení nástroj pro rychlé zvýraznění aktivní buňky nitkovým křížem.

Kutools for Excel, s více než 300 užitečné funkce, které vám usnadní práci. 

Po instalace zdarma Kutools for Excel, prosím, postupujte takto:

klikněte Kutools > Rozložení pro čtení k povolení Rozložení pro čtení nástroj. Viz snímek obrazovky:
zvýraznění křížku doc ​​4

Poznámka:

1. cvaknutí Kutools > Rozložení pro čtení znovu deaktivovat tento nástroj.

2. cvaknutí Kutools > Rozložení pro čtení > Nastavení rozložení pro čtení k určení tvarů, stylů a barev podle potřeby v souboru Nastavení rozložení pro čtení dialog. Viz screenshot:
zvýraznění křížku doc ​​5

Tip: Tento nástroj se vztahuje na celý sešit.

Nejlepší nástroje pro produktivitu v kanceláři

Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50 + Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své excelentní dovednosti pomocí Kutools for Excela zažijte efektivitu jako nikdy předtím. Kutools for Excel Nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

karta kte 201905


Office Tab Přináší rozhraní s kartami do Office a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi. Can you please help with a VBA Code that doesn't remove the cell formatting or the previous colored cells.
This comment was minimized by the moderator on the site
Hi, the VBA code cannot satisfy your need, I suggest you try Kutools for Excel.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations