Note: The other languages of the website are Google-translated. Back to English
Увійти  \/ 
x
or
x
Реєстрація  \/ 
x

or

Як автоматично встановити розмір поля для коментарів відповідно до його вмісту в Excel?

Коли ви вставляєте коментарі до комірок, розмір поля для коментарів є типовим. Якщо ви введете в нього багато вмісту, частина вмісту не буде видно безпосередньо. Чи можна автоматично підігнати розмір поля для коментарів до його вмісту?

Автоматично розміщувати поле коментарів відповідно до вмісту на аркуші
Автоматично розміщувати поле коментарів, щоб вмістити вміст у діапазон комірок
Легко автоматично розмір вікна коментарів, щоб вмістити його вміст в активний аркуш або весь аркуш за допомогою дивовижного інструменту


Автоматично розміщувати поле коментарів відповідно до вмісту на аркуші

В Excel ви можете перетягнути поле коментарів до потрібного розміру вручну по одному, але якщо потрібно змінити розмір багатьох полів коментарів, цей спосіб буде нудним та трудомістким. У цьому випадку ви можете застосувати такий код VBA.

1. Утримуйте клавішу ALT + F11 і відкриває Вікно Microsoft Visual Basic для програм.

2. клацання Insert > Модуліта вставте наступний макрос у Вікно модуля.

Код VBA: автоматичне розміщення полів для коментарів на аркуші

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

3. Потім натисніть F5 клавішу для запуску цього коду, і всі поля коментарів на активному аркуші змінено відповідно до їх вмісту, як показано на наступному скріншоті:

doc авторозмір коментаря1

Чайові: Цей код працює лише на поточному аркуші, і він не може автоматично змінити розмір нових полів коментарів, які ви додаєте.


Одним клацанням миші, щоб швидко підігнати розмір поля коментарів до його вмісту автоматично в Excel:

повне г, повне г,, показали, від, номер, XNUMX Коментар автозапуску корисність Kutools для Excel може допомогти швидко підігнати розмір поля для коментарів до його вмісту автоматично на робочому аркуші, як показано нижче. Завантажте та спробуйте зараз! (30-денний безкоштовний маршрут)


Автоматично розміщувати поле коментарів, щоб вмістити вміст у діапазон комірок

Якщо вам просто потрібно автоматично встановити розмір діапазону полів для коментарів комірок, ви можете використовувати наступний код VBA.

1. Утримуйте клавішу ALT + F11 і відкриває Вікно Microsoft Visual Basic для програм.

2. клацання Insert > Модуліта вставте наступний макрос у Вікно модуля.

Код VBA: автоматичне розміщення вікна коментарів у діапазоні комірок

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. Потім натисніть F5 клавішу для виконання цього коду, і з'явиться підказка, щоб нагадати вам про вибір діапазону комірок, для яких потрібно змінити розмір полів для коментарів, див. знімок екрана:

doc-resize-comment-box3

4. А потім натисніть OK, вибрані вікна коментарів комірки були автоматично встановлені до вмісту коментаря.

Чайові: Цей код не може автоматично змінити розмір нових полів коментарів, які ви додаєте.


Автоматичне розміщення поля коментарів, щоб вмістити його вміст в активний аркуш або весь аркуш 

Ви можете спробувати Коментар автовідбору корисність Kutools для Excel для автоматичного зміни розміру aПоля для коментарів в активному аркуші або на всіх аркушах Excel. Будь ласка, виконайте наступне.

Перед поданням заявки Kutools для Excel, будь ласка завантажте та встановіть його спочатку.

1. Щоб автоматично змінити розмір вікон коментарів, щоб вмістити їх вміст в активному аркуші, натисніть Кутулс > більше > Коментар автовідбору > Активний аркуш.

А якщо ви хочете автоматично змінити розмір усіх полів для коментарів у всій книзі, натисніть Кутулс > більше > Коментар автовідбору > Всі аркуші. Дивіться знімок екрана:

Потім усі поля для коментарів автоматично змінюються відповідно до їх вмісту. Дивіться знімок екрана:

примітки:

  • 1. Після автоматичного зміни розміру полів для коментарів, при повторному редагуванні коментаря, поле для коментарів автоматично розшириться або зменшиться разом із вмістом.
  • 2. Для нових коментарів, які ви вставили, вам потрібно знову увімкнути цю програму коментарів AutoFit, щоб змінити розмір усіх нових вставлених полів коментарів.

  Якщо ви хочете отримати безкоштовну (30-денну) пробну програму, натисніть, щоб завантажити, а потім перейдіть до застосування операції, як описано вище.


Легко автоматично розмірювати поле коментарів відповідно до його вмісту


Статті по темі:


Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

  • Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Понад 300 потужних функцій. Підтримує Office / Excel 2007-2019 та 365. Підтримує всі мови. Простота розгортання на вашому підприємстві чи в організації. Повна функція 30-денної безкоштовної пробної версії. 60-денна гарантія повернення грошей.
вкладка kte 201905

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Greg · 13 days ago
    It doesn't work, the insert module does not show up
  • To post as a guest, your comment is unpublished.
    al · 3 months ago
    amazing! thank you, the first way works! saved me hours of work!
  • To post as a guest, your comment is unpublished.
    Demondrew · 1 years ago
    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
  • To post as a guest, your comment is unpublished.
    Demondrew · 1 years ago
    Is there a way of making the line from the comment box to the cell darker or fatter?
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Hi Demondrew,
      Sorry can help you for that.
  • To post as a guest, your comment is unpublished.
    Shubham · 2 years ago
    Thank you so much for sharing this. Really helpful!
  • To post as a guest, your comment is unpublished.
    Paul · 4 years ago
    @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
  • To post as a guest, your comment is unpublished.
    R.R. · 4 years ago
    Thank you very much.

    This really saved me from lots of hassles.
  • To post as a guest, your comment is unpublished.
    Dennie · 5 years ago
    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.
  • To post as a guest, your comment is unpublished.
    Smithe636 · 5 years ago
    It is really a nice and helpful piece of info. Im glad that you shared this helpful information with us. Please keep us up to date like this. Thanks for sharing. kdagekebeceddded
  • To post as a guest, your comment is unpublished.
    Joe · 5 years ago
    Good! Solved my issue.
  • To post as a guest, your comment is unpublished.
    Laure · 5 years ago
    "VBA code: Auto-size comment boxes in a worksheet" took care of my spreadsheet's comments. Thanks so much!
  • To post as a guest, your comment is unpublished.
    John · 5 years ago
    I get an error:

    Run-time '1004':
    Method AutoSize of object TextFrame failed
  • To post as a guest, your comment is unpublished.
    Jeremy · 5 years ago
    this didn't work at all. I got a error repeatedly.
  • To post as a guest, your comment is unpublished.
    david · 5 years ago
    It did not work like the first code you sent it only fit the content what i want is something that will make them all the same width and the length will auto fit the content

    as this is how column H looks right now and column A varies in width size

    would like column A to be three columns wide and length to fit content and grow as needed when you hit enter the box length should grow by a line is there a code for that ? note i tried both key cod that page you sent last.
  • To post as a guest, your comment is unpublished.
    Vaibhav · 7 years ago
    Using your code
    1.
    Dim xComment As Comment
    For Each xComment In Application.ActiveSheet.Comments
    xComment.Shape.TextFrame.AutoSize = True
    Next
    2. issue with this error occur 445 object reference
    With Range("A1").Comment.Shape.TextFrame2
    .WordWrap = msoTrue
    .AutoSize = msoAutoSizeTextToFitShape
    End With
  • To post as a guest, your comment is unpublished.
    archa · 7 years ago
    Thanks you. Easy and quick solution for my problem.