
- •1.Создание макросов путем записи последовательности действий
- •1.1Запись действий для создания макроса
- •1.2Редактирование макроса
- •1.3Адресация в макросах: абсолютная и относительная
- •1.4Назначение макроса кнопке панели инструментов
- •2.Как работает vba
- •Свойства объекта Application
- •3.Структура программы
- •4.Условные обозначения
- •5.Типы данных
- •6.Объявление переменных
- •Неявное объявление переменных
- •Инициализация по умолчанию
- •7.Константы
- •8.Структурированные типы данных
- •8.1Массив
- •8.2Перечисляемый тип
- •8.3Запись
- •9.Операторы
- •9.1Операторы присваивания
- •Оператор Let
- •Оператор lSet
- •Оператор rSet
- •9.2Условные операторы
- •Оператор If…Then…Else
- •Оператор выбора Select Case
- •Функция iIf
- •9.3Оператор безусловного перехода GoTo
- •9.4Операторы цикла
- •10.Диалоговые окна
- •10.1Функция InputBox
- •10.2Функция MsgBox
- •11.Объявление процедур и функций
- •11.1Объявление процедур
- •11.2Объявление функций
- •11.3Аргументы процедур и функций
- •12.Встроенные функции
- •12.1Математические функции
- •12.2Функции обработки строк
- •12.3Функции времени и даты
- •12.4Функции преобразования типов
- •Дополнительные функции
- •12.5Преобразование форматов
- •12.6Функции работы с цветом
- •12.7Функции проверки типов
- •13.Объекты ms Excel
- •13.1Объект Application Свойства объекта
- •13.2Объект Workbook и семейство Workbooks Свойства объекта
- •Методы объекта
- •События объекта
- •13.3Объект Worksheet и семейство Worksheets Свойства объекта
- •Методы семейства
- •События объекта
- •13.4Объекты Range и Selection
- •Адресация ячеек
- •Задание групп строк и столбцов
- •Связь объекта Range и свойства Cells объекта Worksheet
- •Свойства объекта Range
- •Методы объекта Range
- •13.5Объект Windows Свойства объекта
- •14.Форма и элементы управления
- •14.1Форма
- •Свойства формы
- •Методы формы
- •События формы
- •Инструкции, управляющие процессами начала и завершения работы с формой
- •Ключевое слово Me
- •14.2Элементы управления
- •Общие свойства элементов управления
- •Общие методы элементов управления
- •Общие события элементов управления
- •Кнопка (CommandButton) Свойства объекта
- •Поле (TextBox)
- •Свойства объекта
- •Счетчик
- •Свойства объекта
- •Список (ListBox)
- •Свойства объекта
- •Методы объекта
- •Поле со списком (ComboBox)
- •Свойства объекта
- •Методы объекта
- •Объект Collection
- •Методы объекта
- •Свойства объекта
- •Набор страниц (MultiPage)
- •Свойства объекта
- •Методы объекта
- •Набор вкладок (TabStrip)
- •Календарь (Calendar)
- •Свойства объекта
- •Методы объекта
- •Отображение встроенных диалоговых окон
- •Команды компоновки элементов управления на форме
- •15.Обработка данных
- •15.1Консолидация рабочих листов. Метод Consolidate объекта Range.
- •15.2Сортировка данных. Метод Sort.
- •15.3Использование Автофильтра. Метод AutoFilter.
- •15.4Промежуточные итоги. Метод Subtotal. Объект Outline. Метод Subtotal
- •Объект Outline
- •Свойства объекта
- •15.5Сводная таблица. Объект PivotTable
- •Метод PivotCaches и объект PivotCache
- •Метод PivotTableWizard
- •Объекты PivotTable и PivotField
- •16.Создание справочной системы
- •16.1Создание файла содержания
- •16.2Создание файла разделов
- •16.3Создание файла проекта
- •16.4Подключение справки
- •17.Программирование панели инструментов
- •17.1Объект CommandBar и семейство CommandBars
- •Методы объекта CommandBar
- •Свойства объекта CommandBar
- •Названия панелей инструментов
- •17.2Семейство CommandBarControls и объект CommandBarControl
- •Свойства объекта CommandBarControl
- •Методы объекта CommandBarControl
- •17.3Элемент управления CommandBarButton
- •17.4Элемент управления CommandBarPopup
- •17.5Элемент управления CommandBarComboBox
- •1С: Бухгалтерия 7.7
- •1С: Предприятие 8.0:
- •1С: Бухгалтерия 8.0
- •Перечень предлагаемых курсов постоянно дополняется. Программа обучения может быть согласована с предприятием заказчиком. По окончании курса выдается свидетельство.
- •Тест рекомендован Министерством образования рф. Партнеры Учебного центра «Стелс-Про»
Оператор lSet
Служит для специфического присваивания строк с одновременным выравниванием слева, а также для присваивания значения записи одного пользовательского типа записи другого.
LSet имяСтроковойПеременной = СтроковоеВыражение
LSet имяПеременной1 = имяПеременной2
В первом случае результатом присваивания является строка той же длины, что и у значения имяСтроковойПеременной. Если значение выражения СтроковоеВыражение длиннее, то лишние символы справа удаляются, если короче – то заполняются пробелами справа.
Во втором случае присваивание аналогично вышеописанному случаю с использованием оператора Let, но только здесь не обязательно, чтобы типы полей совпадали.
Например:
Sub ПримерИспользованияОператораLSet()
Dim Строка1 As String, Строка2 As String
Строка1 = "0123456789"
Строка2 = "Влево"
LSet Строка2 = Строка1
MsgBox (Строка2) ‘В результате будет выведено 01234
End Sub
Оператор rSet
Аналогичен предыдущему оператору, но выравнивание происходит справа. Помимо этого, оператор RSet нельзя использовать для присваивания записей.
RSet имяСтроковойПеременной = СтроковоеВыражение
Результатом присваивания является строка той же длины, что и значение имяСтроковойПеременной. Если при этом значение СтроковоеВыражение длиннее, то лишние символы удаляются, короче – заполняются пробелами слева.
Например:
Sub ПримерИспользованияОператораRSet()
Dim Строка1 As String, Строка2 As String
Строка1 = "01234567890123456789"
Строка2 = "Вправо"
RSet Строка1 = Строка2
MsgBox (Строка1) 'В результате будет выведено слово Вправо, выровненное по правому краю ‘Cтроки1
End Sub
9.2Условные операторы
If…Then…Else (оператор ветвления)
Select Case (оператор выбора)
Функция IIf (простое ветвление)
Оператор If…Then…Else
Это стандартный оператор ветвления. Его использование позволяет проверить некоторое условие и, в зависимости от его истинности, выполнить ту или иную группу операторов.
If условие Then [блокОператоров1] [Else блокОператоров2]
Допустима блочная запись оператора:
If условие Then
[блокОператоров1]
[Else
[блокОператоров2]
End If
Или
If условие1 Then
[блокОператоров1]
[ElseIf условие2 Then]
[блокОператоров2]
…
[ElseIf условиеN Then]
[блокОператоровN]
[Else
[блокОператоров_Else]]
End If
Первая схема оператора работает по следующему принципу:
После слова If стоит условие. В качестве условия можно использовать логическое выражение, возвращающее значение True или False. Также можно использовать арифметическое выражение, в этом случае нулевое значение эквивалентно False, ненулевое – True. Если условие возвращает True, то выполняется блокОператоров1, если False – блокОператоров2, где блокОператоров – это последовательность операторов, отделенные друг от друга двоеточием. Причем необходим хотя бы один блокОператоров.
Вторая схема – развернутая цепочка ветвлений, когда приходится делать выбор одного из целой группы альтернативных действий на основе проверки нескольких различных условий. В этом случае также необходимо наличие хотя бы одного из блоковОператоров. Вторая схема действует по следующему принципу:
Проверяется условие1, если оно истинно, то выполняется блокОператоров1 и осуществляется переход к оператору, стоящему за ключевыми словами End If. Если же оно ложно, то проверяется условие2 и т.д. Если проверка дошла до последнего оператора ElseIf и условиеN тоже оказывается ложным (т.е. все выше перечисленные условия ложны), выполняется блокОператоров_Else.
Например:
Sub ПримерИспользованияОператораIf()
'Даны три целых числа. Вывести значение большего.
Dim Число1 As Integer, Число2 As Integer, Число3 As Integer
Dim Max As Integer
Число1 = 123: Число2 = 0: Число3 = -456
Max = Число1
If Max < Число2 Then Max = Число2
If Max < Число3 Then Max = Число3
MsgBox (Max) 'на экран будет выведено число 123
End Sub