Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 21.01.2009, 22:22   #1
Viento
Пользователь
 
Регистрация: 28.12.2008
Сообщений: 53
По умолчанию Преобразовать формулу в макрос

Добрый вечер. еще одна задачка.
Можете ли Вы по ниже представленной формуле преобразовать эти действия в макрос?

если(енд(впр(C1;Лист2!$B:$B;);""; смещ(Лист2!$C$1;поискпоз(A1;Лист2!$ B:$B-1;;)

Где C1 (на листе 1)- это значение которое нужно найти на листе 2 в столбце B.

найденный результат нужно вставить в C4 на листе1


PS: Данные для поиска будут располагаться только в первой строке начиная со столбца "С".

Спасибо!
Viento вне форума
Старый 22.01.2009, 05:21   #2
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Как связать две фразы:
Цитата:
C1 (на листе 1)- это значение которое нужно найти на листе 2 в столбце B.
и
Цитата:
Данные для поиска будут располагаться только в первой строке начиная со столбца "С".
???
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 22.01.2009, 07:11   #3
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Цитата:
Можете ли Вы по ниже представленной формуле преобразовать эти действия в макрос?
В принципе, всё можно сделать. Но зачем?

Если формула работает, то можно макросом записать её в нужную ячейку (ячейки)

PS: Поместите формулы в теги [CОDE] ... [/CОDE] - чтобы не появлялись смайлики.
Лучше прикрепите к сообщению пример файла.
EducatedFool вне форума
Старый 22.01.2009, 11:23   #4
slan
Форумчанин
 
Аватар для slan
 
Регистрация: 30.01.2008
Сообщений: 314
По умолчанию

а если нужно вставить только результат, то вычислить эту формулу с помощью evaluate и записать результат в нужную ячейку.
slan вне форума
Старый 22.01.2009, 11:25   #5
Viento
Пользователь
 
Регистрация: 28.12.2008
Сообщений: 53
По умолчанию

Добрый день EducatedFool!
Формула работает, вопросов нет. Но мне нужно чтобы в ячейках , где сейчас расположена эта формула, были полученные значения, а не формула.
Если можно превратите её в макрос, PLZ.
Вложения
Тип файла: rar Primer.rar (5.1 Кб, 29 просмотров)
Viento вне форума
Старый 22.01.2009, 11:32   #6
Viento
Пользователь
 
Регистрация: 28.12.2008
Сообщений: 53
По умолчанию

Добрый день SAS888!

Цитата:
C1 (на листе 1)- это значение которое нужно найти на листе 2 в столбце B.
Я рассмотрел здесь только 1 пример относительно столбца "С".

Данные для поиск будут располагаться следующим образом:
Цитата:
С1 D1 E1
Petrov Siforov Ivanov
и тд.
Viento вне форума
Старый 22.01.2009, 11:49   #7
Viento
Пользователь
 
Регистрация: 28.12.2008
Сообщений: 53
По умолчанию

Код:
если(енд(впр(C1;Лист2!$B:$B;;));"";смещ(Лист2!$A$1 ;поискпоз(C1;Лист2!$B:$B)-1;;;))
Viento вне форума
Старый 22.01.2009, 13:03   #8
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Я правильно понял?
Посмотрите вложение. Запустите макрос "Main".
Вложения
Тип файла: rar Primer_2.rar (10.1 Кб, 45 просмотров)
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 22.01.2009, 14:55   #9
Viento
Пользователь
 
Регистрация: 28.12.2008
Сообщений: 53
По умолчанию

Добрый день SAS888!
Все получилось с вашим вариантом макроса.

Скажите, а применить этот макрос к ниже представленному примеру можно? Я пытался сам подправить не получилось.
Принцип тотже, только не в строчку, а в столбец.
Вложения
Тип файла: rar Отчет.rar (10.0 Кб, 17 просмотров)
Viento вне форума
Старый 23.01.2009, 05:30   #10
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Примерно так.
Вложения
Тип файла: rar Отчет_2.rar (9.2 Кб, 37 просмотров)
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Преобразовать в дату Marvel Microsoft Office Excel 21 22.01.2009 06:42
Преобразовать текст в числовой olimpus Microsoft Office Excel 17 12.11.2008 07:58
Как преобразовать код SeRhy HTML и CSS 1 17.08.2008 15:50
преобразовать код С++ в С++.Net Alek86 Общие вопросы .NET 4 01.10.2007 12:00
ПРЕОБРАЗОВАТЬ malevich Общие вопросы Delphi 1 07.12.2006 21:08