Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBA - Excel (Задачка) / 10 сообщений из 10, страница 1 из 1
12.12.2011, 23:49
    #37571934
AnastasiLya
AnastasiLya
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA - Excel (Задачка)
Уж полночь близится решения все нет...
Сижу над задачкой, след. содержания :

"Дана заработная плата работников предприятия и размер потребительской корзины. Разработать функцию пользователя, определяющую количество работников предприятия, заработная плата которых меньше размера потребительской корзины."

В общем нарисовала я табличку http://clip2net.com/s/1oync , накалякала какой-то код, который не работает =) http://clip2net.com/s/1oyBa

Прошу помощи, хоть подсказку дайте,я чайник в VBA,а решить то нужно =(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2011, 00:09
    #37571957
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA - Excel (Задачка)
Включи макрорекордер.
Запиши процесс внесения в какую-либо ячейку подсчёт требуемого количества (используя функцию СЧЁТЕСЛИ) и последующего удаления значения. Останови запись.
Между занесением и удалением добавь получение в переменную значения (value) изменяемой ячейки, перед кодом - процесс поиска пустой ячейки и использования именно её для операции, после кода - вывод значения переменной (скажем в msgbox).
Код готов.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2011, 00:11
    #37571960
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA - Excel (Задачка)
А зачем тут VBA? Функция СЧЕТЕСЛИ, если не ошибаюсь.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2011, 00:20
    #37571970
AnastasiLya
AnastasiLya
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA - Excel (Задачка)
Нужно не функцией счетесли, а именно кодом
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2011, 00:29
    #37571981
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA - Excel (Задачка)
AnastasiLyaхоть подсказку дайт

Подсказка №1 - типы переменных q и r - неправильные
Подсказка №2 - необязательно делать скриншот кода, его, предстваьте, можно копировать
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2011, 00:30
    #37571982
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA - Excel (Задачка)
Подсказка №3 - что это за ="<9000"?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2011, 01:08
    #37572005
AnastasiLya
AnastasiLya
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA - Excel (Задачка)
Почему не Long?
Эммм... а как нужно,если не "<9000"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2011, 01:34
    #37572024
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA - Excel (Задачка)
AnastasiLyaПочему не Long?а почему Long? Хоть какое-то есть понимание о типе данных?
AnastasiLyaЭммм... а как нужно,если не "<9000"а как бы вы в обычной математике записани, что одно число больше другого?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2011, 02:09
    #37572033
alex77755
alex77755
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA - Excel (Задачка)
Раз автору картинки больше нравятся и сам пытался что-то сделать - уважим
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.12.2011, 06:59
    #37572092
скукотища
скукотища
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA - Excel (Задачка)
Код: vbnet
1.
2.
3.
' r - диапазон
' Condition - условие ( строка либо ссылка )
Function BeCycleCountIF&(r as Range, Condition): BeCycle = WorksheetFunction.CountIf(r, Condition): End Function
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / VBA - Excel (Задачка) / 10 сообщений из 10, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 277ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2158238]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 177ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 43ms
get tp. blocked users:
 1ms
others: 13ms
total:  277ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]