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

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

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

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

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

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

от 25%

Подписываем

договор

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

Скидка 25% при заказе до 28.4.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. Контрольная работа преследует следующие цели- закрепление и обобщение полученных знаний самостоятельно
2. У меня в два счёта все станут счастливыми А кто не станет я того в бараний рог согну сотру в порошок и брошу
3. 12.2013 Средний зал Большой зал
4. ФИЗИКА 1й семестр 2012-2013 уч
5. Курение и наркомания
6. совокупность в денежном выражении вкладов учредителей собственников в имущество стоимость основных сред
7. utoCD 200
8. ЄвроАвтобан ІваноФранківськЛиповиця 2 6
9. ОБЪЕДИНЕНИЕ ПОДРОСТКОВЫХ КЛУБОВ ЛЕНИНГРАДСКОЕ ПРИКАЗ от 2013 г
10. Тема- Лікарські засоби для перорального застосування подовженої повторної та підтримуючої дії Зміс