Активная ячейка рабочего листа excel это ячейка которая

Активной (выделенной, текущей) ячейкой
называется ячейка рабочего листа, с
которой Вы в данный момент работаете.
Активная ячейка всегда отмечается либо
утолщением линий ее границ, когда она
является единственной выделенной
ячейкой, либо инверсией цвета ее фона,
когда она является одной из нескольких
выделенных ячеек (блока ячеек).

По умолчанию ввод данных и многие другие
операции в программе MS
Excelсвязаны именно с активной ячейкой.

15. Интерфейс программы ms Excel

Программа MS Excelнаряду с другими прикладными программамиMSWindows поддерживает как
«мышиный» так и клавиатурный
интерфейс – совокупность средств
управления работой прикладной программы
и приемов обработки информации. Дело в
том, что иногда для выполнения одних
операций заведомо удобнее использовать
мышь, а для других – клавиатуру. Вследствие
этого, пользователю программыMS
Excelполезно знать особенности
применения и обладать навыками работы
как с тем, так и с другим интерфейсом.
Более того, если на компьютере не
установлена мышка или она, в силу разных
причин, работает ненадежно, то единственным
доступным средством управления работой
программыMS Excelявляется именно клавиатура.

Кроме этого, многообразие способов
выполнения одних и тех же операций,
которые программа MS
Excelпредоставляет в распоряжение
пользователя, позволяет ему самостоятельно
формировать свой собственный стиль
работы с этой программой, исходя из
своих личных предпочтений и первичных
навыков работы с ранее освоенным
программным обеспечением ПК.

Лабораторная работа
№1

«ЗНАКОМСТВО С
ПРОГРАММОЙ MS EXCEL»

1.1. Запуск программы ms Excel

Запустите программу MS
Excel, выполнив команду «Пуск /
Программы / (MicrosoftOffice ) /MicrosoftExcel».

В операционной системе MSWindows ярлык программыMS
Excelможет также находиться на рабочем
столе или в панели быстрого запуска.

1.2. Структура и элементы рабочего окна программы ms Excel

Распахните рабочее окно программы MS
Excelво весь экран дисплея. При
стандартной (исходной) настройке
параметров программыMS
Excelее рабочее окно имеет вид,
представленный на рис. 1.

Рис.
1. Структура и элементы рабочего окна
программы MS Excel.

Ниже приводится краткое описание
элементов графического интерфейса
рабочего окна программы MS
Excel.

1. Кнопки системных меню по управлению
поведением окна программы MS
Excel(верхняя кнопка) и окна с активной
рабочей книгой (нижняя кнопка). Двойной
щелчок по любой из этих кнопок закрывает
соответствующее окно.

2. Строка-заголовок, содержащая имя
программы (Microsoft Excel) и наименование
активной рабочей книги (Book 1). Имя рабочей
книги соответствует имени файла, в
котором она хранится. Каждая вновь
создаваемая книга получает по умолчанию
имя: «Book N», где N – порядковый номер
вновь создаваемой рабочей книги в данном
сеансе работы с программой MS
Excel.

3. Строка главного меню программы MS
Excel.

4. Кнопки управления поведением окна
программы MS Excel(верхняя группа кнопок) и окна с активной
рабочей книгой (нижняя кнопка).

5. Строки с панелями инструментов:
«Стандартная» и «Форматирование».

6. Кнопка выделения (выбора) сразу всех
ячеек текущего листа рабочей книги с
помощью одинарного щелчка мышкой.

7. Поле имени. В этом окне отображается
адрес (имя) активной ячейки или блока
ячеек.

8. Строка формул (в ней отображается
вводимая информация в активную ячейку
и выполняется редактирования ранее
введенной информации).

9. Кнопки управления вводом информации
в активную ячейку. Левая кнопка отменяет
текущий ввод информации, средняя кнопка
подтверждает правильность ввода
информации и правая кнопка служит для
внедрения в ячейку нужной функции с
помощью «Мастера функций».

10. Кнопки с заголовками (именами) столбцов.
Служат для выделения (выбора) сразу всех
ячеек столбца или изменения их размера
по ширине.

11. Маркер горизонтального разбиения
листа на две рабочие области.

12. Кнопки с заголовками (именами) строк.
Служат для выделения (выбора) сразу всех
ячеек строки или изменения их размера
по высоте.

13. Активная (выделенная, текущая) ячейка
(С7) на рабочем листе.

14. Кнопки навигирования по листам рабочей
книги. Крайние кнопки служат для быстрого
перемещения в начало или конец списка
листов, а внутренние – для пошагового
перехода в прямом и обратном направлениях.

15. Ярлыки с наименованиями листов рабочей
книги. Имя активного (текущего) листа
отображается полужирным шрифтом на
светлом фоне.

16. Маркер изменения ширины области
отображения ярлыков листов рабочей
книги.

17. Вертикальная и горизонтальная линейки
прокрутки (протяжки).

18. Маркер вертикального разбиения листа
на две рабочие области.

19. Статусная строка состояния. В ней
выводятся сообщения о режиме работы
программы MS Excel, в
котором она в данный момент находится.

20. Область отображения активизированных
режимов работы программы MS
Excel(ВДЛ – работа в режиме клавиатурного
выделения ячеек; CAPS – режим ввода
прописных букв; NUM – режим ввода чисел
с использованием клавиш малой цифровой
клавиатуры; SCRL – режим остановки
прокрутки листа ЭТ при навигировании
в рабочем окне; OVR – ввод информации в
ячейку в режиме замещения ее содержимого).

ЗАДАНИЕ 1.Не
выполняя никаких щелчков мышкой,
поочередно поместите ее курсор на все
описанные выше элементы рабочего окна
программыMS Excel.

Обратите внимание и запомните, что:

– в процессе такого навигирования
иногда происходит изменение геометрической
формы курсора мышки в зависимости от
того, на какой объект (элемент объекта)
он в данный момент указывает;

– если курсор мышки поместить на любую
из кнопок панелей инструментов и не
перемещать его в течение одной-двух
секунд, то можно получить подсказку о
назначении данной кнопки.

Для чего созданы электронные таблицы?

Электронные таблицы (ЭТ) представляют собой удобный инструмент для автоматизации вычислений. … Решения многих вычислительных задач, которые раньше можно было осуществить только с помощью программирования, стало возможным реализовать через математическое моделирование в электронной таблице.

Какие существуют электронные таблицы?

Категория:Электронные таблицы

• Calligra Sheets.
• Gnumeric.
• KCells.
• LibreOffice Calc.
• NeoOffice.
• OpenOffice Calc.
• Siag.

Для чего применяется таблица информатика?

Электронные таблицы (табличные процессоры) – это прикладное программное обеспечение общего назначения, предназначенное для обработки различных данных, представимых в табличной форме. При помощи электронных таблиц можно решать финансовые, экономические, математические и статистические задачи.

Какую ячейку называют активной?

Активной (выделенной, текущей) ячейкой называется ячейка рабочего листа, с которой Вы в данный момент работаете.

Что называется ячейкой и активной ячейкой?

Текущая (активная) ячейка – ячейка электронной таблицы, в которой в данный момент находится курсор. Адрес и содержимое текущей ячейки выводятся в строке ввода электронной таблицы.

Что называют активным листом активной ячейкой?

Клетки и Листы Активная ячейка также называется текущей ячейкой или ячейкой, в которой находится фокус курсора. … Аналогично, активный лист или текущий лист – это лист, содержащий активную ячейку.

Какая ячейка является активной в Excel?

Активная ячейка и ее режимы работы Активной является ячейка, с которой в данный момент может работать (или работает) пользователь, осуществляя ввод или редактирование данных или формул. Адрес активной ячейки отображается в поле имени ячейки (см.

Что называется ячейкой?

Ячейка – это пересечение строки и столбца. … Исходя из строки и столбца, каждой ячейке в Excel присваивается имя, его также называют адрес. Например, C5 – это ячейка, которая находится на пересечении столбца С и строки 5. При выделении ячейки ее адрес отображается в поле Имя.

Что называют ячейкой электронной таблицы?

Ячейка в Excel – это основной элемент электронной таблицы, образованный пересечением столбца и строки. Имя столбца и номер строки, на пересечении которых находится ячейка, задают адрес ячейки и представляют собой координаты, определяющие расположение этой ячейки на листе.

Что понимается в электронной таблице под табличным курсором?

табличный курсор — темный курсор, выделяющий текущую активную ячейку (одну из ячеек каждого рабочего листа); … заголовки столбцов — каждый из 256 столбцов рабочего листа имеет заголовок — букву от A до IV. После столбца Z идет столбец AA, за которым следуют AB, AC и т. д.

Что такое диапазон ячеек в электронной таблице?

Ячейка – элементарный объект электронной таблицы, расположенный на пересечении столбца и строки. … Диапазон ячеек – группа смежных ячеек, которая может состоять из одной ячейки, строки (или ее части), столбца (или его части), а также из совокупности ячеек, охватывающих прямоугольную область таблицы.

Что нумеруется в электронной таблице?

Электронная таблица представляет собой: совокупность нумерованных строк и поименованных буквами латинского алфавита столбцов; … совокупность пронумерованных строк и столбцов; совокупность строк и столбцов, именуемых пользователем произвольным образом.

Как обозначаются столбцы и строки в электронной таблице?

Электронная таблица состоит из столбцов и строк. Заголовки столбцов обозначаются буквами или сочетаниями букв (А, С, АВ и т. п.), заголовки строк — числами (1, 2, 3 и далее). На пересечении столбца и строки находится ячейка, которая имеет индивидуальный адрес.

Что такое адрес ячейки в электронной таблице?

Адресом ячейки любой электронной таблицы является пересечение ее строки и столбца, а сама ссылка на него состоит из индексов строки и столбца.

Что в электронных таблицах нельзя удалить?

В электронной таблице невозможно удалить: 1) строку; 2)столбец; 3) содержимое ячейки;4) имя ячейки.

Что можно скрыть в электронных таблицах?

Невозможно скрыть отдельные ячейки, но вы можете спрятать содержимое ячейки (содержимое может быть текстом, числом, формулой). Возможно, у вас есть данные, на которые ссылаются другие ячейки и которые не хочется показывать. Чтобы скрыть содержимое ячейки, выберите ячейку (или диапазон ячеек), которую нужно скрыть.

Что можно удалить в электронной таблице?

В электронных таблицах Microsoft Excel можно удалить строку, столбец и конечно же содержимое! Но вот имя ячейки удалить полностью нельзя. Однако имя ячейки можно переименовать в поле Имя!

Для чего используется функция сумм?

Функция СУММ — это одна из математических и тригонометрических функций. Возвращает результат сложения всех чисел в выбранном диапазоне ячеек. где список_аргументов — это ряд числовых значений, введенных вручную или находящихся в ячейках, на которые дается ссылка.

Как использовать функцию сумм?

Использование функции СУММ для суммирования чисел в диапазоне

1. Введите в ячейку =СУММ, а затем открываю скобки (.
2. Чтобы ввести первый диапазон формул, который называется аргументом (частью данных, которую нужно выполнить), введите A2:A4 (или выберите ячейку A2 и перетащите ее через ячейку A6).

Какому типу относится функция сумм?

Функция СУММ относится к категории: «Математические». Нажмите комбинацию горячих клавиш SHIFT+F3 для вызова мастера функций, и вы быстро ее там найдете. Использование этой функции существенно расширяет возможности процесса суммирования значений ячеек в программе Excel.

Как суммировать определенные ячейки в Excel?

=СУММЕСЛИМН(D2:D11, Другими словами, вы хотите, чтобы формула суммировала числа в этом столбце, если они соответствуют определенным условиям. Это диапазон ячеок является первым аргументом в этой формуле — первым элементом данных, который требуется функции в качестве входных данных.

Как посчитать сумму отфильтрованных ячеек?

Способ 2 – Сумма отфильтрованных значений

1. Выделите столбцы с данными и выберите на ленте Данные (Data) – Фильтр (Filter). Я рекомендую выделять именно столбцы, т. …
2. Замените формулу СУММА (SUM) на ПРОМЕЖУТОЧНЫЕ. …
3. Выберите фильтром нужные названия или категорию, если имеется.

Как в Excel посчитать сумму ячеек с определенным текстом?

Чтобы посчитать сумму, если ячейки содержат определенный текст, вы можете использовать функцию СУММЕСЛИ с подстановкой. Эта формула суммирует суммы в столбце D, когда значение в столбце C содержит «футболка». Обратите внимание, что СУММЕСЛИ-это не регистр. Функция СУММЕСЛИ поддерживает подстановочные знаки.

Как суммировать только положительные числа в Экселе?

Как подсчитать / суммировать только положительные или отрицательные числа в Excel?

1. Чтобы подсчитать только положительные значения, введите эту формулу в пустой ячейке. = …
2. Если вы хотите подсчитать количество только отрицательных значений, примените эту формулу = СЧЁТЕСЛИ ($ A $ 1: $ D $ 7, «

Malcolm Gladwell

Мечтатель начинает с чистого листа бумаги и переосмысливает мир

Эта статья содержит полное руководство по использованию Excel
VBA Worksheet в Excel VBA. Если вы хотите узнать, как что-то сделать быстро, ознакомьтесь с кратким руководством к рабочему листу VBA ниже.

Если вы новичок в VBA, то эта статья — отличное место для начала. Мне нравится разбивать вещи на простые термины и объяснять их на простом языке.

Вы можете прочитать статью от начала до конца, так как она написана в логическом порядке. Или, если предпочитаете, вы можете использовать оглавление ниже и перейти непосредственно к теме по вашему выбору.

Краткое руководство к рабочему листу VBA

В следующей таблице приведен краткий обзор различных методов
Worksheet .

Примечание. Я использую Worksheet в таблице ниже, не указывая рабочую книгу, т.е. Worksheets, а не ThisWorkbook.Worksheets, wk.Worksheets и т.д. Это сделано для того, чтобы примеры были понятными и удобными для чтения. Вы должны всегда указывать рабочую книгу при использовании Worksheets . В противном случае активная рабочая книга будет использоваться по умолчанию.

Вступление

Три наиболее важных элемента VBA — это Рабочая книга, Рабочий лист и Ячейки. Из всего кода, который вы пишете, 90% будут включать один или все из них.

Наиболее распространенное использование Worksheet в VBA для доступа к его ячейкам. Вы можете использовать его для защиты, скрытия, добавления, перемещения или копирования листа.

Тем не менее, вы будете в основном использовать его для выполнения некоторых действий с одной или несколькими ячейками на листе.

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

Доступ к рабочему листу

В VBA каждая рабочая книга имеет коллекцию рабочих листов. В этой коллекции есть запись для каждого рабочего листа. Эта коллекция называется просто Worksheets и используется очень похоже на коллекцию Workbooks. Чтобы получить доступ к рабочему листу, достаточно указать имя.

Приведенный ниже код записывает «Привет Мир» в ячейках A1 на листах: Лист1, Лист2 и Лист3 текущей рабочей книги.

Sub ZapisVYacheiku1()

    ' Запись в ячейку А1 в листе 1, листе 2 и листе 3
    ThisWorkbook.Worksheets("Лист1").Range("A1") = "Привет Мир"
    ThisWorkbook.Worksheets("Лист2").Range("A1") = "Привет Мир"
    ThisWorkbook.Worksheets("Лист3").Range("A1") = "Привет Мир"

End Sub

Коллекция Worksheets всегда принадлежит книге. Если мы не
указываем рабочую книгу, то активная рабочая книга используется по умолчанию.

Sub ZapisVYacheiku1()

    ' Worksheets относятся к рабочим листам в активной рабочей книге.
    Worksheets("Лист1").Range("A1") = "Привет Мир"
    Worksheets("Лист2").Range("A1") = "Привет Мир"
    Worksheets("Лист3").Range("A1") = "Привет Мир"

End Sub

Скрыть рабочий лист

В следующих примерах показано, как скрыть и показать лист.

ThisWorkbook.Worksheets("Лист1").Visible = xlSheetHidden

ThisWorkbook.Worksheets("Лист1").Visible = xlSheetVisible

Если вы хотите запретить пользователю доступ к рабочему
листу, вы можете сделать его «очень скрытым». Это означает, что это может быть
сделано видимым только кодом.

' Скрыть от доступа пользователя
ThisWorkbook.Worksheets("Лист1").Visible = xlVeryHidden

' Это единственный способ сделать лист xlVeryHidden видимым
ThisWorkbook.Worksheets("Лист1").Visible = xlSheetVisible

Защитить рабочий лист

Другой пример использования Worksheet — когда вы хотите защитить его.

ThisWorkbook.Worksheets("Лист1").Protect Password:="Мойпароль"

ThisWorkbook.Worksheets("Лист1").Unprotect Password:="Мойпароль"

Индекс вне диапазона

При использовании Worksheets вы можете получить сообщение об
ошибке:

Run-time Error 9 Subscript out of Range

Это означает, что вы пытались получить доступ к рабочему листу, который не существует. Это может произойти по следующим причинам:

1. Имя Worksheet , присвоенное рабочим листам, написано неправильно.
2. Название листа изменилось.
3. Рабочий лист был удален.
4. Индекс был большим, например Вы использовали рабочие листы (5), но есть только четыре рабочих листа
5. Используется неправильная рабочая книга, например Workbooks(«book1.xlsx»).Worksheets(«Лист1») вместо
   Workbooks(«book3.xlsx»).Worksheets («Лист1»).

Если у вас остались проблемы, используйте один из циклов из раздела «Циклы по рабочим листам», чтобы напечатать имена всех рабочих листов коллекции.

Использование индекса для доступа к рабочему листу

До сих пор мы использовали имя листа для доступа к листу.
Указатель относится к положению вкладки листа в рабочей книге. Поскольку
положение может быть легко изменено пользователем, не рекомендуется
использовать это.

 В следующем коде показаны примеры использования индекса.

' Использование этого кода является плохой идеей, так как
' позиции листа все время меняются
Sub IspIndList()

    With ThisWorkbook
        ' Самый левый лист
        Debug.Print .Worksheets(1).Name
        ' Третий лист слева
        Debug.Print .Worksheets(3).Name
        ' Самый правый лист
        Debug.Print .Worksheets(.Worksheets.Count).Name
    End With

End Sub

В приведенном выше примере я использовал Debug.Print для печати в Immediate Window. Для просмотра этого окна выберите «Вид» -> «Immediate Window » (Ctrl + G).

Использование кодового имени рабочего листа

Лучший способ получить доступ к рабочему листу —
использовать кодовое имя. Каждый лист имеет имя листа и кодовое имя. Имя листа
— это имя, которое отображается на вкладке листа в Excel.

Изменение имени листа не приводит к изменению кодового имени, что означает, что ссылка на лист по кодовому имени — отличная идея.

Если вы посмотрите в окне свойств VBE, вы увидите оба имени.
На рисунке вы можете видеть, что кодовое имя — это имя вне скобок, а имя листа
— в скобках.

Вы можете изменить как имя листа, так и кодовое имя в окне
свойств листа (см. Изображение ниже).

Если ваш код ссылается на кодовое имя, то пользователь может
изменить имя листа, и это не повлияет на ваш код. В приведенном ниже примере мы
ссылаемся на рабочий лист напрямую, используя кодовое имя.

Sub IspKodImya2()

    ' Используя кодовое имя листа
    Debug.Print CodeName.Name
    CodeName.Range("A1") = 45
    CodeName.Visible = True

End Sub

Это делает код легким для чтения и безопасным от изменения
пользователем имени листа.

Кодовое имя в других книгах

Есть один недостаток использования кодового имени. Он относится только к рабочим листам в рабочей книге, которая содержит код, т.е. ThisWorkbook.

Однако мы можем использовать простую функцию, чтобы найти
кодовое имя листа в другой книге.

Sub ИспЛист()

    Dim sh As Worksheet
    ' Получить рабочий лист под кодовым именем
    Set sh = SheetFromCodeName("CodeName", ThisWorkbook)
    ' Используйте рабочий лист
    Debug.Print sh.Name

End Sub

' Эта функция получает объект листа из кодового имени
Public Function SheetFromCodeName(Name As String, bk As Workbook) As Worksheet

    Dim sh As Worksheet
    For Each sh In bk.Worksheets
        If sh.CodeName = Name Then
           Set SheetFromCodeName = sh
           Exit For
        End If
    Next sh

End Function

Использование приведенного выше кода означает, что если
пользователь изменит имя рабочего листа, то на ваш код это не повлияет.

Существует другой способ получения имени листа внешней
рабочей книги с использованием кодового имени. Вы можете использовать элемент
VBProject этой Рабочей книги.

Вы можете увидеть, как это сделать, в примере ниже. Я включил это, как дополнительную информацию, я бы рекомендовал использовать метод из предыдущего примера, а не этот.

Public Function SheetFromCodeName2(codeName As String _
                             , bk As Workbook) As Worksheet

    ' Получить имя листа из CodeName, используя VBProject
    Dim sheetName As String
    sheetName = bk.VBProject.VBComponents(codeName).Properties("Name")

    ' Используйте имя листа, чтобы получить объект листа
    Set SheetFromCodeName2 = bk.Worksheets(sheetName)

End Function

Резюме кодового имени

Ниже приведено краткое описание использования кодового имени:

1. Кодовое имя рабочего листа может быть
   использовано непосредственно в коде, например. Sheet1.Range
2. Кодовое имя будет по-прежнему работать, если имя
   рабочего листа будет изменено.
3. Кодовое имя может использоваться только для
   листов в той же книге, что и код.
4. Везде, где вы видите ThisWorkbook.Worksheets
   («имя листа»), вы можете заменить его кодовым именем рабочего листа.
5. Вы можете использовать функцию SheetFromCodeName
   сверху, чтобы получить кодовое имя рабочих листов в других рабочих книгах.

 Активный лист

Объект ActiveSheet ссылается на рабочий лист, который в данный момент активен. Вы должны использовать ActiveSheet только в том случае, если у вас есть особая необходимость ссылаться на активный лист.

В противном случае вы должны указать рабочий лист, который
вы используете.

Если вы используете метод листа, такой как Range, и не
упоминаете лист, он по умолчанию будет использовать активный лист.

' Написать в ячейку A1 в активном листе
ActiveSheet.Range("A1") = 99

' Активный лист используется по умолчанию, если лист не используется
Range("A1") = 99

Объявление объекта листа

Объявление объекта листа полезно для того, чтобы сделать ваш
код более понятным и легким для чтения.

В следующем примере показан код для обновления диапазонов
ячеек. Первый Sub не объявляет объект листа. Вторая подпрограмма объявляет
объект листа, и поэтому код намного понятнее.

Sub NeObyavObektList()

    Debug.Print ThisWorkbook.Worksheets("Лист1").Name
    ThisWorkbook.Worksheets("Лист1").Range("A1") = 6
    ThisWorkbook.Worksheets("Лист1").Range("B2:B9").Font.Italic = True
    ThisWorkbook.Worksheets("Лист1").Range("B2:B9").Interior.Color = rgbRed

End Sub

Sub ObyavObektList()

    Dim sht As Worksheet
    Set sht = ThisWorkbook.Worksheets("Лист1")

    sht.Range("A1") = 6
    sht.Range("B2:B9").Font.Italic = True
    sht.Range("B2:B9").Interior.Color = rgbRed

End Sub

Вы также можете использовать ключевое слово With с объектом
листа, как показано в следующем примере.

Sub ObyavObektListWith()

    Dim sht As Worksheet
    Set sht = ThisWorkbook.Worksheets("Лист1")

    With sht
        .Range("A1") = 6
        .Range("B2:B9").Font.Italic = True
        .Range("B2:B9").Interior.Color = rgbRed
    End With

End Sub

Доступ к рабочему листу в двух словах

Из-за множества различных способов доступа к рабочему листу вы можете быть сбитыми с толку. Так что в этом разделе я собираюсь разбить его на простые термины.

1. Если вы хотите использовать тот лист, который активен в данный момент, используйте ActiveSheet.

ActiveSheet.Range("A1") = 55

2. Если лист находится в той же книге, что и код, используйте кодовое имя.

3. Если рабочая таблица находится в другой рабочей книге, сначала получите рабочую книгу, а затем получите рабочую таблицу.

' Получить рабочую книгу
Dim wk As Workbook
Set wk = Workbooks.Open("C:ДокументыСчета.xlsx", ReadOnly:=True)
' Затем получите лист
Dim sh As Worksheet
Set sh = wk.Worksheets("Лист1")

Если вы хотите защитить пользователя от изменения имени листа, используйте функцию SheetFromCodeName из раздела «Имя кода».

' Получить рабочую книгу
Dim wk As Workbook
Set wk = Workbooks.Open("C:ДокументыСчета.xlsx", ReadOnly:=True)

' Затем получите лист
Dim sh As Worksheet
Set sh = SheetFromCodeName("sheetcodename",wk)

Добавить рабочий лист

Примеры в этом разделе показывают, как добавить новую
рабочую таблицу в рабочую книгу. Если вы не предоставите никаких аргументов для
функции Add, то новый
рабочий лист будет помещен перед активным рабочим листом.

Когда вы добавляете рабочий лист, он создается с именем по умолчанию, например «Лист4». Если вы хотите изменить имя, вы можете легко сделать это, используя свойство Name.

В следующем примере добавляется новый рабочий лист и изменяется имя на «Счета». Если лист с именем «Счета» уже существует, вы получите сообщение об ошибке.

Sub DobavitList()

    Dim sht As Worksheet

    ' Добавляет новый лист перед активным листом
    Set sht = ThisWorkbook.Worksheets.Add
    ' Установите название листа
    sht.Name = "Счета"

    ' Добавляет 3 новых листа перед активным листом
    ThisWorkbook.Worksheets.Add Count:=3

End Sub

В предыдущем примере вы добавляете листы по отношению к
активному листу. Вы также можете указать точную позицию для размещения листа.

Для этого вам нужно указать, какой лист новый лист должен
быть вставлен до или после. Следующий код показывает вам, как это сделать.

Sub DobavitListPervPosl()

    Dim shtNew As Worksheet
    Dim shtFirst As Worksheet, shtLast As Worksheet

    With ThisWorkbook

        Set shtFirst = .Worksheets(1)
        Set shtLast = .Worksheets(.Worksheets.Count)

        ' Добавляет новый лист на первую позицию в книге
        Set shtNew = Worksheets.Add(Before:=shtFirst)
        shtNew.Name = "FirstSheet"

        ' Добавляет новый лист к последней позиции в книге
        Set shtNew = Worksheets.Add(After:=shtLast)
        shtNew.Name = "LastSheet"

    End With

End Sub

Удалить рабочий лист

Чтобы удалить лист, просто вызовите Delete.

Dim sh As Worksheet
Set sh = ThisWorkbook.Worksheets("Лист12")
sh.Delete

Excel отобразит предупреждающее сообщение при удалении листа. Если вы хотите скрыть это сообщение, вы можете использовать код ниже:

Application.DisplayAlerts = False
sh.Delete
Application.DisplayAlerts = True

Есть два аспекта, которые нужно учитывать при удалении таблиц.

Если вы попытаетесь получить доступ к рабочему листу после
его удаления, вы получите ошибку «Subscript out of Range», которую мы видели в
разделе «Доступ к рабочему листу».

Dim sh As Worksheet
Set sh = ThisWorkbook.Worksheets("Лист2")
sh.Delete

' Эта строка выдаст «Subscript out of Range», так как «Лист2» не существует
Set sh = ThisWorkbook.Worksheets("Лист2")

Вторая проблема — когда вы назначаете переменную листа. Если вы попытаетесь использовать эту переменную после удаления листа, вы получите ошибку автоматизации, подобную этой:

Run-Time error -21147221080 (800401a8′) Automation Error

Если вы используете кодовое имя рабочего листа, а не
переменную, это приведет к сбою Excel,
а не к ошибке автоматизации.

В следующем примере показано, как происходят ошибки автоматизации.

sh.Delete

' Эта строка выдаст ошибку автоматизации
Debug.Assert sh.Name

Если вы назначите переменную Worksheet действительному рабочему листу, он будет работать нормально.

sh.Delete

' Назначить sh на другой лист
Set sh = Worksheets("Лист3")

' Эта строка будет работать нормально
Debug.Assert sh.Name

Цикл по рабочим листам

Элемент «Worksheets» — это набор рабочих листов, принадлежащих рабочей книге. Вы можете просмотреть каждый лист в коллекции рабочих листов, используя циклы «For Each» или «For».

В следующем примере используется цикл For Each.

Sub CiklForEach()

    ' Записывает «Привет Мир» в ячейку A1 для каждого листа
    Dim sht As Worksheet
    For Each sht In ThisWorkbook.Worksheets
         sht.Range("A1") = "Привет Мир"
    Next sht 

End Sub

В следующем примере используется стандартный цикл For.

Sub CiklFor()
    
    ' Записывает «Привет Мир» в ячейку A1 для каждого листа
    Dim i As Long
    For i = 1 To ThisWorkbook.Worksheets.Count
         ThisWorkbook.Worksheets(i).Range("A1") = "Привет Мир"
    Next sht

End Sub

Вы видели, как получить доступ ко всем открытым рабочим книгам и как получить доступ ко всем рабочим листам в ThisWorkbook. Давайте сделаем еще один шаг вперед — узнаем, как получить доступ ко всем рабочим листам во всех открытых рабочих книгах.

Примечание. Если вы используете код, подобный этому, для записи на листы, то сначала сделайте резервную копию всего, так как в итоге вы можете записать неверные данные на все листы.

Sub NazvVsehStr()

    ' Печатает рабочую книгу и названия листов для
    ' всех листов в открытых рабочих книгах
    Dim wrk As Workbook
    Dim sht As Worksheet
    For Each wrk In Workbooks
        For Each sht In wrk.Worksheets
            Debug.Print wrk.Name + ":" + sht.Name
        Next sht
    Next wrk

End Sub

Использование коллекции листов

Рабочая книга имеет еще одну коллекцию, похожую на Worksheets под названием Sheets. Это иногда путает пользователей. Чтобы понять, в первую очередь, вам нужно знать о типе листа, который является диаграммой.

В Excel есть возможность создать лист, который является диаграммой. Для этого нужно:

1. Создать диаграмму на любом листе.
2. Щелкнуть правой кнопкой мыши на графике и выбрать «Переместить».
3. Выбрать первый вариант «Новый лист» и нажмите «ОК».

Теперь у вас есть рабочая книга, в которой есть типовые листы и лист-диаграмма.

• Коллекция «Worksheets » относится ко всем рабочим листам в рабочей книге. Не включает в себя листы типа диаграммы.
• Коллекция Sheets относится ко всем листам, принадлежащим книге, включая листы типовой диаграммы.

Ниже приведены два примера кода. Первый проходит через все
листы в рабочей книге и печатает название листа и тип листа. Второй пример
делает то же самое с коллекцией Worksheets.

Чтобы опробовать эти примеры, вы должны сначала добавить лист-диаграмму в свою книгу, чтобы увидеть разницу.

Sub KollSheets()

    Dim sht As Variant
    ' Показать название и тип каждого листа
    For Each sht In ThisWorkbook.Sheets
        Debug.Print sht.Name & " is type " & TypeName(sht)
    Next sht

End Sub

Sub KollWorkSheets()

    Dim sht As Variant
    ' Показать название и тип каждого листа
    For Each sht In ThisWorkbook.Worksheets
        Debug.Print sht.Name & " is type " & TypeName(sht)
    Next sht

End Sub

Если у вас нет листов диаграмм, то использование коллекции Sheets — то же самое, что использование коллекции WorkSheets.

Заключение

На этом мы завершаем статью о Worksheet VBA. Я надеюсь, что было полезным.

Три наиболее важных элемента Excel VBA — это рабочие книги, рабочие таблицы, диапазоны и ячейки.

Эти элементы будут использоваться практически во всем, что вы делаете. Понимание их сделает вашу жизнь намного проще и сделает изучение VBA увлекательнее.

Активная ячейка

В программах электронных таблиц, таких как Excel или Google Spreadsheets, активная ячейка идентифицируется цветной рамкой или контуром, окружающим ячейку. Активная ячейка всегда находится в активном листе.

Клетки и листы

Активная ячейка также известна как текущая ячейка или ячейку, которая удерживает фокус курсора. Даже если вы выбрали несколько ячеек, только один обычно имеет фокус, который по умолчанию выбирается для приема ввода. Например, данные, введенные с клавиатуры или вставленные из буфера обмена, отправляются в ячейку с фокусом. Исключением является то, что формула массива вводится одновременно в несколько ячеек.

Аналогично, активный лист или текущий лист это рабочий лист, содержащий активную ячейку. Как и активная ячейка, активный лист считается сосредоточиться, когда дело доходит до выполнение действий, которые влияют на одну или несколько ячеек — например, форматирование, — и изменения происходят по активному листу по умолчанию.

Активную ячейку и лист можно легко изменить. В случае с активной ячейкой либо нажатие на другую ячейку указателем мыши, либо нажатие клавиш со стрелками на клавиатуре приведет к выбору новой активной ячейки.

Измените активный лист, щелкнув на другой вкладке с помощью указателя мыши или с помощью сочетания клавиш.

Активная ячейка и поле имени

Ссылка на ячейку для активной ячейки отображается в поле имени, расположенном над столбцом A на листе. Если активной ячейке присвоено имя, либо самостоятельно, либо как часть диапазона ячеек, вместо этого имя диапазона отображается в поле «Имя».

Изменение активной ячейки в группе выделенных ячеек

Если выбрана группа или диапазон ячеек, активная ячейка может быть изменена без повторного выбора диапазона с использованием следующих клавиш на клавиатуре:

• Войти: перемещает выделение активной ячейки на одну ячейку в пределах выбранного диапазона
• сдвиг + Войти: перемещает активную ячейку, выделяя одну ячейку в пределах выбранного диапазона
• табуляция: перемещает активную ячейку на одну ячейку вправо в пределах выбранного диапазона
• сдвиг + Войти: перемещает активную ячейку на одну ячейку влево в пределах выбранного диапазона
• Ctrl + . (период): перемещает активную ячейку по часовой стрелке в следующий угол выбранного диапазона

Перемещение активной ячейки в другую группу выбранных ячеек

Если на одном и том же рабочем листе выделено несколько групп или диапазон несмежных ячеек, подсветка активной ячейки может перемещаться между этими группами выбранных ячеек, используя следующие клавиши на клавиатуре:

• Ctrl+ Alt + Правая стрелка: перемещает выделение активной ячейки в следующий несмежный диапазон справа от текущего местоположения
• Ctrl+ Alt + Стрелка влево: перемещает выделение активной ячейки в следующий несмежный диапазон слева от текущего местоположения

Выбор нескольких листов и активного листа

Несмотря на то, что одновременно можно выбрать или выделить более одного листа, только активное имя листа выделено жирным шрифтом, и большинство изменений, сделанных при выборе нескольких листов, по-прежнему будут влиять только на активный лист.

Изменение активного листа с помощью клавиш быстрого доступа

Измените активный лист, щелкнув вкладку другого листа указателем мыши или используйте сочетания клавиш:

В Excel

• Перемещение на лист влево:Ctrl + вверх на страницу
• Перемещение к листу вправо:Ctrl + вниз на страницу

В электронных таблицах Google

• Перемещение на лист влево:Ctrl + сдвиг + вверх на страницу
• Перемещение к листу вправо:Ctrl + сдвиг + вниз на страницу