{quote}{login=webley}{date=02.03.2011 09:48}{thema=}{post}Даже лучше так:  
=ПОДСТАВИТЬ(ЛЕВСИМВ(B2;ПОИСК(" РУБ";B2)-1);СИМВОЛ(160);"")*1{/post}{/quote}  
 
а в чем принципиальная разница?    
 
ЗЫ спасибо за оперативность!

{quote}{login=Светлана В}{date=02.03.2011 09:43}{thema=}{post}Подскажите, а у вас пробелы между цифрами - это так и будет?{/post}{/quote}  
 
скорей всего да чем нет

есть список товара, и вот такая корявая цена, в примере видно.    
какой формулой можно преобразовать 2й столб чтоб осталась цена до слова РУБ

Большое спасибое!

Еще раз всем здрасьте!  
Хотел продолжить обсуждение в старой теме, но она помечена как решенная(закрыта), поэтому создам новую.    
Напомню суть - ""есть 2 файла... назовем их "коды" и "справочник". У меня в примере они для удобства будут как 2 листа. Так вот замысел состоит в том, чтоб при выделении какого нибудь кода из книги "коды" и нажатии кнопки(за которой и будет закреплен макрос) будет появляться окошко с описанием этого товара(в userform будет инф. из столбца "описание" в книге "справочник"). Файл Справочник находится всегда в одном месте(к примеру на С:\work). ""  
- этот вопрос был решен, сейчас его просто надо доработать.    
Сейчас вопрос в том чтоб добавить в UserForm поле цена. В это поле макрос должен вставлять данные из столбца ЦЕНА (в файле Справочник). В форме я создал доп. окошко Label99. проверка все также по коду. Напоминаю что лист "Справочник", это отд. файл, который постоянно нах-ся в одном месте.(в макроcе путь к нему закомментирован)

Еще раз всем здрасьте!  
Ранее создавал тему. вот сейчас продолжение. Напомню суть - есть 2 файла... хотя это все написано в первом посте ветки. Сейчас вопрос в том чтоб добавить в UserForm поле цена. В это поле макрос должен вставлять данные из столбца ЦЕНА (он нах-ся в файле database1). В форме я создал доп. окошко Label99. проверка все также по коду. Напоминаю что лист "Справочник", это отд. файл, который постоянно нах-ся в одном месте.(в макроcе путь к нему закомментирован)

Спасибо за оперативность, помогло!

подскажите как избавиться от лишних символов (пример ниже).    
Имею ввиду квадраты в строке наименований, которые видимо означают символ ENTER, т.е. переносят остаток строки на новую строку. если через формат ячеек убрать галку "переносить по словам" во вкладке "выравнивание", то вид вроде бы улучшается, но квадраты остаются. И в дальнейшем при редактировании опять переносят текст на нов строку. Получается корявый список. Собсно вопрос в том чтоб убрать их вообще и поставить пробел.    
сам вижу что не совсем понятно объяснил, в примере более наглядно все показано.

вот пример

то The_Prist    
 
у меня тут возник вопрос - почему при запуске макроса и выводе формы все начинает тормозить - пример на картинке, хотя при исп формы от webley ничего подобного не происходит.

{quote}{login=The_Prist}{date=12.05.2010 11:11}{thema=Re: }{post}{quote}{login=korobka}{date=12.05.2010 10:49}{thema=}{post}вопрос остается открытым{/post}{/quote}Вы бы в файле хоть какую-нибудь формочку нарисовали.{/post}{/quote}  
 
буду стараться )

Огромное спасибо, подправил, все работает, очень облегчило жизнь

вопрос остается открытым

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

Добрый день.    
Можно ли осуществить с пом VBA сей замысел: есть 2 файла, назовем их "коды" и "справочник". У меня в примере они для удобства будут как 2 листа. Так вот замысел состоит в том, чтоб при выделении какого нибудь кода из книги "коды" и нажатии кнопки(за которой и будет закреплен макрос) будет появляться окошко с описанием этого товара(в userform будет инф. из столбца "описание" в книге "справочник"). Файл Справочник находится всегда в одном месте(к примеру на С:\work).    
 
