спасибо за ответ супер работает !

в 1 столбце дубликатов нет во 2 тоже не будет  
только есть совпадения значений в столбцах 1 и 2 которые надо исключить

Помогите пожалуйста с макросом который бы выполнял простую задачу  
есть столбец 1 и 2 с данными  
в столбец 3 нужно вывести данные из столбца 1 которые НЕ совпадают с данными из столбца 2  
 
Заранее благодарен

GIG_ant  чего-то не работает

Cells(Rows.Count, ActiveCell.Column).End(xlUp).Offset(1).Select  
 
вроде получилось так  
 
а как то проще можно ?

последний вопрос касающийся активной ячейки  
как правильно написать чтоб при выделении заполненной ячейки в столбце и запуске макроса макрос нашел 1-ю незаполненную ячейку в столбце  
 
Sub Zzz()  
ActiveCell.Offset(......., 0).Select  
End Sub  
 
что нужно написать в ....  ?

спасибо

еще вопрос по поводу ячейки    
как прописать условие Если активная ячейка НЕпустая    
 
как пустая так  
If ActiveCell.Value = "" Then  
 
а как НЕпустая ?

благодарю спасибо

так попробовать ActiveCell.Offset(0, -1).NumberFormat = "h:mm;@" ?

как будет выглядеть команда в макросе такая  
присвоить требуемый формат ячейке стоящей левее активной ячейки  
 
как присвоить формат активной ячейке вроде понятно например ActiveCell.NumberFormat = "h:mm;@" и как влево смещение ActiveCell.Offset(0, -1).Select    
 
а вот как одной строкой ?

просмотрел что делать

чето большой просмотрел извините щас

ваш пример по двойному клику в D3:D100  
<EM><STRONG>Файл удален</STRONG> - велик размер - [<STRONG>МОДЕРАТОРЫ</STRONG>]</EM>

вот  
<EM><STRONG>Файл удален</STRONG> - велик размер - [<STRONG>МОДЕРАТОРЫ</STRONG>]</EM>

перепутал правильно Like присутствие символа правильно

работает (еще раз спасибо)и по ходу еще вопрос возник    
Len пишем когда ищем присутствие символа  
а какой оператор или код определяет ОТСУТСТВИЕ символа ?

спасибо буду пробовать

добавил - по выделению ячейки с текстом макрос должен срабатывать

как сделать макрос по условию    
если в тексте ячейки встречается символ $ то выполняется макрос1  
если в тексте ячейки встречается слово руб то выполняется макрос2  
если нет $ и руб то выполняется макрос3

поставьте себе календарь нормальный с форматированием ячейки быстро все

еще немного поправил

переделал калькулятор сделал с TextBox  сброс значений поставил  
 
осталось 3 штриха  
- по кнопке "Вставка строкой" вставлялся такой текст из буфера обмена  
Итого на сумму 45 676,00 (Сорок пять тысяч шестьсот семьдесят шесть) руб 00 коп, в том числе НДС = 6 967,53 руб    
- по кнопке "Вставка таблицей" вставлялся такой текст из буфера обмена  
Сумма без НДС:38 708,47р.  
НДС:6 967,53р.  
Сумма с НДС:45 676,00р.  
- как в итогах данных после вычислений точку-разделитель дробных заменить на запятую  
- после сброса показывал 0,00 с запятой а не 0

причем вставить строкой например  
Итого на сумму 45 676,00 (Сорок пять тысяч шестьсот семьдесят шесть) руб 00 коп, в том числе НДС = 6 967,53 руб из числа

смысл в том чтоб сразу вставить можно было в документ данные

Вот такой калькулятор который НДС считает хотелось бы чтоб вычисления копировал и вставлял по кнопке