Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
в ячейке две точки, но заменить надо только одну
 
#1
14.12.2011 13:01:45
знатоки, подскажите формулу как можно заменить:  
 
ПРГ 28.1.3-4т  
на    
ПРГ 28-1.3-4т  
 
т.е убрать первую точку.  
 
и если можно ПРГ 28-1,3-4т - те мы первую точку меняем на "-" а вторую точку на ","
 
 
 
#2
14.12.2011 13:08:13
=ПОДСТАВИТЬ(ПОДСТАВИТЬ(A1;".";"-";1);".";",";1)
 
 
 
#3
14.12.2011 13:21:40
НАКЛ_Р, КОМ/11/04173, 31.05.2011  
 
а надо:    
 
Расходная накладная № КОМ/11/04-173 от 31.05.2011  
 
пробовала через ПОДСТАВИТЬ, но не получилось
 
 
 
#4
14.12.2011 13:28:21
Извинтиляюсь, все работает!! Если бы вы знали как я промучилась полгода сначала делила текст по столбцам, потом вытаскивала нужное через ПРАВСИМВОЛ, потом заново сцепляла ...И всему этому я научилась на этом сайте ))))  
lika1, спасибо тебе за вопрос  
СПАСИБО создателю сайта и всем, кто отвечает. Живите долго и счастливо!
 
 
 
#5
14.12.2011 13:48:47
Я видимо поспешила радоваться. Взгляните, плиз, в прикрепленный файл. Я так понимаю, что нужно объеденить ЗАМЕНИТЬ и ПОДСТАВИТЬ, т.к. построчно ПОДСТАВИТЬ не меняет значения
 
 
 
#6
14.12.2011 14:10:50
{quote}{login=Карина}{date=14.12.2011 01:48}{thema=}{post}Я видимо поспешила...{/post}{/quote}  
Очевидно... :( Подставить используйте в одной формуле столько раз - сколько типовых блоков надо найти/заменить. Например: "=ПОДСТАВИТЬ(A10;"НАКЛ_Р, ";"Расходная накладная № ";1)", затем "КОМ/11/04" на "КОМ/11/04-"и т.д. И лучшее будет если эти блоки будут "заготовлены" в отдельной таблице... Правила рекомендуют давать пример максимально приближенный к реалиям по форматам и структуре... ;)  
-85304-
 
 
 
#7
14.12.2011 16:35:10
{quote}{login=Карина}{date=14.12.2011 01:28}{thema=}{post}Извинтиляюсь, все работает!! Если бы вы знали как я промучилась полгода сначала делила текст по столбцам, потом вытаскивала нужное через ПРАВСИМВОЛ, потом заново сцепляла ...И всему этому я научилась на этом сайте ))))  
lika1, спасибо тебе за вопрос  
СПАСИБО создателю сайта и всем, кто отвечает. Живите долго и счастливо!{/post}{/quote}  
полгода круто)) - нет, если первый час вижу - надо убыстрять- спрашиваю)))  
мне раньше с такими деталями тоже не приходилось сталкиваться, но я столько открыла нового для себя.    
спасибо сайту.
 
 
 
#8
14.12.2011 16:40:12
{quote}{login=Казанский}{date=14.12.2011 01:08}{thema=}{post}=ПОДСТАВИТЬ(ПОДСТАВИТЬ(A1;".";"-";1);".";",";1){/post}{/quote}  
 
спасибо, а не подскажите с макросом, если возможно:  
меняю часто "-" на пробел " "  
и каждый раз после разных букв, например ПРГ- или ПБ- вместо дефиса, ставлю пробел через подставить.  
а можно ли оч. несложный макрос, чтоб я могла в нем менять только значения к кот. относится "-"  
или если есть на сайте подобные примеры?
 
 
 
#9
14.12.2011 17:58:44
Sub МояЗамена()  
   If Selection.Cells.Count = 1 Then  
       MsgBox "Выделите несколько ячеек на листе!", vbExclamation, "Ошибка"  
       Exit Sub  
   End If  
   Selection.Replace What:="-", Replacement:=" ", LookAt:=xlPart  
End Sub  
 
 
В аргументе What:=  - указываете что будете менять  
В аргументе Replacement - на что будете менять  
 
См. файл
 
 
 
#10
14.12.2011 18:26:58
{quote}{login=Карина}{date=14.12.2011 01:48}{thema=}{post}Я видимо поспешила радоваться. Взгляните, плиз, в прикрепленный файл. Я так понимаю, что нужно объеденить ЗАМЕНИТЬ и ПОДСТАВИТЬ, т.к. построчно ПОДСТАВИТЬ не меняет значения{/post}{/quote}  
 
="Расходная накладная № "&ПОДСТАВИТЬ(ПСТР(A4;НАЙТИ(" ";A4)+1;9)&"-"&ПРАВСИМВ(A4;15);",";"")
"..Сладку ягоду рвали вместе, горьку ягоду я одна."
 
 
 
#11
14.12.2011 18:30:13
Добавляю "от":  
 
="Расходная накладная № "&ПОДСТАВИТЬ(ПСТР(A4;НАЙТИ(" ";A4)+1;9)&"-"&ПРАВСИМВ(A4;15);",";" от")  
 
-------  
83444
"..Сладку ягоду рвали вместе, горьку ягоду я одна."
 
 
 
#12
14.12.2011 22:09:46
МАКРОСИЩЕ!  
Выделить диапазон.  
Найти "ПБ-".  
Заменить на "ПБ ".  
Снять галку "ячейка целиком".  
Заменить ВСЕ.  
 
Можно конечно написать и макрос, но это не в пример проще и удобнее.
 
 
 
#13
15.12.2011 09:25:24
{quote}{login=Владимир}{date=14.12.2011 06:30}{thema=}{post}Добавляю "от":  
 
="Расходная накладная № "&ПОДСТАВИТЬ(ПСТР(A4;НАЙТИ(" ";A4)+1;9)&"-"&ПРАВСИМВ(A4;15);",";" от")  
 
-------  
83444{/post}{/quote}  
 
Работает!  
Сколько положительных эмоций Вы вызываете своими ответами, мне бы так.))) Спасибо
 
 
 
#14
15.12.2011 10:29:19
При неизменной структуре данных:  
="Расходная накладная № "&ЗАМЕНИТЬ(ПСТР(A4;9;50);10;5;"-"&ПСТР(A4;18;3)&" от ")  
="Расходная накладная № КОМ/11/04-"&ЗАМЕНИТЬ(ПСТР(A4;18;20);4;1;" от")
 
 
 
#15
15.12.2011 11:23:48
{quote}{login=vikttur}{date=15.12.2011 10:29}{thema=}{post}При неизменной структуре данных:  
="Расходная накладная № "&ЗАМЕНИТЬ(ПСТР(A4;9;50);10;5;"-"&ПСТР(A4;18;3)&" от ")  
="Расходная накладная № КОМ/11/04-"&ЗАМЕНИТЬ(ПСТР(A4;18;20);4;1;" от"){/post}{/quote}  
 
НАКЛ_Р, КОМ/11/041, 31.05.2011  
НАКЛ_Р, КОМ/11/0438, 31.05.2017  
НАКЛ_Р, КОМ/11/04120, 31.05.2015  
Вот в этом и проблема, что структура данных меняется. Вот эта формула сделала полдела  
=СЦЕПИТЬ("Акт приема-передачи № ";ЛЕВСИМВ(ПСТР(A7;9;23);9);" от ";ПРАВСИМВ(A7;10))получилось:    
Акт приема-передачи № КОМ/11/04 от 31.05.2015  
а сами номера 1,38,120 не могу правильно вытащить и сцепить, какую бы формулу не применила,нужно задать количество символов после 04 . Может можно как-то вытащить символы между "04 и ,", колько бы не было цифр между двумя этими знаками?
 
 
 
#16
15.12.2011 11:43:08
"НАКЛ_Р, КОМ/11/04" не изменяется?
 
 
 
#17
15.12.2011 11:46:33
Если не изменяется:  
="Расходная накладная № КОМ/11/04-"&ПОДСТАВИТЬ(ПСТР(A4;18;20);",";" от")
 
 
 
#18
15.12.2011 12:22:23
{quote}{login=vikttur}{date=15.12.2011 11:46}{thema=}{post}Если не изменяется:  
="Расходная накладная № КОМ/11/04-"&ПОДСТАВИТЬ(ПСТР(A4;18;20);",";" от"){/post}{/quote}  
Изменяется, на след. месяц будет:  
НАКЛ_Р КОМ/11/061, 30.06.2011  
НАКЛ_Р КОМ/11/071, 31.07.2011  
НАКЛ_Р КОМ/11/081, 31.08.2011
 
 
 