Не ругайтесь, если я тут сильно намудрил, жду Ваших предложений.

пойду почитаю ...

Спасибо за оперативность, все получилось.    
 
p/s/ С НАСТУПАЮЩИМ ДНЕМ ПОБЕДЫ ВСЕХ!!!

Владимир, Вы я так понял, мне предлагаете расчет процентов опять же по ф-ле, которую надо записывать вручную. Я же хотел узнать как эту ф-лу(не Вашу, а мою - там важны дробные части) записать в макрос. Чтоб потом добавить его в список часто используемых и вводить формулу нажатием на кнопку.  
И еще момент - знак +.- перед процентами важен (чтобы видеть больше цена или меньше), так как цены второго магазина приоритетные.

есть 2 столбца ценами магазина A и B. в столбце С - разница в процентах.  
как ф-лу =(B1-A1)/B1*100 записать в макрос?

ок спасибо, поменял, попробовал, все работает!

а что изменить в макросе чтоб данные из листов-оригиналов не вырезались, а просто копировались в нов список?

103 спасибо за потраченное время

Нашел тему как скопировать из разных книг в одну. А вот что бы в одной книге с кучей листов скопировать данные со всех листов и вставить в новый - такого че то не нашел. Может пропустил. И тем не менее.  
Имеется книга с 10-15 листами, в каждом листе - однотипная информация: товар, наличие, цена. Количество столбцов в каждом листе одинаковое. А количество строк везде разное. Задание следующее: скопировать(вырезать) данные с листов и вставить в новый одним списком. Желательно без пустых строк. Пока это делается с пом. Ctrl+C и Ctrl+V.    
 
Буду рад услышать Ваши предложения, Спасибо.

{quote}{login=}{date=08.04.2010 11:24}{thema=}{post}Просто вставьте перед этой строчкой пропуск ошибки{/post}{/quote}  
все гениальное просто!  
   
Большое спасибо всем кто отозвался, вы ОЧЕНЬ помогли.    
PS-Отдельное спасибо Igor67

ок, большое спасибо, все работает.    
 
Но есть один момент. Когда в списке "то что надо выделить"(лист2) попадается значение которого нет в "ВЕСЬ СПИСОК"(Лист1), макрос выдает Run-time error 1004 а ниже написано "Не найдено ни одной ячейки, удовлетворяющей указанным условиям", останавливается на строке  ->  For Each cc In Range(Cells(2, 1), Cells(lRow, 1)).SpecialCells(xlCellTypeVisible).  
 
  Можно ли сделать так, чтоб макрос не ругался, а просто пропускал эти значения.

надеюсь на вашу помощь

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

To Igor67:  
В принципе то что надо, вот только единицы должны стоять в одном столбце(весь перечень товара в столбце А, а еденицы, которые выделяют "ненужный" товар - в следующем столбце В). Это нужно для того чтоб потом отфильтроваться по еденицам (в столбце В) и далее работать со списком товара который помечен еденицами.

ОК.    
На 1 листе ВЕСЬ_СПИСОК, на 2м - соответственно то что надо выделить(но не удалить). Пока это делается так: из 2лист копир значение ячейки, переход на 1л, там в столбце ставлю фильтр по зн-ю (фильтр - "содержит"), и полученный список выделяю(в след. столбце ставлю 1). И так весь список(7000-8000 позиций). Согласитесь - нудно.

Доброго времени суток.  
Подскажите как можно автоматизировать "сортировку" списка товара(напр. комп. магазина).Есть полный перечень товара вида ""Монитор LCD Acer X233HAb [1920x1080 DC 80000:1]"" в котором сначала идет вид товара, затем брэнд, модель, и ее характеристики. Список довольно большой. И есть список (вернее части наименований - отдельно вид "Сканер", или брэнд "Samsung", которые проверять_не_надо).
Вопрос такой: как сделать так, чтоб во ВСЕМ списке автоматически убрать то, что НЕ_НАДО.