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

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:

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.

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:

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.

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.

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

Kapcsolódó cikkek:

• Hogyan lehet megváltoztatni az Excel megjegyzésmező alakját?
• Hogyan lehet megváltoztatni az Excel összes cellájának megjegyzésformátumát?
• Hogyan lehet felsorolni az összes megjegyzés egy új munkalapra vagy munkafüzetre az Excelben?
• Hogyan illesszünk be képet vagy képet az Excel megjegyzésébe?

---

A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

• újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
• Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
• Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
• Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
• Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
• Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
• Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
• Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
• Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.

Tovább ... Ingyenes letöltés... Vásárlás... 

---

Az Office fül a füles felületet hozza 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!

Tovább ... Ingyenes letöltés... Vásárlás...