Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 28.09.2011, 13:54   #11
vefer
Форумчанин
 
Регистрация: 11.10.2010
Сообщений: 134
По умолчанию

Код:
МОУ прогимназия N 132 "Альтаир"
Просто я не заметил, что такие данные есть, тогда действительно легче макросом, чем монструозные формулы лепить.
vefer вне форума
Старый 28.09.2011, 13:57   #12
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Ну мои UDF тут не косячат, им критично наличие лишних цифр в строке.
А с Regexp можно и это побороть, но тут я пас...
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума
Старый 28.09.2011, 15:14   #13
nilem
Форумчанин
 
Регистрация: 25.04.2010
Сообщений: 616
По умолчанию

Так еще можно попробовать:
Код:
Function eao(s As String) As String
With CreateObject("vbscript.regexp")
    .Pattern = "(N|№)\s*\d+"
    eao = Trim(Mid(.Execute(s)(0), 2))
End With
End Function
Вложения
Тип файла: zip как извлечь число из текста.zip (14.2 Кб, 27 просмотров)
nilem вне форума
Старый 28.09.2011, 16:01   #14
АННА-ЕАО
Форумчанин
 
Аватар для АННА-ЕАО
 
Регистрация: 24.08.2011
Сообщений: 193
По умолчанию

Hugo121, MCH, vefer, nilem Спасибо огромное!

MCH больше всего в моем случае подходит Ваш вариант (срабатывает без ошибок и при других значениях) :
Цитата:
Сообщение от MCH Посмотреть сообщение
Формулой:
Код:
=ПРОСМОТР(9999;--ПСТР(A1;ПОИСК("N";A1)+1;{1;2;3;4}))
Hugo121 Вам отдельное спасибо, что всегда быстро отвечаете и помогаете в решении вопросов. Вы уж простите меня, но с формулкой мне как то попроще. Времени нет вплотную заняться самообучением макросов, а они у меня не всегда срабатывают. Но обещаю, как только найдется свободное время обязательно буду самообразовываться.
АННА-ЕАО вне форума
Старый 28.08.2013, 14:42   #15
cherepushka
Пользователь
 
Регистрация: 25.02.2012
Сообщений: 81
По умолчанию

Здравствуйте, форумчане!
А формулу =ПРОСМОТР(9999;--ПСТР(A1;ПОИСК("-";A1)+1;{1;2;3;4})) можно использовать в условии. Куда только не вставлял ЕСЛИ, рисовал ромбики с условиями, никак не доходит. К примеру в ячейке A1 слово яблоко-1кг, в ячейке A2 яблоко-2. Если рядом с числом кг, выводить 1кг, а если нет кг, то писать 1грамм. Т.е. в ячейке A2 - будет 2грамм.
Спасибо.
cherepushka вне форума
Старый 29.08.2013, 00:55   #16
DV68
Форумчанин
 
Регистрация: 05.08.2009
Сообщений: 465
По умолчанию

Видимо так:
Код:
=ПРОСМОТР(9999;--ПСТР(A1;ПОИСК("-";A1)+1;{1;2;3;4}))&ЕСЛИ(ЕОШ(ПОИСК("кг";A1));"грамм";"кг")
"Все следует делать настолько простым, насколько это возможно, но не проще." Альберт Эйнштейн
DV68 вне форума
Старый 29.08.2013, 09:53   #17
cherepushka
Пользователь
 
Регистрация: 25.02.2012
Сообщений: 81
По умолчанию

Супер, Спасибо большое.
cherepushka вне форума
Старый 29.08.2013, 13:49   #18
ТРИУМФ
Пользователь
 
Регистрация: 09.04.2008
Сообщений: 49
По умолчанию

Просто в тему у меня вопрос:
Есть строчка
Цитата:
РЕМОНТ СМОТРОВОГО КОЛОДЦА С НАРАЩИВАНИЕМ ГОРЛОВИНЫ ЛЮКА НА ЖЕЛЕЗОБЕТОННОЕ КОЛЬЦО К-7-1,5 (1 КОЛЬЦО)
Я использую свою формулу
Цитата:
Код:
=ЕСЛИ(ПРАВСИМВ(C159;7)="КОЛЬЦА)";"КОЛЬЦА";ЕСЛИ(ПРАВСИМВ(C159;9)="(СЕГМЕНТ)";"СЕГМЕНТ";"НЕТ"))
только бывает не кольца а кольцо и да хрен знает что там напишут типа Кольци/ы, я помню что в ексель 2003 было замена символа ?? или же все остльного * и можно было написать
Код:
Цитата:
=ЕСЛИ(ПРАВСИМ(C159;7)="КОЛЬЦ??";"ДА";"Нет")
ТРИУМФ вне форума
Старый 29.08.2013, 14:49   #19
DV68
Форумчанин
 
Регистрация: 05.08.2009
Сообщений: 465
По умолчанию

Примерно так:
Код:
=ПРОСМОТР(11;ПОИСК({"кольц*":"с?гмент"};ПРАВСИМВ(C159;10));{"КОЛЬЦО":"СЕГМЕНТ"})
"Все следует делать настолько простым, насколько это возможно, но не проще." Альберт Эйнштейн

Последний раз редактировалось DV68; 29.08.2013 в 14:52.
DV68 вне форума
Старый 29.08.2013, 15:09   #20
cherepushka
Пользователь
 
Регистрация: 25.02.2012
Сообщений: 81
По умолчанию

=ПРОСМОТР(9999;--ПСТР(A1;ПОИСК("-";A1)+1;{1;2;3;4}))&ЕСЛИ(ЕОШ(ПОИСК( "кг";A1));"грамм";"кг")

Если эту формулу применять к яблоко5-15кг - то он вытащит только число 15. Это понятно разделитель стоит. А реально сделать если встречается запись с двумя (яблоко5-15кг) или тремя (яблоко5-45кг-15кг) разбить тогда в три столбца? Учитывая, что перед первой цифрой тире не стоит. Нужно макрос в формулу пихать?
cherepushka вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как извлечь число выраженное в стандартном виде b2soft Помощь студентам 1 14.02.2011 00:56
Число как текст преобразовать в число agregator Microsoft Office Excel 5 28.04.2010 06:08
"Число в p-ичной системе счисления. Перевести число в q-ичную систему" и не только :) Zinder Паскаль, Turbo Pascal, PascalABC.NET 4 10.04.2010 14:20
Как разделить число и текст в одной ячейки на две ячейки. neboskreb Microsoft Office Excel 2 15.04.2008 19:39