VBA |
Здравствуйте, гость ( Вход | Регистрация )
VBA |
marina2010 |
10.6.2010, 17:26
Сообщение
#1
|
Студент Группа: Продвинутые Сообщений: 68 Регистрация: 15.12.2009 Город: Саранск Учебное заведение: ВУЗ |
Помогите)Вывести фамилии сотрудников,которые хотя бы 1 раз получали минимальную зарплату по предприятию за год.Вот код:но там че-то не так получается.а исправить я не могу(Помогите,пожалуйста)
Private Sub CommandButton3_Click() Dim i, j As Integer Dim min(12) As Double Dim b(12) As Integer Rem Нахождение минимального элемента в таблице For j = 1 To 12 min(j) = Зарплата(1, j) For i = 2 To 10 If Зарплата(i, j) < min(j) Then min(j) = Зарплата(i, j) Next i Next j Rem b(j)-номер первой свободной строки в каждом столбце For j = 1 To 12 b(j) = 12 Next j Rem Сравниваем зарплаты с минимальной в каждом месяце For i = 1 To 10 For j = 1 To 12 If Зарплата(i, j) = min(j) Then b(j) = b(j) + 1: Cells(b(j), j + 1) = Фамилия(i) Next j Next i End Sub а вот и программа вся- http://depositfiles.com/files/8ypik9g7u посмотрите (IMG:style_emoticons/default/rolleyes.gif) |
Vahappaday |
10.6.2010, 19:54
Сообщение
#2
|
Аспирант Группа: Продвинутые Сообщений: 334 Регистрация: 26.4.2009 Город: Липецк Учебное заведение: ЛГТУ Вы: студент |
что такое Зарплата? Где этот массив (или чем это ещё является) определен?
Прошу прощения... в файлике всё есть, гляжу... Сейчас оно выводит фамилию сотрудника, получившего минимум по месяцу. Когда сдавать? |
marina2010 |
10.6.2010, 20:12
Сообщение
#3
|
Студент Группа: Продвинутые Сообщений: 68 Регистрация: 15.12.2009 Город: Саранск Учебное заведение: ВУЗ |
|
Vahappaday |
10.6.2010, 20:28
Сообщение
#4
|
Аспирант Группа: Продвинутые Сообщений: 334 Регистрация: 26.4.2009 Город: Липецк Учебное заведение: ЛГТУ Вы: студент |
Когда сдавать?
Завтра разберусь, спать хочется... Насчёт задания: фамилия должна выводиться, если у неё была хотя бы в одном месяце минимальная зарплата? Или должна выводиться фамилия получившего годовой минимум? |
marina2010 |
10.6.2010, 20:33
Сообщение
#5
|
Студент Группа: Продвинутые Сообщений: 68 Регистрация: 15.12.2009 Город: Саранск Учебное заведение: ВУЗ |
Когда сдавать? Завтра разберусь, спать хочется... Насчёт задания: фамилия должна выводиться, если у неё была хотя бы в одном месяце минимальная зарплата? Или должна выводиться фамилия получившего годовой минимум? которые хотя бы 1 раз получали минимальную зарплату по предприятию за год.Но нужно уже завтра.Но ничего завтра может сама преподавательница поможет)Спасибо,что посмотрели)Спокойной ночи) |
Vahappaday |
11.6.2010, 7:26
Сообщение
#6
|
Аспирант Группа: Продвинутые Сообщений: 334 Регистрация: 26.4.2009 Город: Липецк Учебное заведение: ЛГТУ Вы: студент |
Если ещё нужно будет - отпишитесь
|
marina2010 |
12.6.2010, 5:54
Сообщение
#7
|
Студент Группа: Продвинутые Сообщений: 68 Регистрация: 15.12.2009 Город: Саранск Учебное заведение: ВУЗ |
|
tig81 |
12.6.2010, 6:22
Сообщение
#8
|
Академик Группа: Преподаватели Сообщений: 15 617 Регистрация: 15.12.2007 Город: Украина, Запорожье Учебное заведение: ЗНУ Вы: преподаватель |
|
Vahappaday |
12.6.2010, 20:17
Сообщение
#9
|
Аспирант Группа: Продвинутые Сообщений: 334 Регистрация: 26.4.2009 Город: Липецк Учебное заведение: ЛГТУ Вы: студент |
Молодчина))
|
Текстовая версия | Сейчас: 29.4.2024, 2:08 |
Зеркало сайта Решебник.Ру - reshebnik.org.ru