Лабораторная работа VBA «Работа с макросами. Адресация».

Ссылка на одиночную ячейку

Формат 1

[Объект.] Range (“адрес ячейки”)

Для свойства Range в качестве аргумента используется любая ссылка в формате A1. Например, Sheets(“Лист1”).Range(“A7”)=34 или для текущего листа Range(“A7”)=34 - запись в ячейку A7 числа 34.

Формат 2

[Объект.] Cells(<номер строки>, <номер столбца>)

Свойство     используется для доступа к отдельной ячейке. В качестве аргументов указываются номер строки и столбца. Например, для ввода числа 34 в ячейку Лист1!A7, необходима команда:

Sheets(“Лист1”).Cells(7, 1). Value=34 

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

Пример. Нужно поместить число 1024 в ячейку Зарплата!D3. Для этого применяется процедура с неявным объявлением переменных nomstr - для номера строки и nomcol – для номера столбца. 

Sub Ввод()

nomstr =3

nomcol =4

 Sheets(“Лист1”).Cells(nomstr, nomcol). Value=1024   

End Sub

Составить отчет о проделанной работе.

Отчет создается параллельно выполнению работы!

Способы адресации ячеек

1. Перейдите в VBA и самостоятельно составьте программу, используя различные способы адресации ячеек (Range, Cells), которая автоматически введет в ячейки B3:B6 Листа1 следующий текст:

Лабораторную работу

выполнил(ла) студент(ка)

№ группы Фикр.

Фамилия И.О..

Выполните макрос.

2. Создайте новую процедуру и объявите в ней 3 переменные: 1 -строковую и 2 – числовых.

· Присвойте числовым переменным значения в пределах от 4 до 15.

· Выведите их значения в окне сообщения (MsgBox <имя переменной>).

· Выведите значение строковой переменной в свободную ячейку Листа1 с помощью свойства Cells. Используйте имена числовых переменных в качестве номеров строки и столбца при указании адреса в свойстве Cells .  

· Проверьте результат работы процедуры.

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

Познавательные статьи:



Алгоритмические операторы Matlab

Конструирование и порядок расчёта дорожной одежды

Исследования учёных: почему помогают молитвы?

Почему терпят неудачу многие предприниматели?