Přejít k hlavnímu obsahu

Jak automaticky změnit velikost pole pro komentář tak, aby odpovídal jeho obsahu v aplikaci Excel?

Při vkládání komentářů do buněk je výchozí velikost pole pro komentář. Pokud do ní zadáte velké množství obsahu, část obsahu nebude přímo viditelná. Je možné automaticky přizpůsobit velikost pole pro komentář jeho obsahu?

Pole komentáře s automatickou velikostí, aby se jeho obsah vešel do listu
Pole komentáře s automatickou velikostí, aby se jeho obsah vešel do řady buněk
Snadno automaticky upravte velikost pole pro komentář, aby se jeho obsah vešel na aktivní list nebo celý list s úžasným nástrojem


Pole komentáře s automatickou velikostí, aby se jeho obsah vešel do listu

V aplikaci Excel můžete pole pro komentář přetáhnout na velikost vaší potřeby jeden po druhém, ale pokud je třeba změnit velikost polí pro komentář, bude to zdlouhavé a časově náročné. V tomto případě můžete použít následující kód VBA.

1. Podržte stisknuté tlačítko ALT + F11 klíče a otevře se Okno Microsoft Visual Basic pro aplikace.

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

Kód VBA: Automatická velikost polí komentářů v listu

Sub FitComments()
'Updateby20140325
Dim xComment As Comment
For Each xComment In Application.ActiveSheet.Comments
    xComment.Shape.TextFrame.AutoSize = True
Next
End Sub

3. Poté stiskněte F5 klíč ke spuštění tohoto kódu a všechna pole komentářů v aktivním listu byla změněna tak, aby odpovídala jejich obsahu, jak ukazuje následující snímek obrazovky:

doc autosize komentář 1

Tip: Tento kód funguje pouze v aktuálním listu a nemůže automaticky změnit velikost nových polí pro komentář, které přidáte.


Jedním kliknutím rychle přizpůsobíte velikost pole komentáře jeho obsahu automaticky v aplikaci Excel:

Projekt Automatický komentář užitečnost Kutools pro Excel může pomoci rychle přizpůsobit velikost pole komentáře jeho obsahu v listu, jak je ukázáno níže. Stáhněte si a vyzkoušejte to hned! (30denní bezplatná trasa)


Pole komentáře s automatickou velikostí, aby se jeho obsah vešel do řady buněk

Pokud potřebujete automaticky změnit velikost políček pro komentáře k buňkám, můžete použít následující kód VBA.

1. Podržte stisknuté tlačítko ALT + F11 klíče a otevře se Okno Microsoft Visual Basic pro aplikace.

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

Kód VBA: Automatická velikost polí komentářů v řadě buněk

Sub Fitrangecomments()
'Updateby20140325
Dim rng As Range
Dim WorkRng As Range
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each rng In WorkRng
    If Not rng.Comment Is Nothing Then
        rng.Comment.Shape.TextFrame.AutoSize = True
    End If
Next
End Sub

3. Poté stiskněte F5 klíč k provedení tohoto kódu a zobrazí se výzva, aby vám připomněla výběr rozsahu buněk, u kterých chcete změnit velikost polí komentářů, viz screenshot:

doc-size-comment-box3

4. A potom klikněte OK, vaše vybraná pole pro komentář buňky byla automaticky přizpůsobena obsahu komentáře.

Tip: Tento kód nemůže automaticky změnit velikost nových polí pro komentář, které přidáte.


Pole komentáře s automatickou velikostí, aby se vešel jeho obsah na aktivní list nebo na celý list 

Můžete zkusit Automatické přizpůsobení komentáře užitečnost Kutools pro Excel automaticky změnit velikost aVšechna pole s poznámkami na aktivním listu nebo na všech listech v aplikaci Excel. Postupujte prosím následovně.

Před aplikací Kutools pro Excel, Prosím nejprve si jej stáhněte a nainstalujte.

1. Chcete-li automaticky změnit velikost polí komentářů, aby se jejich obsah vešel na aktivní list, klikněte prosím Kutools > Moře > Automatické přizpůsobení komentáře > Aktivní list.

A pokud chcete automaticky změnit velikost všech polí komentářů v celém sešitu, klikněte prosím Kutools > Moře > Automatické přizpůsobení komentáře > Všechny listy. Viz snímek obrazovky:

Poté se automaticky změní velikost všech polí komentářů tak, aby odpovídala jejich obsahu. Viz screenshot:

Poznámky:

  • 1. Po automatické změně velikosti polí komentářů se při opětovné úpravě pole komentář automaticky rozbalí nebo zmenší s obsahem.
  • 2. U nových komentářů, které jste vložili, musíte znovu povolit tento nástroj pro komentáře AutoFit, abyste mohli změnit velikost všech nově vložených polí komentářů.

  Pokud chcete mít bezplatnou (30denní) zkušební verzi tohoto nástroje, kliknutím jej stáhněte, a poté přejděte k použití operace podle výše uvedených kroků.


Snadno automaticky upravte velikost pole pro komentář tak, aby odpovídal jeho obsahu


Související články:

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é 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...

karta kte 201905


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 (19)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi. I've been using an xls spreadsheet for 10+ years. Suddenly, all my note boxes were hugely expanded, showed as a blank note until I edited them. Your solution below worked to resize all of my note boxes to fit contents. But now when I try to resize the note box to add more text, Excel crashes. This is even after I saved as an xlsx file to remove all VB code. Can you help?

Sub FitComments()
'Updateby20140325
Dim xComment As Comment
For Each xComment In Application.ActiveSheet.Comments
xComment.Shape.TextFrame.AutoSize = True
Next
End Sub
This comment was minimized by the moderator on the site
Bom-dia,

Salvou de mais! Após abrir planilha no celular todos os comentários ficaram desajustados no pc.
Tinha mais de 10 mil comentários pra arrumar o tamanho da caixa! Se tivesse pix eu até pagava! Obrigado.
This comment was minimized by the moderator on the site
It doesn't work, the insert module does not show up
This comment was minimized by the moderator on the site
amazing! thank you, the first way works! saved me hours of work!
This comment was minimized by the moderator on the site
I guess Crystal got us off track the question was: Is there a way of making the line from the comment box to the cell darker or fatter? That would be the line surrounding the comment box. TIA DD
This comment was minimized by the moderator on the site
Is there a way of making the line from the comment box to the cell darker or fatter?
This comment was minimized by the moderator on the site
Hi Demondrew,
Sorry can help you for that.
This comment was minimized by the moderator on the site
Thank you so much for sharing this. Really helpful!
This comment was minimized by the moderator on the site
@DENNIE "While the code works it makes the box one line high meaning that large comments disappear off-page somewhere. Could you give the code for fixing the width of each box (to let's say three standard Excel column widths) and auto-adjusting the length of the box to fit the text? Thanks." // Agreed
This comment was minimized by the moderator on the site
Thank you very much. This really saved me from lots of hassles.
This comment was minimized by the moderator on the site
While the code works it makes the box one line high meaning that large comments disappear off-page somewhere. Could you give the code for fixing the width of each box (to let's say three standard Excel column widths) and auto-adjusting the length of the box to fit the text? Thanks.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations