Този урок ще покаже как да избирате и да работите с цели редове или колони във VBA.
Първо ще разгледаме как да избираме цели редове и колони, след това ще демонстрираме как да манипулираме редове и колони.
Изберете Цели редове или колони
Изберете Единичен ред
Можете да изберете цял ред с Редове обект като този:
| 1 | Редове (5) .Изберете |
Или можете да използвате EntireRow заедно с Обхват или Клетъчни обекти:
| 1 | Диапазон ("B5"). EntireRow. Изберете |
или
| 1 | Клетки (5,1) .EntireRow.Изберете |
Можете също да използвате Range Object да се позовава конкретно на ред:
| 1 | Обхват ("5: 5"). Изберете |
Изберете Единична колона
Вместо на Редове обект, използвай Обект на колони за да изберете колони. Тук можете да се позовете на колона номер 3:
| 1 | Колони (3). Изберете |
или буква „С“, заобиколена от кавички:
| 1 | Колони ("C"). Изберете |
Вместо EntireRow, използвайте Цяла колона заедно с Обхват или Клетъчни обекти за да изберете цели колони:
| 1 | Диапазон ("C5"). Цяла колона. Изберете |
или
| 1 | Клетки (5,3). Цяла колона. Изберете |
Можете също да използвате Range Object да се позовава конкретно на колона:
| 1 | Обхват ("B: B"). Изберете |
Изберете няколко реда или колони
Избирането на няколко реда или колони работи абсолютно еднакво при използване на EntireRow или EntireColumn:
| 1 | Диапазон ("B5: D10"). EntireRow. Изберете |
или
| 1 | Диапазон ("B5: B10"). Цяла колона. Изберете |
Когато обаче използвате обекти на редове или колони, трябва да въведете номерата на редовете или буквите на колони в кавички:
| 1 | Редове („1: 3“). Изберете |
или
| 1 | Колони ("B: C"). Изберете |
Изберете ActiveCell ред или колона
За да изберете ActiveCell ред или колона, можете да използвате един от тези редове код:
| 1 | ActiveCell.EntireRow.Select |
или
| 1 | ActiveCell.EntireColumn.Select |
Изберете редове и колони в други работни листове
За да изберете редове или колони в други работни листове, първо трябва да изберете работния лист.
| 12 | Листове („Лист2“). ИзберетеРедове (3) .Изберете |
Същото важи и при избора на редове или колони в други работни книги.
| 123 | Работни книги ("Book6.xlsm"). АктивирайтеЛистове („Лист2“). ИзберетеРедове (3) .Изберете |
Забележка: Трябва Активирате желаната работна книга. За разлика от Обект на листове, Обект на работна книга няма a Изберете Метод.
Необходими ли са изборът на редове и колони?
Въпреки това (почти?) Никога не е необходимо да избирате редове или колони. Не е необходимо да избирате ред или колона, за да взаимодействате с тях. Вместо това можете да приложите методи или свойства директно към редовете или колоните. Следващите няколко раздела ще демонстрират различни методи и свойства, които могат да бъдат приложени.
Можете да използвате всеки метод, изброен по -горе, за да се обърнете към редове или колони.
Методи и свойства на редове и колони
Изтриване на цели редове или колони
За да изтриете редове или колони, използвайте Метод за изтриване:
| 1 | Редове („1: 4“). Изтриване |
или:
| 1 | Колони ("A: D"). Изтриване |
Вмъкване на редове или колони
Използвай Метод на вмъкване за да вмъкнете редове или колони:
| 1 | Редове („1: 4“). Вмъкване |
или:
| 1 | Колони ("A: D"). Вмъкване |
Копиране и поставяне на цели редове или колони
Поставете в съществуващ ред или колона
Когато копирате и поставяте цели редове или колони, трябва да решите дали искате да поставите над съществуващ ред / колона или искате да вмъкнете нов ред / колона, за да поставите вашите данни.
Тези първи примери ще копират и поставят над съществуващ ред или колона:
| 1 | Обхват ("1: 1"). Обхват на копиране ("5: 5") |
или
| 1 | Диапазон ("C: C"). Обхват на копиране ("E: E") |
Вмъкване и поставяне
Следващите примери ще бъдат поставени в ново вмъкнат ред или колона.
Това ще копира ред 1 и ще го вмъкне в ред 5, измествайки съществуващите редове надолу:
| 12 | Обхват ("1: 1"). КопиранеОбхват ("5: 5"). Вмъкване |
Това ще копира колона C и ще я вмъкне в колона E, измествайки съществуващите колони надясно:
| 12 | Диапазон ("C: C"). КопиранеОбхват ("E: E"). Вмъкване |
Скриване / показване на редове и колони
За да скриете редове или колони, задайте техните Скрити свойства към Истина. Използвайте False, за да скриете редовете или колоните:
| 12345 | „Скриване на редоветеРедове („2: 3“). EntireRow.Hidden = Вярно„Покажи редоветеРедове („2: 3“). EntireRow.Hidden = False |
или
| 12345 | „Скриване на колониКолони ("B: C"). EntireColumn.Hidden = Вярно„Покажи колониКолони ("B: C"). EntireColumn.Hidden = False |
Групиране / Разгрупиране на редове и колони
Ако искате да групирате редове (или колони), използвайте този код:
| 12345 | „Групови редовеРедове ("3: 5"). Група„Групови колониКолони ("C: D"). Група |
За да премахнете групирането, използвайте този код:
| 12345 | „Разгрупиране на редовеРедове („3: 5“). Разгрупиране„Разгрупиране на колониКолони ("C: D"). Разгрупиране |
Това ще разшири всички „групирани“ контурни нива:
| 1 | ActiveSheet.Outline.ShowLevels RowLevels: = 8, ColumnLevels: = 8 |
и това ще свие всички контурни нива:
| 1 | ActiveSheet.Outline.ShowLevels RowLevels: = 1, ColumnLevels: = 1 |
Задайте височина на реда или ширина на колоната
За да зададете ширина на колоната, използвайте този ред код:
| 1 | Колони ("A: E"). ColumnWidth = 30 |
За да зададете височината на реда, използвайте този ред код:
| 1 | Редове („1: 1“). RowHeight = 30 |
Автоматично регулиране на височината на редовете / ширината на колоната
За да настроите автоматично колона:
| 1 | Колони ("A: B"). Автоматично напасване |
За да настроите автоматично ред:
| 1 | Редове („1: 2“). Автоматично поставяне |
Редове и колони на други работни листове или работни книги
За да взаимодействате с редове и колони в други работни листове, трябва да дефинирате Обект на листове:
| 1 | Листове ("Лист2"). Редове (3). Вмъкване |
По подобен начин, за да взаимодействате с редове и колони в други работни книги, трябва също да дефинирате Обект на работна книга:
| 1 | Работни книги ("book1.xlsm"). Листове ("Sheet2"). Редове (3). Вмъкване |
Вземете активен ред или колона
За да получите активния ред или колона, можете да използвате Ред и Свойства на колоната от ActiveCell обект.
| 1 | MsgBox ActiveCell.Row |
или
| 1 | MsgBox ActiveCell.Column |
Това също работи с Range Object:
| 1 | MsgBox Range ("B3"). Колона |