#19
15.12.2011 12:33:54
Пробуйте. А лучше бы пример со всемозможными вариантами выложили.  
 
=ПОДСТАВИТЬ(ПСТР(A4;1;17)&"-";"НАКЛ_Р, ";"Расходная накладная № ")&ПОДСТАВИТЬ(ПОДСТАВИТЬ(A4;ПСТР(A4;1;17);"");",";" от")
"..Сладку ягоду рвали вместе, горьку ягоду я одна."
 
 
 
#20
15.12.2011 12:38:05
<НАКЛ_Р КОМ/11/061, 30.06.2011>  
Уже без числа, которое нужно было отделять???
 
 
 
#21
15.12.2011 12:44:36
Эта формула с привязкой к слэшу, меньше будет возможных ошибок, если, к примеру отсутствуют знаки препинания:  
 
="Расходная накладная № "&ПСТР(A4;НАЙТИ("/";A4)-3;9)&"-"&ПОДСТАВИТЬ(ПСТР(A4;НАЙТИ("/";A4;НАЙТИ("/";A4)+1)+3;20);",";" от")  
 
... но два слэша быть обязаны и на своих местах.    
:))
"..Сладку ягоду рвали вместе, горьку ягоду я одна."
 
 
 
#22
15.12.2011 14:36:13
{quote}{login=vikttur}{date=15.12.2011 12:38}{thema=}{post}<НАКЛ_Р КОМ/11/061, 30.06.2011>  
Уже без числа, которое нужно было отделять???{/post}{/quote}  
 
НАКЛ_Р КОМ/11/061, 30.06.2011 должна стать Накладная № КОМ/11/06-1 от ....  
11- это год  
06,07, 08 - месяц  
1,2,3...663 - номера по порядку
 
 
 
#23
15.12.2011 14:57:54
{quote}{login=Владимир}{date=15.12.2011 12:44}{thema=}{post}Эта формула с привязкой к слэшу, меньше будет возможных ошибок, если, к примеру отсутствуют знаки препинания:  
 
="Расходная накладная № "&ПСТР(A4;НАЙТИ("/";A4)-3;9)&"-"&ПОДСТАВИТЬ(ПСТР(A4;НАЙТИ("/";A4;НАЙТИ("/";A4)+1)+3;20);",";" от")  
 
... но два слэша быть обязаны и на своих местах.    
:)){/post}{/quote}  
 
Если бы я сейчас не сидела на работе, то просто прыгала бы от восторга! Чудо из чудес....    
 
Еще вопрос  
НАКЛ_Р, КОМ/11/011, 31.01.2011  
надо заменить на    
Акт сверки расчетов от 31.01.2011 за период от  до 31.01.2011  
 
Вот в этой формуле я не могу проставить после ОТ первое число указанного месяца.    
=СЦЕПИТЬ("Акт сверки расчетов от ";ПРАВСИМВ(A7;10);"за период от ";" до ";ПРАВСИМВ(A7;10)), получается  
Акт сверки расчетов от 31.01.2011 за период от  до 31.01.2011  
 
 
В данном случае в первоначальном варианте фигурирует дата 31.01.2011, значит должно быть  
Акт сверки расчетов от 31.01.2011 за период от 01.01.2011 до 31.01.2011
 
 
 
#24
15.12.2011 15:20:57
Т.е. ориентируемся только на дату и если она > 01, то делаем от 01 до той даты которая в строке? ..ИЛИ до конечной даты месяца?  
 
------  
="Акт сверки расчетов от 01."&ПСТР(A4;НАЙТИ("/";A4;НАЙТИ("/";A4)+1)+1;2)&"."&20&ПСТР(A4;НАЙТИ("/";A4)+1;2)&" по "&ПРАВСИМВ(A4;10)
"..Сладку ягоду рвали вместе, горьку ягоду я одна."
 
 
 
#25
16.12.2011 21:30:23
{quote}{login=KIA}{date=14.12.2011 05:58}{thema=}{post}Sub МояЗамена()  
   If Selection.Cells.Count = 1 Then  
       MsgBox "Выделите несколько ячеек на листе!", vbExclamation, "Ошибка"  
       Exit Sub  
   End If  
   Selection.Replace What:="-", Replacement:=" ", LookAt:=xlPart  
End Sub  
 
 
В аргументе What:=  - указываете что будете менять  
В аргументе Replacement - на что будете менять  
 
См. файл{/post}{/quote}  
 
спасибо
 
 
 
Страницы: 1
Читают тему
Loading...