Як встановити ширину стовпця електронної таблиці Excel за допомогою VBA?

Оновлено: серпень 2021 р.; Працює в Excel 365, 2019, 2016.

У сьогоднішньому підручнику з автоматизації Excel ми дізнаємося, як швидко змінити ширину стовпця аркуша за потреби, але програмно за допомогою VBA (Visual Basic для додатків).

Передумови

Щоб написати код VBA, вам, перш за все, потрібно переконатися, що ваша вкладка розробника ввімкнена. Якщо ви не впевнені щодо процедури, не забудьте ознайомитися з нашою детальною процедурою .

  • На комп’ютері Windows відкрийте Microsoft Excel .
  • На головній стрічці натисніть Розробник .
  • Натисніть команду Visual Basic . Це відкриє редактор VBA .
  • У провіднику проектів ліворуч виділіть певний аркуш, в який ви вставите свій код. Крім того, ви можете вставити новий модуль або додати наш код до існуючого модуля VBA.

Як встановити ширину стовпця електронної таблиці Excel за допомогою VBA?

Встановлення ширини одного стовпця

У цьому прикладі ми виберемо один стовпець на активному робочому аркуші та змінимо його відповідно.

  • За допомогою редактора VBA скопіюйте наведений нижче код на свій аркуш або модуль.

Sub Set_Column_Width()

Dim MySheet As Worksheet
Set MySheet = ActiveSheet

' Select one or multiple columns, set your column width as needed

With MySheet.Columns("B")

    .ColumnWidth = 50
End With

End Sub
  • Запустіть свій код, натиснувши F5 або виберіть Виконати >> Виконати підпорядковану чи форму.
  • Збережіть свою роботу, натиснувши Файл >> Зберегти або піктограму Диск.

Змінити ширину діапазону кількох стовпців

У цьому прикладі ми вибираємо діапазон стовпців, а потім змінюємо ширину.

Ви можете застосувати код так само, як описано в попередньому розділі.

Sub Set_Column_Range_Width()

Dim MySheet As Worksheet

Set MySheet = ActiveSheet

' Set your column width as needed
With MySheet.Range("A:F")

    .ColumnWidth = .ColumnWidth * 1.5
End With

End Sub

Наступні кроки

Почати з VBA? Обов'язково перегляньте посібник з основ VBA для Excel .

Залишити коментар

Як виправити помилку «Outlook не може надсилати електронну пошту, але може отримувати»

Як виправити помилку «Outlook не може надсилати електронну пошту, але може отримувати»

Виправте Outlook, коли ви можете отримувати електронну пошту, але не можете її надсилати. Перевірте папку «Вихідні», офлайн-режим, вхід у систему, налаштування SMTP, профілі та зміни в Microsoft 365.

Простий шаблон Excel для двотижневого обліку заробітної плати для невеликих команд: Практичний посібник з налаштування

Простий шаблон Excel для двотижневого обліку заробітної плати для невеликих команд: Практичний посібник з налаштування

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

Простий шаблон презентації для онбордингу нових співробітників: практичний план на 12 слайдів

Простий шаблон презентації для онбордингу нових співробітників: практичний план на 12 слайдів

Створіть просту презентацію для адаптації нових працівників із практичною структурою на 12 слайдів, що охоплює очікування щодо ролі, інструменти, безпеку, політики, техніку безпеки та дії першого тижня.

Як експортувати контакти Salesforce у чистий формат Excel, не зіпсувавши ID та номери телефонів

Як експортувати контакти Salesforce у чистий формат Excel, не зіпсувавши ID та номери телефонів

Чистий експорт контактів Salesforce в Excel: створіть правильний звіт, експортуйте лише деталі у CSV, імпортуйте через Power Query, збережіть ID та провідні нулі, безпечно видаліть дублікати та перевірте результат.

Шаблон тижневого графіка прибирання для друку для хостів Airbnb (Word та PDF)

Шаблон тижневого графіка прибирання для друку для хостів Airbnb (Word та PDF)

Використовуйте цей друкований тижневий графік прибирання для хостів Airbnb, щоб організувати прибирання між гостями, глибоке очищення, поповнення запасів, перевірки безпеки та друк із Word у PDF.

Безкоштовний шаблон органайзера місячного календаря рахунків для Excel: практичне налаштування на 2026 рік

Безкоштовний шаблон органайзера місячного календаря рахунків для Excel: практичне налаштування на 2026 рік

Організуйте місячні рахунки в Excel за допомогою безкоштовного макета календаря платежів, відстеження термінів оплати, формул статусу, полів автоплатежів та практичних порад щодо грошового потоку.

Формули Excel не обчислюються автоматично? Виправте це за 3 прості кроки

Формули Excel не обчислюються автоматично? Виправте це за 3 прості кроки

Виправте формули Excel, які не обчислюються автоматично, за три кроки: увімкніть автоматичне обчислення, виконайте перерахунок і виправте комірки з формулами.

Шаблон трекера витрат для незалежних підрядників у США: що відстежувати у 2026 році

Шаблон трекера витрат для незалежних підрядників у США: що відстежувати у 2026 році

Створіть практичний трекер витрат для фрілансерів у США з категоріями для Schedule C, полями для чеків, відстеженням пробігу та оновленнями правил IRS на 2026 рік.

Найкращі безкоштовні додатки для виставлення рахунків для малих сервісних компаній у США (2026)

Найкращі безкоштовні додатки для виставлення рахунків для малих сервісних компаній у США (2026)

Порівняйте найкращі безкоштовні додатки для виставлення рахунків для сервісних компаній у США у 2026 році, включаючи Zoho Invoice, Wave, Square, PayPal та Invoice Ninja.

Безкоштовний шаблон Excel для обліку витрат і доходів від орендної нерухомості: Посібник для початківців

Безкоштовний шаблон Excel для обліку витрат і доходів від орендної нерухомості: Посібник для початківців

Використовуйте безкоштовний трекер орендної нерухомості в Excel для організації доходів, витрат, об’єктів нерухомості та щомісячного грошового потоку. Дізнайтеся, що записувати, як налаштувати шаблон і яких помилок уникати.