Страницы: 1
RSS
Определение вида валюты в ячейке и пересчет по курсу
 
Всем доброго времени суток! Пытаюсь автоматизировать свое дело, глубоких познаний в excele нет. Если кто сталкивался с подобным или знает как, подскажите.
На одной странице у меня прайс-цены как в рублях, так и в евро и в долларах. Формат этих ячеек денежный. На вторую страницу это значение подтягивается  через ВПР. Подтягивается как бы в справочную табличку, в ячейку, выделенную зеленым цветом, но вид валюты автоматически не переносится из первой (это я в примере сам проставил рубли) . А рядом на этой же странице накладная. Пересчитать нужно в ячейку, выделенную зеленым цветомв рубли. И вот как сделать, чтобы пересчитывало в рубли по курсу и в накладную уже проставляло пересчитанное.
Я так понимаю, что нужно сделать рядом вспомогательное окно, куда надо забивать курс евро и долларов вручную(ячейка выделенная желтым цветом.
Но проблема, когда ВПР переносит цену с первой страниц (с прайса), то уже непонятно что это евро или доллары или вообще рубли. Что нужно:
1. при переносе цены  из первой таблицы во вторую в зеленую ячейку простановка вида валюты автоматически
2. пересчет в рубли  и подстановка в синюю ячейку в рублях, если  в зеленой евро или доллары и без изменений, если в зеленой рубли
3. чтобы курс можно было менять  вручную в желтой ячейке и этот курс был завязан в формулу расчета
Всем, кто поможет, заранее оргромнейшее спасибо!!!              
 
Приложите файл-пример. По картинкам тут очень редко помогают.
Я не волшебник, я только учусь.
 
Wiss, спасибо за подсказку)
 
Теперь тогда уточню по файлу. Исходные данные берутся со страницы прайс столбец М и переносится с помощью ВПР на страницу калькулятор  в В16, нужно понять какая валюта пересчитать и поставить в ячейку G7  в рублях. А в ячейки J22 и J23 проставлять курс вручную
 
Нужно или сразу использовать UDF (где весь функционал и прописать), или делать допстолбцы, где тоже использовать UDF для выяснения валюты.
 
Hugo, можете рассказать подробнее как это?
 
Почитайте сперва в Приёмах про создание пользовательских функций - если готовы применять, тогда можно подумать как реализовать. Зря тратить время смысла нет.
Кстати именно как выяснить валюту по формату ячейки - я недавно где-то писал:
Код
Function nmbf(r As Range)
    nmbf = Split(Split(r.NumberFormat, "[$", 2)(1), "-", 2)(0)
End Function

Правда конкретно с этим рублями не работает, но с долларами и евро легко, и в принципе для примера этого достаточно :)
Изменено: Hugo - 14.08.2020 11:41:55
 
Hugo, спасибо, попробую
Страницы: 1
Наверх