Уважаемые господа специалисты! Есть задача: вернуть результат формулы, который должен зависеть от формата ячейки. Т.е. есть три столбца с суммами в разных валютах. Требуется в отдельную ячейку записать формат ячейки, а именно валюту. Это как-то возможно реализовать? Я вижу это как-то так:
Приветствую всех! Снова мой неугомонный моск не дает мне покоя. Перечитал все доступные заголовки, не смог правильно сформулировать поисковый запрос поэтому рискнул создать новую тему. Имеется задача: вычислить значение исходя из множества параметров. Пример: Вычислить стоимость разгрузки груза. Груз может весить до 10 тонн и больше 10 тонн, может быть деревянный или железный, на паллетах или навалом, на колесах или не на колесах, в контейнере или не в контейнере и еще ряд параметров. на каждый вид груза и каждое сочетание имеется своя цена. Я решил сделать функцию на VBA, которая будет перебирать все параметры IF-Else – ами и в зависимости от сочетания производить вычисления.
Код
Function LUW(Вес, ТипГруза, НаПаллете, Самоход, Контейнер, Ставка_дер_до10т, Ставка_дер_больше10т, Ставка_железный, Ставка_безпалета…. и там далее все аргументы и ставки)
If ТипГруза = 1 Then ‘ как бы 1 – это деревянный. Если груз деревянный, ТО
If НаПаллете = True Then ‘ проверяем на паллете он или нет, Если да, ТО
If Вес <= 10 Then ‘ проверяем сколько весит. Если меньше 10 т, ТО
LUW = Вес * Ставка_дер_до10т ‘соответствующая ставка умножается на вес
Else: LUW = Вес * Ставка_дер_больше10т ‘ если больше 10 т, то другая ставка
End If
Else: LUW = Вес * Ставка_безпалета ‘ если деревянный груз без паллета
End If
Else: LUW = … ‘Если груз НЕ ДЕРЕВЯННЫЙ… Вот тут и ступор. Получается нужно обращаться опять к условию проверки «На_паллете» и я начинаю тупить…
End If
End Function
И еще, получается, что при моей логике у функции 24!!! аргумента. В целом это не большая проблема, но может кто-нить знает более изящное решение?
Лишь стремясь к невозможному, можно достичь максимального.
Уважаемые товарищи специалисты! Я наивно полагал, что справлюсь сам, но EXCELL и VBA остудили мой пыл и я залип. Имеется некий массив данных, на основе которых автозаполняются различные формы и документы. В частности международная транспортная накладная СМР. Чего я хотел: Чтобы ВПР искала в сводной таблице номер СМР и брала оттуда данные для заполнения граф. Столкнулся с проблемой, когда по одной СМР едет несколько грузов и каждый со своим идентификатором (инвойсом). Решил накалапуцать пользовательскую функцию. Функция должна просматривать данные в сводной таблице по определенному столбцу, находить все значения и сцеплять их между собой через запятую. Понимаю, что нужно писать цикл, а именно с ним у меня и возникли проблемы… Не умею, как оказалось. Помогите плиз. Пример во вложении.
Лишь стремясь к невозможному, можно достичь максимального.
Уважаемые господа форумчане, вопрос кажется детским, но я что-то решить не могу. В приложенном примере файл с датами и некими числами. Идея такова, что если число в столбце В равно числу в столбце D то ячейка напротив этих чисел в столбце Е заливается зеленью. По факту получается все наоборот... Где косяк?
Лишь стремясь к невозможному, можно достичь максимального.
Уважаемые форумчане! Перелопатил я практически весь сайт, включая "Форум", "Приемы" и "Видеоуроки", но нигде не обнаружил ответ на свой, казалось бы элементарный, вопрос. Во всех постах, в которых речь идет о связанных таблицах, пользователи прекрасно понимают КАК ЭТО РАБОТАЕТ, и пытаются реализовать уже более сложные вещи. Вопрос до боли простой: есть две таблицы на разных листах. В одну таблицу заносятся все данные по туристу, включая общую стоимость тура. Но туристы приносят деньги разными частями и в разное время. Для учета того, что они принесли имеется вторая таблица. Раньше все данные из второй таблицы собирались в сводке и с помощью ВПР тянулись в определенный столбец первой таблицы. Как-то можно это реализовать при помощи связи и без ВПР? Связи созданы, но результатов я почему-то не вижу... Файл с примером во вложении.
Я заранее прощу прощения, если данная тема уже обсуждалась. Тогда дайте пожалуйста ссылку на неё.
Лишь стремясь к невозможному, можно достичь максимального.