Ugrás a tartalomra

Hogyan méretezhetem automatikusan a megjegyzésmezőt, hogy illeszkedjen az Excel tartalmához?

Szerző: Xiaoyang Utolsó módosítás: 2020-05-25

Amikor megjegyzéseket szúr be a cellákba, a megjegyzés mező mérete az alapértelmezett. Ha sok tartalmat ír be, akkor a tartalom egy része közvetlenül nem lesz látható. Lehetséges-e automatikusan hozzáadni a megjegyzés mező méretét a tartalmához?

Automatikus méret a megjegyzésmezőbe, hogy a tartalma beleférjen egy munkalapba
Automatikus méretű megjegyzésmező, hogy tartalma egy cellatartományba illeszkedjen
Könnyen automatikusan méretezhető megjegyzésmező, hogy tartalma elférjen az aktív vagy az összes lapon egy csodálatos eszközzel


Automatikus méret a megjegyzésmezőbe, hogy a tartalma beleférjen egy munkalapba

Az Excelben a megjegyzésmezőt manuálisan, egyesével húzhatja a kívánt méretre, de ha számos megjegyzésdobozt kell átméretezni, akkor ez unalmas és időigényes lesz. Ebben az esetben a következő VBA kódot alkalmazhatja.

1. Tartsa lenyomva a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.

2. kettyenés betétlap > Modulok, és illessze be a következő makrót a Modul ablak.

VBA-kód: A munkalap automatikus megjegyzési mezői

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

3. Ezután nyomja meg a gombot F5 kulcs a kód futtatásához, és az aktív munkalap összes megjegyzésmezője át lett méretezve, hogy megfeleljen a tartalmuknak, az alábbi képernyőkép szerint:

doc komment komment automatikus rögzítése

típus: Ez a kód csak az aktuális munkalapon működik, és nem tudja automatikusan átméretezni a hozzáadott új megjegyzési mezőket.


Egy kattintással gyorsan hozzá lehet igazítani a megjegyzés mező méretét a tartalmához az Excelben:

A Automatikus hozzáadás megjegyzés hasznossága Kutools az Excel számára segíthet abban, hogy a megjegyzésdoboz méretét gyorsan hozzá lehessen igazítani a tartalmához egy munkalapon, amint az alábbi bemutató bemutatja. Töltse le és próbálja ki most! (30 napos ingyenes túra)


Automatikus méretű megjegyzésmező, hogy tartalma egy cellatartományba illeszkedjen

Ha egyszerűen meg kell méreteznie egy cellamegjegyzés mezőt, használhatja a következő VBA kódot.

1. Tartsa lenyomva a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.

2. kettyenés betétlap > Modulok, és illessze be a következő makrót a Modul ablak.

VBA-kód: Automatikus méretű megjegyzési mezők egy cellatartományban

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. Ezután nyomja meg a gombot F5 kulcs a kód végrehajtásához, és megjelenik egy felszólító mező, amely emlékezteti Önt egy olyan cellatartomány kiválasztására, amelyet át szeretne méretezni a megjegyzésmezőkben, lásd a képernyőképet:

doc-resize-comment-box3

4. Ezután kattintson OK, a kiválasztott cella megjegyzési mezők automatikusan illeszkednek a megjegyzés tartalmához.

típus: Ez a kód nem képes automatikusan átméretezni a hozzáadott új megjegyzési mezőket.


Automatikus méretű megjegyzésmező, hogy annak tartalma elférjen az aktív vagy az összes munkalapon 

Kipróbálhatja a AutoFit megjegyzés hasznossága Kutools az Excel számára hogy automatikusan átméretezze aMegjegyzõ mezõk lesznek az aktív lapban vagy az összes lap az Excel-ben. Kérjük, tegye a következőket.

Alkalmazás előtt Kutools az Excel számáraKérjük, először töltse le és telepítse.

1. A megjegyzésmezők automatikus átméretezéséhez, hogy azok tartalma megfeleljen az aktív lapra, kattintson a gombra Kutools > Több > AutoFit megjegyzés > Aktív lap.

És ha automatikusan át akarja méretezni az összes megjegyzésmezőt az egész munkafüzetben, kattintson a gombra Kutools > Több > AutoFit megjegyzés > Minden lap. Lásd a képernyőképet:

Ezután az összes megjegyzésmező automatikusan átméretezésre kerül, hogy illeszkedjen a tartalmukhoz. Lásd a képernyőképet:

Megjegyzések:

  • 1. A megjegyzésmezők automatikus átméretezése után, a megjegyzés újbóli szerkesztésekor a megjegyzésmező automatikusan kibővül vagy zsugorodik a tartalommal.
  • 2. A beillesztett új megjegyzésekhez újra engedélyeznie kell ezt az AutoFit comment segédprogramot az új beillesztett megjegyzések mezőjének átméretezéséhez.

  Ha ingyenes (30 napos) próbaverziót szeretne kapni a segédprogramról, kattintson a letöltéshez, majd lépjen a művelet végrehajtására a fenti lépések szerint.


Könnyen automatikus méretű megjegyzési mező, hogy illeszkedjen a tartalmához


Kapcsolódó cikkek:

A legjobb irodai hatékonyságnövelő eszközök

🤖 Kutools AI Aide: Forradalmasítsa az adatelemzést a következők alapján: Intelligens végrehajtás   |  Kód létrehozása  |  Hozzon létre egyéni képleteket  |  Adatok elemzése és diagramok létrehozása  |  A Kutools funkciók meghívása...
Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

Leírás


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
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