Этот заказ уже выполнен на сервисе Автор24
На нашем сайте вы можете заказать учебную работу напрямую у любого из 72000 авторов, не переплачивая агентствам и другим посредникам. Ниже приведен пример уже выполненной работы нашими авторами!
Узнать цену на свою работу

Курсовая.

Номер заказа
59137
Создан
20 июня 2013
Выполнен
23 июня 2013
Стоимость работы
490
Проблема по информатике. Срочно закажу курсовую работу по информатике. Есть буквально 3 дня. Тема работы «Курсовая.».
Всего было
15 предложений
Заказчик выбрал автора
Этот заказ уже выполнен на сервисе Автор24
На нашем сайте вы можете заказать учебную работу напрямую у любого из 72000 авторов, не переплачивая агентствам и другим посредникам. Ниже приведен пример уже выполненной работы нашими авторами!
Узнать цену на свою Курсовую работу
Или вы можете купить эту работу...
Страниц: 16
Оригинальность: Неизвестно
490
Не подошла
данная работа?
Вы можете заказать учебную работу
на любую интересующую вас тему
Заказать новую работу

Курсовая.
Введение
Задание на курсовую работу
Описание переменных
Блок-схема
Описание алгоритма
Листинг программы
Проверка работы программы
Заключение
Список литературы
1.Кузьменко В. Г. VBA 2003. Самоучитель. М: Бином-Пресс, 2010. 429 с.
2.Пол Санна Visual Basic для приложений (версия 5) в подлиннике: пер. с англ. СПб: BHV, 1997. 704 с.
Sheets(1).Activate
Range("A:J").HorizontalAlignment = xlCenter

For i = 3 To 10
Rows(i).Clear
Next
For i = 1 To 8
ActiveSheet.Cells(2 + i, 1) = InputBox("Название")
ActiveSheet.Cells(2 + i, 2) = InputBox("Кол-во заступивших роз")
ActiveSheet.Cells(2 + i, 3) = InputBox("Кол-во проданных роз в 1-й день")
ActiveSheet.Cells(2 + i, 4) = InputBox("Кол-во проданных роз в 2-й день")
ActiveSheet.Cells(2 + i, 5) = InputBox("Кол-во проданных роз в 3-й день")
ActiveSheet.Cells(2 + i, 6) = InputBox("Кол-во проданных роз в 4-й день")
ActiveSheet.Cells(2 + i, 7) = InputBox("Кол-во проданных роз в 5-й день")
ActiveSheet.Cells(2 + i, 8) = InputBox("Кол-во проданных роз в 6-й день")
ActiveSheet.Cells(2 + i, 9) = InputBox("Кол-во проданных роз в 7-й день")
ActiveSheet.Cells(2 + i, 10) = I Показать все
Автор24 - это фриланс-биржа. Все работы, представленные на сайте, загружены нашими пользователями, которые согласились с правилами размещения работ на ресурсе и обладают всеми необходимыми авторскими правами на данные работы. Скачивая работу вы соглашаетесь с тем что она не будет выдана за свою, а будет использована исключительно как пример или первоисточник с обязательной ссылкой на авторство работы. Если вы правообладатель и считаете что данная работа здесь размещена без вашего разрешения - пожалуйста, заполните форму и мы обязательно удалим ее с сайта. Заполнить форму
Оценим бесплатно
за 10 минут
Эта работа вам не подошла?
У наших авторов вы можете заказать любую учебную работу от 200 руб.
Оформите заказ и авторы начнут откликаться уже через 10 минут!
Заказать курсовую работу