Вопросец пpо Arrays in Excel

[vova7777]

Сообщение от maxiiiim

А шо
A1=vlookup(1,D:E,2,0)

не катит?

а шож вы раньше не сказали. vlookup не просто какит. vlookup летает! Спасибо Макс!

[Юм-Юм]

Сообщение от vova7777

Единственная проблема с предложенным кодом: если в колонке с информацией не информация а ссылка на информацию то ничего не получается.

Тогда строку strannoe = ws.Cells(i, 5).FormulaR1C1
Нужно записать как strannoe = ws.Cells(i, 5).Value

Юм-Юм добавил 12.07.2010 в 23:05

Сообщение от vova7777

vlookup не просто какит. vlookup летает!

Я хотел бы предупредить Вас о двух проблемах, связанных с vlookup

1. Русскоеязычный Excel может ею поперхнуться, потому что в нём надо писать =ВПР( 1;D:E;2;0 )

2. Если единицы не будет в стоблце D, функция вернёт "значение недоступно"

[maxiiiim]

Сообщение от Юм-Юм

1. Русскоеязычный Excel может ею поперхнуться, потому что в нём надо писать =ВПР( 1;D:E;2;0 )

2. Если единицы не будет в стоблце D, функция вернёт "значение недоступно"

a1=if(iserror(vlookup(1,d:e,2,0)),"Net adinichki",vlookup(1,d:e,2,0))

Ышчо мона использовать комбинацию index и match

[Юм-Юм]

Сообщение от maxiiiim

a1=if(iserror(vlookup(1,d:e,2,0)),"Net adinichki",vlookup(1,d:e,2,0))

Для англоязычного Эксела это решение проблемы.

А я когда-то писал коммерческую программу на Экселе
Давно это было -- вот уже 15 лет назад. Но проблема локальных версий -- в том же состоянии. И только Васиком и лечится.

[Yury]

Может я чего путаю,но вроде lookup функции ожидат, что данные отсортированы, а если ей подсунуть не отсортированые - то как повезет, может правино сработать, а может и нет. Нет возможности проверить.

[maxiiiim]

Сообщение от Yury

Может я чего путаю,но вроде lookup функции ожидат, что данные отсортированы, а если ей подсунуть не отсортированые - то как повезет, может правино сработать, а может и нет. Нет возможности проверить.

Это если вы тыкните адиничку в последний параметр см Help - другая задача
А с 0 - не нужно сортировки

[vova7777]

Что-то этот vlookup слабо понимает формат цифр. Прям мистика какаято.
В данном примере, если у меня вместо единицы "-460" и эту -460 Обязательно нужно найти самую первую попавшейся сверху в низ.
Formula выдаёт результат не от превой попавшейся-460 а от random НО если я удалю -460 и напишу опять -460 там где удалил, то всё работает сверху в низ. Почему и как сделать так чтоб выдавало результат от самой первой попавшейся -460?

воссоздать пробовал, не получилось. поэтому прикрепляю sample.

http://rapidshare.com/files/41048066...up-format.xlsx
или вот
http://hotfile.com/dl/59165440/41404...rmat.xlsx.html

[Юм-Юм]

Не вернуться ли к варианту с Васиком?

[vova7777]

Если под васиком имелось Visual Basic.net то я хотел бы максимально упростить все процессы и посторатся сделать одной строчкой то что можно сделать одной строчкой.
Вопрос остаётся открытым, возможно как-то специально отформатировать данные чтоб они обновлялись в vlookup и поиск -460 шел по порядку? Ведь если просто нажать на любое -460 число указаноe ранее по порядку в ячейке то формула начинает обновлятся. Как так?

[maxiiiim]

Выделите С столбец, Menu -> Data->Text to Columns
Выбираем делимитед -> Next -> выключаем Все ->Finish

Дело в том что некоторые из Ваших -460 Текст а не цифры

[vova7777]

Работает. Формат колонки=number я так понимаю не достаточно для Excel. A как тогда узнать текст или число введено в колонку?

[Юм-Юм]

Сообщение от vova7777

Если под васиком имелось Visual Basic.net

Имелся ввиду VBA. Без .NET

Сообщение от vova7777

то я хотел бы максимально упростить все процессы и посторатся сделать одной строчкой то что можно сделать одной строчкой.

Если зайдёте в тупик (удивлюсь, если этого не произойдёт!) -- напишите мне ПС. Всё решим.

А сейчас не буду убеждать, что "надо усложнять, чтобы всё стало проще, а не упрощать, чтоб в итоге всё стало сложней" (с)
Я и сам в своё время в это не верил. Но, видимо, должна быть набита не только рука, но и морда

[maxiiiim]

Сообщение от Юм-Юм

Имелся ввиду VBA. Без .NET


Если зайдёте в тупик (удивлюсь, если этого не произойдёт!) -- напишите мне ПС. Всё решим.

А сейчас не буду убеждать, что "надо усложнять, чтобы всё стало проще, а не упрощать, чтоб в итоге всё стало сложней" (с)
Я и сам в своё время в это не верил. Но, видимо, должна быть набита не только рука, но и морда

Я бы в VBA не бросался на данном этапе
В эксэле достаточно быстрые и разнообразные встроенные функции.
Vova7777, как я понимаю - начинающий эксэЛЯписец
IMHO - VBA нужно начинать трогать когда точно знаешь что задачу не решить красиво стандартными средствами

[vova7777]

Сообщение от maxiiiim

Vova7777, как я понимаю - начинающий эксэЛЯписец

Ага. С Улыбкой и припрыжкой разводя руками "Аля Эксэляписец"

Сообщение от maxiiiim; Юм-Юм

должна быть набита не только рука, но и морда

Ничё, с/без мордобоя но прорвёмся.