всем большое спасибо  
Hugo - огромное спасибо

{quote}{login=NullUzer}{date=25.04.2011 12:43}{thema=Re: Re: Re: }{post}Dim rng As Range  
 
Set rng = Лист1.Rows("1:1").Find(What:="Начисленная брутто-премия (руб.)")  
 
Call Какой_никакой_макрос(rng){/post}{/quote}  
 
как выделить найденный столбец

задача:  
вычистить базу  
над каждым столбцом надо проделать "свою" чистку  
 
макрос должен обратиться к столбцу1 листа2, взять текст (=текст шапки/заголовка листа1) и провести чистку (другой макрос)    
 
и тд: макрос должен обратиться к столбцу1 листа2 2 ячейка...

{quote}{login=ikki}{date=25.04.2011 11:53}{thema=}{post}вы написали, что вам нужно получить столбец, с которым вы собираетесь работать в другом макросе.  
внимание, вопрос: откуда "другой макрос" должен узнать, с каким именно столбцом он должен работать?  
варианты (если исключить вмешательство телепатов и инопланетян) сводятся к двум: передать в этот макрос диапазон (столбец) или номер столбца.  
мой пример будет работать, если вы объявите    
Sub другоймакрос(x as Range)  
и будете обрабатывать в нём диапазон x{/post}{/quote}  
 
внимание, вопрос: откуда "другой макрос" должен узнать, с каким именно столбцом он должен работать?  
судя по всему вы написали код с ответом на этот вопрос или нет?  
если нет, то именно на него я и ищу ответ

{quote}{login=ikki}{date=25.04.2011 10:51}{thema=}{post}что именно не срабатывает?{/post}{/quote}  
 
Вы написали  
call другоймакрос®  
 
так не работает  
Application.Run "Книга1.xls!Макрос4"  
 
так ругается  
Call Макрос4®

спасибо за расклад)  
 
почему то не срабатывает  
Sub artart()  
Dim r As Range, s$  
s = ThisWorkbook.Worksheets("Лист1").[a1]
Set r = ThisWorkbook.Worksheets("Лист2").[1:1].Find(What:=s, LookIn:=xlValues, LookAt:=xlWhole, MatchCase:=True)
If Not r Is Nothing Then Set r = r.EntireColumn  
Application.Run "Книга1.xls!Макрос4"  
End Sub

{quote}{login=ikki}{date=25.04.2011 10:02}{thema=}{post}так?{/post}{/quote}  
 
ikki, нет - нужен макрос - который осуществляет поиск текста (шапки) и выполняет еще один макрос над столбцом  где находится найденный текст  
 
например:  
макрос:    
1.На листе1 надо найти текст "Начисленная брутто-премия (руб.)" (Лист2!A1)  
2.макрос должен определить в каком столбце находиться текст (=Лист1!A:A)  
3. выполнить другой макрос над этим столбцом

{quote}{login=NullUzer}{date=25.04.2011 09:57}{thema=Re: выполнение макроса над найденным по заголовку столбцом}{post}Какая-то непонятная задача... А поконкретней можно?{/post}{/quote}  
 
 
надо найти текст и выполнить макрос над этим столбцом где находится найденный текст.

Добрый день  
\Подскажите пожалуйста как выполнить макрос над столбцом, выявив его по тексту шапки

{quote}{login=maslov}{date=05.04.2011 03:15}{thema=}{post}???{/post}{/quote}  
Вераюфром мистр maslov?

а что за программа проверки

Владимир, я тоже не ошибся.)

{quote}{login=:)}{date=19.03.2011 02:15}{thema=}{post}{quote}{login=artart}{date=19.03.2011 02:08}{thema=Re: }{post}Диапазон Мест.хр. начинается со 2-й строки, поэтому нужно СТРОКА(ТМЦ)-1{/post}{/quote}  
не помогло..{/post}{/quote}  
Виктор  уточнял, что должна быть не просто формула, а формула МАССИВА (Ctrl-Shift-Enter)  
=ИНДЕКС(Мест.хр.;МАКС(ЕСЛИ((F2=ТМЦ)*(G2=код);СТРОКА(ТМЦ)-1)))  
 
Результат:  
ТМЦ ... код ... Мест.хр.  
шкаф ... 4 .... кв.2{/post}{/quote}  
точно - спасибо

{quote}{login=}{date=19.03.2011 02:01}{thema=}{post}{quote}{login=artart}{date=19.03.2011 01:49}{thema=}{post}=ИНДЕКС(Мест.хр.;МАКС(ЕСЛИ((F2=ТМЦ)*(G2=код);СТРОКА(ТМЦ))))  
значения возвращает неверные..{/post}{/quote}  
Диапазон Мест.хр. начинается со 2-й строки, поэтому нужно СТРОКА(ТМЦ)-1{/post}{/quote}  
не помогло..

