Здравствуйте. Сильно не бейте, но поиск не помог мне в решении проблемы... Есть прайс лист. Задача состоит в том, что каждому значению ячейки (артикулу товара по прайсу) будет соответствовать определенное значение, которое запишется в свободный столбец той же строки. Например, значениям в первом столбце "57762 57763 57764 57765 33113 41632 41633 55787" соответствует значение 0,91, другим "55784 55785 55786 53950 53951 53952 53953 33114 33115" - 0,8, должны записаться в соответствующую строку столбца 6. Сложность в том, что привязать значение необходимо не к конкретным ячейкам, а к значению ячеек, то есть, чтоб выполнялся поиск по всему массиву 1 столбца. Как сделать формулой, подскажите пожалуйста. p.s. В идеале необходимо найти артикул, присвоить нужный коэффициент (0,8 или 0,91) и умножить цену из столбца 3 на него и результат записать в 6 столбец
Здравствуйте. Сильно не бейте, но поиск не помог мне в решении проблемы... Есть прайс лист. Задача состоит в том, что каждому значению ячейки (артикулу товара по прайсу) будет соответствовать определенное значение, которое запишется в свободный столбец той же строки. Например, значениям в первом столбце "57762 57763 57764 57765 33113 41632 41633 55787" соответствует значение 0,91, другим "55784 55785 55786 53950 53951 53952 53953 33114 33115" - 0,8, должны записаться в соответствующую строку столбца 6. Сложность в том, что привязать значение необходимо не к конкретным ячейкам, а к значению ячеек, то есть, чтоб выполнялся поиск по всему массиву 1 столбца. Как сделать формулой, подскажите пожалуйста. p.s. В идеале необходимо найти артикул, присвоить нужный коэффициент (0,8 или 0,91) и умножить цену из столбца 3 на него и результат записать в 6 столбецvip771983
Выдает сообщение, что больше 255 символов в формулу не вставить, предлагает воспользоваться функцией сцепить или оператором сцепление. А как его сюда добавить?
Выдает сообщение, что больше 255 символов в формулу не вставить, предлагает воспользоваться функцией сцепить или оператором сцепление. А как его сюда добавить?vip771983
У меня мысль возникла, можно ли так: в Книгу 2 копировать 1 столбец и подставить соответствующие значения для каждого артикула, а формула будет сравнивать значения из книги 2 со значениями Книги 1 и подставлять соответствующий коэффициент в свободную ячейку Книги 1
У меня мысль возникла, можно ли так: в Книгу 2 копировать 1 столбец и подставить соответствующие значения для каждого артикула, а формула будет сравнивать значения из книги 2 со значениями Книги 1 и подставлять соответствующий коэффициент в свободную ячейку Книги 1vip771983
Например, значениям в первом столбце "57762 57763 57764 57765 33113 41632 41633 55787" соответствует значение 0,91, другим "55784 55785 55786 53950 53951 53952 53953 33114 33115" - 0,8,
Коэффициентов только два: 0,91 и 0,8 ? И на основании чего они должны присваиваться?
Например, значениям в первом столбце "57762 57763 57764 57765 33113 41632 41633 55787" соответствует значение 0,91, другим "55784 55785 55786 53950 53951 53952 53953 33114 33115" - 0,8,
Коэффициентов только два: 0,91 и 0,8 ? И на основании чего они должны присваиваться?dyhes
Коэффициентов только два: 0,91 и 0,8 ? И на основании чего они должны присваиваться?
Коэффициентов около 10. Присваиваются они одинаковые в одной категории товара (одной марки). То есть товарам, которые начинаются с "PRO PLAN" присваивается коэф. 0,85 и т.д.
Коэффициентов только два: 0,91 и 0,8 ? И на основании чего они должны присваиваться?
Коэффициентов около 10. Присваиваются они одинаковые в одной категории товара (одной марки). То есть товарам, которые начинаются с "PRO PLAN" присваивается коэф. 0,85 и т.д.vip771983
Function Мяу(cl As Range) Dim arr, i& Const const1 = "~57762~57763~57764~57765~33113~41632~41633~55787" Const const2 = "~55784~55785~55786~53950~53951~53952~53953~33114~33115" Const Values = "0.9 0.8" arr = Array(const1, const2) For i = LBound(arr) To UBound(arr) If InStr(arr(i), cl.Value) Then Мяу = Val(Split(Values)(i)): Exit Function Next Мяу = CVErr("N/A") End Function
[/vba]
Как вопрос был задан недостачу вписать. [vba]
Код
Function Мяу(cl As Range) Dim arr, i& Const const1 = "~57762~57763~57764~57765~33113~41632~41633~55787" Const const2 = "~55784~55785~55786~53950~53951~53952~53953~33114~33115" Const Values = "0.9 0.8" arr = Array(const1, const2) For i = LBound(arr) To UBound(arr) If InStr(arr(i), cl.Value) Then Мяу = Val(Split(Values)(i)): Exit Function Next Мяу = CVErr("N/A") End Function
Function Мяв(cl As Range, Optional cena As Range) Dim arr, i& Const const1 = "~57762~57763~57764~57765~33113~41632~41633~55787" Const const2 = "~55784~55785~55786~53950~53951~53952~53953~33114~33115" Const Values = "0.9 0.8" arr = Array(const1, const2) For i = LBound(arr) To UBound(arr) If InStr(arr(i), cl.Value) Then Мяв = Val(Split(Values)(i)) If Not cena Is Nothing Then Мяв = Мяв * cena.Value Exit Function End If Next Мяв = CVErr("N/A") End Function
[/vba]
Можно и тут [vba]
Код
Function Мяв(cl As Range, Optional cena As Range) Dim arr, i& Const const1 = "~57762~57763~57764~57765~33113~41632~41633~55787" Const const2 = "~55784~55785~55786~53950~53951~53952~53953~33114~33115" Const Values = "0.9 0.8" arr = Array(const1, const2) For i = LBound(arr) To UBound(arr) If InStr(arr(i), cl.Value) Then Мяв = Val(Split(Values)(i)) If Not cena Is Nothing Then Мяв = Мяв * cena.Value Exit Function End If Next Мяв = CVErr("N/A") End Function
Я правильно делаю? =Мяв(RC[-5];RC[-3]) , а если значение не найдено, то значение в поле "ложь", куда прописать? [moder]Не правильно. Не нужно цитировать весь понравившийся пост.
Я правильно делаю? =Мяв(RC[-5];RC[-3]) , а если значение не найдено, то значение в поле "ложь", куда прописать? [moder]Не правильно. Не нужно цитировать весь понравившийся пост.vip771983
Сообщение отредактировал vip771983 - Пятница, 23.01.2015, 01:16
Чего-то не выходит так как надо, местами появляются #ЗНАЧ, не пойму почему. Уважаемый RAN могли бы вы мне помочь привести прайс к нужному виду? Конечно за р.
Чего-то не выходит так как надо, местами появляются #ЗНАЧ, не пойму почему. Уважаемый RAN могли бы вы мне помочь привести прайс к нужному виду? Конечно за р.vip771983
Сообщение отредактировал vip771983 - Пятница, 23.01.2015, 13:06
Чего-то не выходит так как надо, местами появляются #ЗНАЧ, не пойму почему. Уважаемый RAN могли бы вы мне помочь привести прайс к нужному виду? Конечно за р.
Чего-то не выходит так как надо, местами появляются #ЗНАЧ, не пойму почему. Уважаемый RAN могли бы вы мне помочь привести прайс к нужному виду? Конечно за р.vip771983
Сообщение отредактировал vip771983 - Пятница, 23.01.2015, 13:07
vip771983, здравствуйте! Если Вы хотите заказать работу, то Вам сюда, предварительно внимательно прочитав здесь Если на Ваше сообщение не ответил сразу тот человек к которому Вы обращались, то возможно он немного занят или отсутствует на месте этот значок отвечает за присутствие человека на сайте.
vip771983, здравствуйте! Если Вы хотите заказать работу, то Вам сюда, предварительно внимательно прочитав здесь Если на Ваше сообщение не ответил сразу тот человек к которому Вы обращались, то возможно он немного занят или отсутствует на месте этот значок отвечает за присутствие человека на сайте. VEKTORVSFREEMAN
"Опыт - это то, что получаешь, не получив того, что хотел"
Сообщение отредактировал VEKTORVSFREEMAN - Пятница, 23.01.2015, 13:49