JayBhagavan,  как раз то что нужно!!!
Sanja, Вашей формулой вставляется текст, а не ошибка.

Добрый день!
Есть две ячейки, А1 и В1. В каждой ячейке может быть одно из трех значений ("нет", "частично", "да" .  Нужно составить формулу, которая сравнит А1 и В1 и если хотя бы одна из них ="нет", то вернуть ошибку, в ином случае отобразить сумму С1 и D1

Под ошибкой понимается не просто текст "Ошибка" а именно ошибки которые обозначаются #Ошибка! или #Знач! или тому подобное.

Добрый день!
Файл во вложении. На вкладке частн. показатели не работает группировка строк (Данные - Группировать)
На других листах все ок, а именно на этом не хочет. В чем проблема может быть?

Добрый день!  
Есть лист1 и лист2. В первом листе встроке А идут объеденинные парой ячейки АВ СВ EF... Нужно с листа2 значение ячейки А1 поставить в объедененную ячейку АВ листа1, А2 в СВ и т.д. Так чтоб множно было протягивать потом. А то обычным протягиванием не получается, Пример приложил.

Спасибо!  
Не то чтоб разжевать, но хотя бы основу дать, чтоб было направление куда думать и где копать.

{quote}{login=слэн}{date=16.01.2012 09:32}{thema=}{post}а как вносятся изменения? кем, в какие ячейки... вообще поподробнее о действиях{/post}{/quote}  
3 столбца (Дата Время Описание)  
Собственно добавляют новую строку - пишут дату, время и описание.  
Если редактирование старой записи, то  поменяют дату и\или время.

{quote}{login=The_Prist}{date=12.01.2012 12:27}Так может на изменения определенных данных и повесить запуск? На событие изменения листа с указанием определенного диапазона, например.{/post}{/quote}  
Там будут записи, типа что нужно сделать в определенное время. Ну вот для примера первая строка    
12.01.2012 12-00 Позвонить Ивану Ивановичу  
нужно чтоб он не с утра один раз напомнил, а в это время, ну или чуть раньше.  
По идее если запускать каждые 10-15 мин, то нормально думаю получится.  
Вопрос сейчас такой - вот в первом столбе идет дата.  
К примеру  
12.01.2012  
12.01.2012  
13.01.2012  
13.01.2012  
14.01.2012  
15.01.2012  
И предположим сегодня 13 число. Как сделать чтоб макрос обрабатывал только строки с датой 13.01.2012?

Добрый день!  
Есть файл эксель с полями (Дата Время Описание) - файл вложен  
 
Нужно чтоб макрос запускался при открытии книги и через определенные промежутки времени, проверял есть ли записи с текущим временем, и если есть, то выдавал сообщение.  
 
Пока дошел только до того чтоб циклом прогнать все записи, выбрать нужные и вывести их через MsgBox.  
Но пораскинул мозгами и появились вопросы:  
1. Записи ведь будут копиться, то есть время для макроса будет расти. Это плохо!  
2. Если делать поиск только по текущему дню,то как тогда организовать это все?  
3. Пробовал ставить интервал в минуту для теста, но тогда если всплывает MsgBox, то пока его не закроешь, то макрос дальше работать не будет. Может есть альтернатива MsgBox?  
 
Последними строками как я понимаю должно быть примерно так? Только в MsgBox будет передаваться переменная со всем текстом  
MsgBox "12.01.2012 12-00 Позвонить Ивану Ивановичу"  
Application.OnTime Now + TimeValue("00:00:10"), "Auto_Open"

{quote}{login=Hugo}{date=21.12.2011 01:24}{thema=}{post}Теперь начинаю понимать, что  "все которые к нему относятся" - это строки без фамилии под фамилией. Хотя на 100% не уверен...  
Проясните?{/post}{/quote}  
Да, так первый столбец это порядковый номер, если для каждой фамилии несколько строк, то у всех этих строк в столбце А один номер. Для рашова это 6.  
 
Тот код который приведен вроде работает, буду тестировать на реальных данных. Спасибо.  
А можно как то сохранить форматирование? раскраску или хотя бы ширину столбцов.

{quote}{login=Hugo}{date=21.12.2011 01:02}{thema=}{post}Т.е. нужно выбрать все строки с новыми фамилиями? Пустые строки копировать не нужно, т.е. 6 0 - это косяк?{/post}{/quote}  
Это не косяк, вторые строки появляются если в поле DESCRIPTION идет перенос текста, сделано для удобочитаемости видимо. Там может быть и пара слов, в таком случае будет одна строка как для иванова, а может и 2-3 предложения, вот тут и появляются вторые и третьи строки  
{quote}{login=Hugo}{date=21.12.2011 01:02}{thema=}{post}  
Если данных много (да и вообще так правильнее) сперва заносим фамилии первого листа в словарь или коллекцию, затем второй лист проверяем по этому списку.{/post}{/quote}  
Таблица на 4-5 тыс строк. Вот про коллекцию поподробнее, как сделать так чтоб для рашова выцепить не только ту строку где его фамилия, а все которые к нему относятся

очень просто в первом файле 6 имен, во втором 7. То есть вот этот Рашов вклинился между Селиным и Кировым. Тут немного мой косяк, дело в том что в оригинале фамилии в алфавитном порядке, поэтому если добавляются новые то у тех что ниже ясное дело меняется номер порядковый.  
Я понимаю что нужно сравнивать по столбцу D - Name.  
Но как потом выцепить все строки, которые к нему относятся?

Добрый день!  
Есть лист1 с табличкой с именами (файл для примера прикрепил). На листе 2 такая же таблица, но дополненная. Нужно чтоб новые строки таблицы выносились на третий лист.  
Поиск использовал, но у меня специфичность таблицы в том, что для одного человека может быть несколько строк. В примере есть такие.  
Подскажите как сделать?

Извиняюсь за размер, тоже не заметил. Удалил данные почти все, но видно где-то упустил. Сейчас удалил все вообще кроме данных, получился 50 кб. В след раз буду аккуратнее. За помощь спасибо, написал цикл, по сути вот этот кусок кода и нужен был.  
 
Set rFndRng = mySheetTovar.Columns("B:B").Find(What:=curEAN, LookIn:= _  
xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False)  
If Not rFndRng Is Nothing Then  
 
Огромное спасибо! Вопрос решен

{quote}{login=Казанский}{date=26.11.2011 06:13}{thema=}{post}Может, добавить цикл, который пробежится по всем ячейкам и поменяет названия?  
А те, что не найдет - покрасит красным?{/post}{/quote}  
Думаю можно сделать цикл, только красить необязательно, да и не нужно. Если он заполнит наименование, изготовителя и страну, то по пустым полям в последних двух колонках видно будет где не переименовал.

{quote}{login=AKSENOV048}{date=26.11.2011 05:56}{thema=}{post}on error reume next в начале макроса это не выход из проблемы?{/post}{/quote}  
Не выход, в таком случае он ставит значение из первой строки, в данном примере слово ЕСН.  
 
{quote}{login=The_Prist}{date=26.11.2011 06:04}{thema=}{post}Может так?  
{/post}{/quote}  
Отлично, все работает, а возможно доработать код чтоб он еще заполнял Изготовителя и страну вдобавок?

Добрый день!  
Написал макрос. Файл с примером приложил. Буду объяснять по нему.  
Макрос FindEAN. Макросу назначено сочетание клавиш Ctrl+Shift+F  
В листе Прайс-в-XML встаем на первую строчку с наименованием. Сейчас там какой-то текст.  
Нажимаем сочетание клавиш, макрос берет значение из столбца Штрихкод, переходит на лист Товары, ищет в столбце В данное значение и в переменную ESN записывает соответствующее значение из столбца А.  
Но если макрос натыкается на значение которого нет в столбце В листа Товары то вываливает ошибку Run-time error '91': Object variable or With block variable not set  
Нужно чтоб если натыкался на такое значение, то не менял Наименование в листе Прайс-в-XML  
Подскажите где ошибка.  
 
Текст макроса  
 
Sub FindEAN()  
' Макрос записан 26.11.2011  
' Сочетание клавиш: Ctrl+Shift+F  
 Dim mySheetPrice As Worksheet  
 Dim mySheetTovar As Worksheet  
   
 Set mySheetPrice = ActiveWorkbook.Worksheets("Прайс-в-XML")  
 Set mySheetTovar = ActiveWorkbook.Worksheets("Товары")  
   
 curname = ActiveCell.Value  
 curEAN = ActiveCell.Offset(0, 4).Value  
 mySheetTovar.Activate  
 mySheetTovar.Columns("B:B").Select  
 Selection.Find(What:=curEAN, LookIn:= _  
   xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _  
   xlNext, MatchCase:=False, SearchFormat:=False).Activate  
 ESN = ActiveCell.Offset(0, -1).Value  
 mySheetPrice.Activate  
 If ESN <> "" Then ActiveCell.Value = ESN  
 ActiveCell.Offset(1, 0).Activate  
End Sub  
 
<EM><STRONG>Файл удален</STRONG> - велик размер - [<STRONG>МОДЕРАТОРЫ</STRONG>]</EM>

Добрый день!  
Столкнулся с проблемой, есть список, в котором значение в ячейке разбито как будто знаком конца строки. То есть в ячейке вот так написано  
 
Наклейки самоклеющиеся витражные 30x38  
Новогодние A06023,06025 49127 J.Otten  
 
Нужно как то сделать чтоб было все в одну строку  
Наклейки самоклеющиеся витражные 30x38 Новогодние A06023,06025 49127 J.Otten  
 
Пробовал нажать кнопку Перенос строки на панели инструментов, но тогда в ячейке получается  
Наклейки самоклеющиеся витражные 30x38Новогодние A06023,06025 49127 J.Otten  
А в строке ввода вообще все без изменений.  
 
Файл с примером как есть и как должно быть прикрепил. Подскажите как быть. Вручную не вариант так как список огромный.

{quote}{login=Микки}{date=08.09.2011 10:02}{thema=}{post}=ВПР(G12;[Price.xls]Sheet1!$D$1:$E$5;2;0) Если без кода{/post}{/quote}
Спасибо, все прекрасно работает.

Добрый день!  
Стоит такая задача. Есть файл Price.xls в котором список книг с кодом, наименованием, код EAN и краткое наименование. В нем будет список всех книг которые были, список будет пополняться.  
Еще есть файл List1.xls, который представляет собой накладную.    
Нужно Наименование из List1.xls заменить кратким наименованием из Price.xls если поля EAN у них совпадают.  
Я так понимаю надо в файле Price.xls брать значение поля EAN, искать такое же значение в файле List1.xls и делать соответствующую замену.  
Подскажите код, или ткните в тему где подобное разбиралось.

Здравствуйте! Подскажите как в таблице закрасить каждую вторую строку? В таблице время от времени добавляются или удаляются строки. Поэтому раскраска вручную приводит к тому что после изменения могут идти несколько строк одинаково раскрашенных или нет. может макрос какой или еще что посоветуете?