Привет всем! Проблема мучает уже второй день, уде много вопросов читал у вас на сайте и решил другие вопросы, но вот этот не могу. Есть 3 прайс-листа, их значения я уже перевел в отдельный файл с правильными названиями/ценами/поставщиками, но теперь проблема, так как у меня цены у поставщиков в 1 ячейке и разделены " | ", так же как и количество товара и их поставщики, то мне нужно вывести в отдельную ячейку 1 поставщика, у которого самая низкая цена на товар. Что бы вы поняли как у меня выглядит таблица скину все 4 файла (3 прайс-листа поставщиков и наш прайс-лист интернет-магазина). файл с название "прайс-лист" является нашим прайс-листом, который связан с тремя другими прайс-листами поставщиков. Если что не так объяснил, скажите я сразу расскажу и тд и тп.
Привет всем! Проблема мучает уже второй день, уде много вопросов читал у вас на сайте и решил другие вопросы, но вот этот не могу. Есть 3 прайс-листа, их значения я уже перевел в отдельный файл с правильными названиями/ценами/поставщиками, но теперь проблема, так как у меня цены у поставщиков в 1 ячейке и разделены " | ", так же как и количество товара и их поставщики, то мне нужно вывести в отдельную ячейку 1 поставщика, у которого самая низкая цена на товар. Что бы вы поняли как у меня выглядит таблица скину все 4 файла (3 прайс-листа поставщиков и наш прайс-лист интернет-магазина). файл с название "прайс-лист" является нашим прайс-листом, который связан с тремя другими прайс-листами поставщиков. Если что не так объяснил, скажите я сразу расскажу и тд и тп.ask95
Сообщение отредактировал ask95 - Суббота, 20.12.2014, 13:28
Не знаю что в последнем файле. Но как предполагается сопоставлять одинаковые шины - по артикулу? в одном из прайсов нет артикулов, в другом частично.
может заархивировать файл?
Не знаю что в последнем файле. Но как предполагается сопоставлять одинаковые шины - по артикулу? в одном из прайсов нет артикулов, в другом частично.Leanna
Лучше день потерять, потом за пять минут долететь!
Короче вот архив, там я как можно меньше дал данных. В файле "мой-прайс", есть 1 не заполненный столбец, так вот там должен выводится поставщик (Мега, КиК или Дакар), который определяется по минимальной цене закупки (слева от пустой колонки это и есть меньшая цена умноженная на 1,122, а число выбиралось из того же файла "мой-прайс" из 1 или 2 или 3 цен справа). Пример: поставщики: Мега | Дакар Цена: 2600 | 2500 И в столбце "Оптим.", должен показать Дакар, так как цена у них ниже. Снова кину архив, потому как не могу уменьшить размер файла, я и так данные на 90% убрал, а все равно не 100кб Удалено модератором - нарушение Правил форума [moder]Попробуйте скопировать Ваши данные (только их) и вставить в новый файл. Это может уменьшить размер. Или вставьте значениями.
Короче вот архив, там я как можно меньше дал данных. В файле "мой-прайс", есть 1 не заполненный столбец, так вот там должен выводится поставщик (Мега, КиК или Дакар), который определяется по минимальной цене закупки (слева от пустой колонки это и есть меньшая цена умноженная на 1,122, а число выбиралось из того же файла "мой-прайс" из 1 или 2 или 3 цен справа). Пример: поставщики: Мега | Дакар Цена: 2600 | 2500 И в столбце "Оптим.", должен показать Дакар, так как цена у них ниже. Снова кину архив, потому как не могу уменьшить размер файла, я и так данные на 90% убрал, а все равно не 100кб Удалено модератором - нарушение Правил форума [moder]Попробуйте скопировать Ваши данные (только их) и вставить в новый файл. Это может уменьшить размер. Или вставьте значениями.ask95
Сообщение отредактировал ask95 - Суббота, 20.12.2014, 16:03
Можно UDF? если да то так: Ссылка удалена администацией [vba]
Код
Function МинПостащик(ЗакупЦена As Range, Поставщики As Range) If ЗакупЦена.Value = "" Or Поставщики = "" Then МинПостащик = "" Else
arrPrice = Split(ЗакупЦена, "|") arrSupply = Split(Поставщики, "|") For i = 0 To UBound(arrPrice) If Len(Trim(arrPrice(i))) <> 0 Then If Trim(arrPrice(i)) * 1 < Trim(arrPrice(0)) * 1 Then k = i Next
МинПостащик = Trim(arrSupply(k)) End If End Function
[/vba]
Можно UDF? если да то так: Ссылка удалена администацией [vba]
Код
Function МинПостащик(ЗакупЦена As Range, Поставщики As Range) If ЗакупЦена.Value = "" Or Поставщики = "" Then МинПостащик = "" Else
arrPrice = Split(ЗакупЦена, "|") arrSupply = Split(Поставщики, "|") For i = 0 To UBound(arrPrice) If Len(Trim(arrPrice(i))) <> 0 Then If Trim(arrPrice(i)) * 1 < Trim(arrPrice(0)) * 1 Then k = i Next
МинПостащик = Trim(arrSupply(k)) End If End Function
можно подробнее, где ввести макрос? Я пытался найти где написано udf или пользовательский макрос и в списке функций его нет, там есть финансовые, математические и тд, а выбрать пользовательские не могу, ибо нет такого. софт 2010
можно подробнее, где ввести макрос? Я пытался найти где написано udf или пользовательский макрос и в списке функций его нет, там есть финансовые, математические и тд, а выбрать пользовательские не могу, ибо нет такого. софт 2010ask95
Вот здесь инструкция в самом низу про пользовательскую функцию http://www.planetaexcel.ru/techniques/3/59/ в прикрепленном файле эта функция добавлена на вашем примере и применена, посмотрите. [moder]Елена, будете нарушать Правила форума - накажу.
Вот здесь инструкция в самом низу про пользовательскую функцию http://www.planetaexcel.ru/techniques/3/59/ в прикрепленном файле эта функция добавлена на вашем примере и применена, посмотрите. [moder]Елена, будете нарушать Правила форума - накажу.Leanna
Эта функция не присутствует по умолчанию. Но как только вы её добавите в книгу она в алфавитном порядке при отображении всего списка формул, появится.
Эта функция не присутствует по умолчанию. Но как только вы её добавите в книгу она в алфавитном порядке при отображении всего списка формул, появится.Leanna
Лучше день потерять, потом за пять минут долететь!