Přejít k hlavnímu obsahu

Jak zobrazit výšku řádku nebo šířku sloupce v buňkách?

V některých případech možná budete chtít znát výšku každého řádku nebo šířku každého sloupce v listu. Používáte stále výšku řádku nebo šířku sloupce ke kontrole výšky řádku nebo šířky sloupce jednu buňku po druhé? Dnes vám představím několik triků, jak se s tímto úkolem rychle vypořádat.

Zobrazte každou výšku řádku v buňkách pomocí Definovat název

Zobrazte každou výšku řádku v buňkách pomocí funkce definované uživatelem

Zobrazte každou šířku sloupce v buňkách pomocí funkce definované uživatelem


šipka modrá pravá bublina Zobrazte každou výšku řádku v buňkách pomocí Definovat název

V aplikaci Excel můžeme vytvořit název rozsahu a poté použít jeho odpovídající vzorec. Proveďte prosím následující kroky:

1. Aktivujte list, ze kterého chcete získat výšku řádku a šířku sloupce.

2, klikněte Vzorce > Definujte jméno, viz screenshot:

doc-řádku výškově 1

3. Potom v dialogovém okně Nový název zadejte svůj definovaný název do textového pole Název a poté zadejte tento vzorec = get.cell (17, a1) do pole Odkazuje na, viz screenshot:

doc-řádku výškově 1

4. A poté kliknutím na tlačítko OK zavřete toto dialogové okno, nyní v prázdné buňce, zadejte tento vzorec = výška řádku, viz screenshot:

doc-řádku výškově 1

5. Poté přetáhněte úchyt výplně dolů do buněk rozsahu, pro které chcete zjistit výšku řádku, a každá výška řádku byla vyplněna do vašich buněk.

doc-řádku výškově 1


šipka modrá pravá bublina Zobrazte každou výšku řádku v buňkách pomocí funkce definované uživatelem

Pokud vás kód zajímá, můžete také vytvořit funkci definovanou uživatelem a získat výšku řádku každého řádku.

1. Podržte Alt + F11 klíče v aplikaci Excel a otevře Okno Microsoft Visual Basic pro aplikace.

2, klikněte Vložit > Modula vložte následující makro do souboru Okno modulu.

Kód VBA: zobrazení výšky každého řádku v buňkách

Function RowHeight(MR As Range) As Double
Application.Volatile
RowHeight = MR.RowHeight
End Function

3. Poté tento kód uložte a zavřete, vraťte se do svého listu a zadejte tento vzorec = RowHeight (A1) do libovolné prázdné buňky prvního řádku, pak přetáhněte úchyt výplně dolů do buněk rozsahu, ve kterých chcete zobrazit výšku řádku každého řádku.


šipka modrá pravá bublina Zobrazte každou šířku sloupce v buňkách pomocí funkce definované uživatelem

Chcete-li získat šířku sloupce každého sloupce, můžete také použít funkci definovanou uživatelem.

1. Podržte Alt + F11 klíče v aplikaci Excel a otevře Okno Microsoft Visual Basic pro aplikace.

2, klikněte Vložit > Modula vložte následující makro do souboru Okno modulu.

Kód VBA: zobrazí každou šířku sloupce v buňkách

Function ColumnWidth(MR As Range) As Double
 Application.Volatile
 ColumnWidth = MR.ColumnWidth
End Function

3. Poté tento kód uložte a zavřete, vraťte se do svého listu a zadejte tento vzorec = ColumnWidth (A1) do libovolné prázdné buňky prvního sloupce, potom přetáhněte úchyt výplně doprava do buněk rozsahu, ve kterých chcete zobrazit šířku sloupce každého sloupce, a v buňce získáte relativní šířku sloupce. Zobrazit snímky obrazovky:

doc-řádku výškově 5
-1
doc-řádku výškově 6

Související článek:

Jak změnit výšku řádku / šířku sloupce v aplikaci Excel?

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

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
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é dovednosti Excel pomocí Kutools pro Excel a 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...

Popis


Office Tab přináší do Office rozhraní s kartami 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 (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
The column user defined function only works for one column. I edited as below to give the total for multiple columns. The same concept could be applied to the Row UDF.

Function ColumnWidth(MR As Range) As Double
Application.Volatile
Dim c As Range
For Each c In MR
ColumnWidth = c.ColumnWidth + ColumnWidth
Next c
End Function
This comment was minimized by the moderator on the site
C'est un bug Excel : une function n'est recalculée que si une "valeur" d'une des cellules d'entrée change. Or, les valeurs ne changent pas, mais juste la largeur ==> donc pas de recalcul. Même pas avec F9...
Un contournement (pas terrible mais évite de revalider chaque cellule à chaque fois) : mettre par exemple "+aujourdhui()*0" à la fin de la formule qui appelle la function, elle se recaculera dès l'appui sur F9.
This comment was minimized by the moderator on the site
These code options only seem to work "at first." When you then adjust the row height, the value does not update (Excel in Office 365). Any resolution to that? I want to display a value or use conditional formatting based on the calculated row height.
This comment was minimized by the moderator on the site
The Range Name is only working for one cell height and not the others
This comment was minimized by the moderator on the site
this works until you use the custom formula in a new tab. it references the original tab you created the formula in
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations