У вас вопросы?
У нас ответы:) SamZan.net

Лабораторная работа 1 Задание 1- В ячейки 1 и B1 пользователем вводятся два числа увеличить наибольшее из

Работа добавлена на сайт samzan.net: 2015-07-05

Поможем написать учебную работу

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

Предоплата всего

от 25%

Подписываем

договор

Выберите тип работы:

Скидка 25% при заказе до 2.2.2025

Занятие 1

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

Задание 1: В ячейки A1 и B1 пользователем вводятся два числа, увеличить наибольшее из низ на 1, если числа равны, вывести соответствующее сообщение.

Порядок выполнения:

1.Запустить MS Excel, создать пустую рабочую книгу.

2. В ячейки таблицы  A1:B1 занести числовые данные.

3. Войти в пункт меню Сервис-Макрос- Редактор Visual Basic(Alt+F11) (Разработчик – Visual Basic - для  MS Excel2010).

4. В окне Project explorer перейти по дереву проекта на ветвь VBAProject(имя книги)\Microsoft Excel objects\Эта книга, щелкнуть дважды по надписи “Эта книга”.

5. В появившемся окне набрать текст программы, представленной ниже:

6.Сохранить произведенные изменения, закрыть окно редактора Visual Basic  и перейти в окно Microsoft Excel.

7. Используя команду меню Сервисы\Макрос\Макросы (Разработчик – Макросы - для  MS Excel2010), открыть окно Макрос. Выбрать созданный макрос и нажать на кнопку Выполнить.

8. Проверить правильность  работы макроса.  

Задание 2: Вывести таблицу умножения для указанного пользователем числа.

Порядок выполнения:

1.Запустить MS Excel, создать пустую рабочую книгу.

2. В ячейку таблицы  A1 ввести текст “Таблица умножения на:”, в ячейку A2 целое число. 

3. Войти в пункт меню Сервис-Макрос- Редактор Visual Basic(Alt+F11) (Разработчик – Visual Basic - для  MS Excel2010).

4. В окне Project explorer перейти по дереву проекта на ветвь VBAProject(имя книги)\Microsoft Excel objects\Эта книга, щелкнуть дважды по надписи “Эта книга”.

5. В появившемся окне набрать текст программы, представленной ниже:

6.Сохранить произведенные изменения, закрыть окно редактора Visual Basic  и перейти в окно Microsoft Excel.

7. Используя команду меню Сервисы\Макрос\Макросы (Разработчик – Макросы - для  MS Excel2010), открыть окно Макрос. Выбрать созданный макрос и нажать на кнопку Выполнить.

8. Проверить правильность  работы макроса.  

Задание 3: Подсчитать количество положительных четных чисел среди десяти, вводимых пользователем.

Порядок выполнения:

1.Запустить MS Excel, создать пустую рабочую книгу.

2. В ячейки таблицы  A1:A10 занести числовые данные..

3. Войти в пункт меню Сервис-Макрос- Редактор Visual Basic(Alt+F11) (Разработчик – Visual Basic - для  MS Excel2010).

4. В окне Project explorer перейти по дереву проекта на ветвь VBAProject(имя книги)\Microsoft Excel objects\Эта книга, щелкнуть дважды по надписи “Эта книга”.

5. В появившемся окне набрать текст программы, представленной ниже:

6.Сохранить произведенные изменения, закрыть окно редактора Visual Basic  и перейти в окно Microsoft Excel.

7. Используя команду меню Сервисы\Макрос\Макросы (Разработчик – Макросы - для  MS Excel2010), открыть окно Макрос. Выбрать созданный макрос и нажать на кнопку Выполнить.

8. Проверить правильность  работы макроса.  




1. EvidenceBsed Medicine медицина основанная на доказательствах впервые предложен--- американскими врачами обще
2. Сатори Учебнометодические материалы Общая часть Что такое медитация Техника медитации в п
3. Организация эффективной работы прядильного производства
4. Реферат- Социология, культурология, религоведение
5. строитель. Обратилась в поликлинику на 2й день болезни с жалобами на боль и жжение в области носа головную бо.html
6. Дипломная работа- Имущественные права и обязанности супругов
7. а Ребята сегодня мы поговорим о наших домашних питомцах
8. Noki з чорнобілим екраном краще за свого батька
9. Гостиницы должны иметь продуманную коммуникационную стратегию и уметь поддерживать связи с клиентурными г
10.  Гносеология это учение- г о сущности познания о путях постижения истины; 2