- Розмір осередку
- Висота рядка
- приклад 1
- приклад 2
- приклад 3
- приклад 4
- Ширина стовпця
- приклад 1
- приклад 2
- приклад 3
- приклад 4
- автоматичний підбір ширини
Зміна розміру осередку в VBA Excel. Висота рядка, ширина стовпця, автоматичний підбір ширини осередку. Властивості RowHeight і ColumnWidth об'єкта Range.
- Розмір осередку
- Висота рядка
- Ширина стовпця
- автоматичний підбір ширини
Розмір осередку
Розмір осередку по висоті і ширині визначається висотою рядка і шириною стовпця, на перетині яких вона знаходиться. Якщо, в вашому випадку, небажано змінювати розміри всього рядка або всього стовпчика, використовуйте об'єднані осередки потрібної величини.
Зверніть увагу, що висота рядка задається в пунктах, а ширина стовпця в символах, тому їх числові значення не відповідають один одному по фактичному розміру.
Висота рядка і ширина стовпчика в Excel
Програмно, без додаткових макросів, можна змінювати висоту рядка тільки в пунктах, а ширинустовпця тільки в символах.
на сайті підтримки офісних додатків Microsoft так написано про ці величини:
- висота рядка може приймати значення від 0 до 409 пунктів, причому 1 пункт приблизно дорівнює 1/72 дюйма або 0,035 см;
- ширина стовпця може приймати значення від 0 до 255, причому це значення відповідає кількості символів, які можуть бути відображені в осередку.
Висота рядка
Для зміни висоти рядка використовуйте властивість RowHeight об'єкта Range. І не важливо, буде об'єкт Range представляти із себе виділений довільний діапазон, окрему клітинку, цілий рядок або цілий стовпець - висота всіх рядків, що перетинаються з об'єктом Range буде змінена після присвоєння властивості RowHeight цього об'єкта нового значення.
Приклади зміни висоти рядків:
приклад 1
Зміна висоти окремого осередку:
ActiveCell.RowHeight = 10
в результаті, рядок, в якій знаходиться активна осередок, набуває висоту, рівну 10 пунктам.
приклад 2
Зміна висоти рядка:
Rows (3) .RowHeight = 30
в результаті, третій рядок робочого аркуша набуває висоту, рівну 30 пунктам.
приклад 3
Зміна висоти осередків заданого діапазону:
Range ( "A1: D6"). RowHeight = 20
в результаті, кожної з перших шести рядків робочого аркуша буде задана висота, рівна 20 пунктам.
приклад 4
Зміна висоти осередків цілого стовпця:
Columns (5) .RowHeight = 15
в результаті, всіх рядках робочого листа буде призначена висота, рівна 15 пунктам.
Ширина стовпця
Для зміни ширини стовпця використовується властивість ColumnWidth об'єкта Range. Як і у випадку з висотою рядка, не має значення, буде об'єкт Range представляти із себе виділений довільний діапазон, окрему клітинку, цілий рядок або цілий стовпець - ширина всіх стовпців, що перетинаються з об'єктом Range буде змінена після присвоєння властивості ColumnWidth цього об'єкта нового значення.
Приклади зміни ширини стовпців:
приклад 1
Зміна ширини окремої комірки:
ActiveCell.ColumnWidth = 15
в результаті, стовпець, в якому знаходиться активна осередок, набуває ширину, рівну 15 символам.
приклад 2
Зміна ширини стовпця:
Columns (3) .ColumnWidth = 50
в результаті, третій стовпець робочого листа (стовпець «C») набуває ширину, рівну 50 символам.
приклад 3
Зміна ширини осередків заданого діапазону:
Range ( "A1: D6"). ColumnWidth = 25
в результаті, кожному з перших чотирьох стовпців робочого листа буде задана ширина, рівна 25 символам.
приклад 4
Зміна ширини осередків цілої рядки:
Rows (4) .ColumnWidth = 35
в результаті, всіх стовпцях робочого листа буде призначена ширина, рівна 35 символам.
автоматичний підбір ширини
Для автопідбору ширини осередку у відповідність з розміром її вмісту потрібно скористатися наступний код:
'Запишемо для прикладу в будь-яку комірку робочого' листа який-небудь текст, наприклад, такий: Cells (5, 5) = "Автоподбор ширини осередку" 'тепер підгонимо ширину осередку, а точніше' стовпчика, в якому ця комірка знаходиться: Cells ( 5, 5) .EntireColumn.AutoFit
Майте на увазі, що ширина стовпця буде підігнана по розташованої в цьому стовпці осередку з найдовшим вмістом. Наприклад, якщо довжина вмісту комірки Cells (7, 5) буде перевищувати довжину вмісту комірки Cells (5, 5), то автоматичний підбір ширини п'ятого стовпчика відбудеться по вмісту осередку Cells (7, 5), незважаючи на те, що в рядку коду вказана інша комірка.
Як здійснити автоматичний підбір ширини об'єднаної комірки, в якій метод AutoFit не працює, дивіться в наступній статті .
