Не могу понять какой код написать...

Программирование на Visual Basic for Applications
Glebasik
Начинающий
Начинающий
 
Сообщения: 6
Зарегистрирован: 03.05.2010 (Пн) 11:54
Откуда: Украина

Не могу понять какой код написать...

Сообщение Glebasik » 24.05.2010 (Пн) 15:03

День добрый, Друзья!
Очень очень прошу - помогите, пожалуйста!

На Вашем замечательном сайте я еще новичок, зарегистрировался совсем совсем недавно... Скажите, не могли бы 1 раз бескорыстно, по доброте душевной, помочь? Просто для меня сейчас это очень важно... А в дальнейшем я бы в долгу не остался...

У меня есть задание:

Создать таблицу по образцу (уже создал, она в архиве...)

Создать функции пользователя средствами VBA для расчета показателей:

1) сумма фактического остатка конкретного товара на предприятии (по всем складам)
2) фактический остаток всех товаров определенной товарной группы;
3) фактический остаток товаров на конкретном складе.

Еще в архиве есть ПРИМЕР - это нам показывали как и что делается в принципе...

Моя таблица называется - Книга1

Архив: http://slil.ru/29181531

Кто сможет - скачайте архив, посмотрите пожалуйста как код написать для расчета... Вообще не могу=(

Заранее - Спасибо Большое, Добрые люди!

SLIM
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1840
Зарегистрирован: 04.04.2008 (Пт) 18:21
Откуда: Краснодар

Re: Не могу понять какой код написать...

Сообщение SLIM » 24.05.2010 (Пн) 20:17

Это мне одному кажется что это мура?
Пишите жизнь на чистовик.....переписать не удастся.....

Владимир7
Обычный пользователь
Обычный пользователь
 
Сообщения: 59
Зарегистрирован: 13.03.2008 (Чт) 22:12

Re: Не могу понять какой код написать...

Сообщение Владимир7 » 24.05.2010 (Пн) 23:39

Код: Выделить всё
Function ah(товары As Range, остаток As Range, склады As Range, товар As String, склад As String)
    If остаток.Count <> склады.Count Or остаток.Count <> товары.Count Then ah = "укажите правильно диапазон ячеек": Exit Function
    For i = 1 To товары.Count
        If товары(i, 1) = товар And склады(i, 1) = склад Then ah = ah + остаток(i, 1)
    Next i
End Function
[Viper] :: Пользуемся тэгами CODE!

Glebasik
Начинающий
Начинающий
 
Сообщения: 6
Зарегистрирован: 03.05.2010 (Пн) 11:54
Откуда: Украина

Re: Не могу понять какой код написать...

Сообщение Glebasik » 25.05.2010 (Вт) 7:52

Спасибо Вам большое, Владимир7 !

...Вы - настоящий Друг:-)


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 9

    TopList  
cron