{quote}{login=Владимир}{date=19.03.2011 01:52}{thema=}{post}Кстати, я искал в поиске ответ на свой запрос... А тут, artart.. Ошибся видимо темой...{/post}{/quote}  
 
Владимир, я попытался самостоятельно ответить на вопрос создателя темы, потому как хочу научиться  
В след. раз учту что надо создавать новую тему..

vikttur, формула работает    
=ИНДЕКС(Мест.хр.;МАКС(ЕСЛИ((F2=ТМЦ)*(G2=код);СТРОКА(ТМЦ))))  
- но значения возвращает неверные..

{quote}{login=vikttur}{date=18.03.2011 11:05}{thema=}{post}1. Создайте список уникальных на листе.  
2. Не работает, потому что хотите найти максимальное в массиве, состоящем из  значений ЛОЖЬ и одного текстового значения:  
=МАКС({ЛОЖЬ:ЛОЖЬ:ЛОЖЬ:ЛОЖЬ:"кв.2":ЛОЖЬ})  
Формула массива:  
=ИНДЕКС(Мест.хр.;МАКС(ЕСЛИ((F2=ТМЦ)*(G2=код);СТРОКА(ТМЦ)))){/post}{/quote}  
vikttur, спасибо за разъяснения  
 
 
1. Возможно ли формулой массива вернуть уникальные значение?  
 
 
Юрий М - нет, спасибо - интересует решение именно через формулу.  
 
офф. - по правилам форума мне надо было создать новую тему или как в данном случае можно поднимать старые?

нарисовал пример - попытался решить - пока не получается  
вопросы:  
как сделать выпадающий список уникальным в F2  
почему не работает формула массива в H2

{quote}{login=ratboy}{date=15.03.2011 08:19}{thema=}{post}К чертям сайты, сделайте здесь нормальный движок форума...{/post}{/quote}  
дело хозяйское  -если хозяин посчитает нужным - готов помочь

{quote}{login=ZVI}{date=18.03.2011 12:43}{thema=}{post}  
...См. вложение{/post}{/quote}  
 
 
ZVI разбирал Ваш пример, в попытках применить на своем примере  
http://www.planetaexcel.ru/forum.php?thread_id=25550  
могли бы Вы мне помочь - хотелось бы посмотреть на ваше решение

название браузера - ишак  
потому как ишак с офисом  из одной фермы

Калькулятор КАСКО  
пользователь выбирает марку модель (см.post_208926.rar) - выбранным значениям возвращается тариф  
 
А в данном случае - это табличка франшизы.  
Франшиза зависит от типа авто -B2 (4 =легковые иномарки) и стоимости авто G2  
пользователь выбирает тип авто, марку модель, указывает стоимость авто - после чего должна появиться возможность выбора франшизы используя данную таблицу - вид которой нельзя изменить потому как является точной копией основного калькулятора, реализованного через аксес ))

Видимо никак) Просто хотелось покомпактнее, в рабочей книге сотня диапазонов  
Ваше решение близко к тому что требовалось - спасибо большое

Интересно, а можно както все 6 диапазонов объединить в один?

в листе динамичные данные - те что помечены красным,  
например если в B2 поменять значение с 4 на 5 то формула массива не работает..

конечно вы не правы, смотрите выше - post_208926.rar

вот, вспомогательные данные - минимум и максимум требуемого диапазона (C1:D2)

ух спасибо - но не то - (выше есть аналог)  
 
вот такой формулой массива =МИН(ЕСЛИ((B2=B4:B61)*(F4:F61<=G2)*(G4:G61>=G2);C4:C61)) найдется первая ячейка из необходимого диапазона  
 
я знаю только одну формулу - такого вида, котрая выводит диапазон по заданному критерию:  
=СМЕЩ($AS$3;ПОИСКПОЗ($M$2;$AV$4:$AV$350;0);1;СЧЁТЕСЛИ($AV$4:$AV$350;$M$2);1)  
где СЧЁТЕСЛИ=высота - число требуемых ячеек  
 
как же вывести требуемый диапазон, если критериев несколько? как =МИН(ЕСЛИ(... -только диапазон

{quote}{login=kalle}{date=16.03.2011 01:13}{thema=Re: Re: Вновь о курсах валют}{post}{quote}{login=rushh}{date=16.03.2011 01:11}{thema=Re: Вновь о курсах валют}{post}а на ленте "данные" -> "из веба" не работает?{/post}{/quote}  
Почему-то заносятся какие-то другие сведения, а не валюта{/post}{/quote}  
парсите всю страницу, ишак ведет себя порой неадекватно)  
 
правой кнопкой - обновить данные

сорри