Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/как убрать не значащий ноль - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » как убрать не значащий ноль (Формулы/Formulas)
как убрать не значащий ноль
smeta Дата: Понедельник, 10.04.2017, 15:27 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Добрый день! Подскажите пожалуйста можно ли как то в автоматическом режиме удалить последний ноль перед цифрой 01-01-001-01 и привести к такому виду 01-01-001-1? но в в моем списке еще присутствуют вот такие значения 01-01-001-12 они должны остаться именно такими. или только ручками? заранее спасибо!
К сообщению приложен файл: _Microsoft_Exce.xlsx (8.9 Kb)
 
Ответить
СообщениеДобрый день! Подскажите пожалуйста можно ли как то в автоматическом режиме удалить последний ноль перед цифрой 01-01-001-01 и привести к такому виду 01-01-001-1? но в в моем списке еще присутствуют вот такие значения 01-01-001-12 они должны остаться именно такими. или только ручками? заранее спасибо!
Автор - smeta
Дата добавления - 10.04.2017 в 15:27
китин Дата: Понедельник, 10.04.2017, 15:29 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 7034
Репутация: 1079 ±
Замечаний: 0% ±

Excel 2007;2010;2016
ну если данные именно в таком виде тогда все просто
Код
=ПОДСТАВИТЬ(A1;"-0";"-";3)
К сообщению приложен файл: 111444.xlsx (9.5 Kb)

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Сообщение отредактировал китин - Понедельник, 10.04.2017, 15:30
 
Ответить
Сообщениену если данные именно в таком виде тогда все просто
Код
=ПОДСТАВИТЬ(A1;"-0";"-";3)
Автор - китин
Дата добавления - 10.04.2017 в 15:29
Karataev Дата: Понедельник, 10.04.2017, 15:38 | Сообщение № 3
Группа: Проверенные
Ранг: Старожил
Сообщений: 1336
Репутация: 533 ±
Замечаний: 0% ±

Excel
вариант макросом
 
Ответить
Сообщениевариант макросом
Автор - Karataev
Дата добавления - 10.04.2017 в 15:38
smeta Дата: Вторник, 11.04.2017, 07:17 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Цитата китин, 10.04.2017 в 15:29, в сообщении № 2 ()
ну если данные именно в таком виде тогда все просто

китин, Спасибо , буду пробовать!
 
Ответить
Сообщение
Цитата китин, 10.04.2017 в 15:29, в сообщении № 2 ()
ну если данные именно в таком виде тогда все просто

китин, Спасибо , буду пробовать!
Автор - smeta
Дата добавления - 11.04.2017 в 07:17
smeta Дата: Вторник, 11.04.2017, 07:22 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Цитата Karataev, 10.04.2017 в 15:38, в сообщении № 3 ()
вариант макросом


Karataev,
Спасибо! А через макрос это как? если можно поподробнее, ни разу с макросами не сталкивался.
 
Ответить
Сообщение
Цитата Karataev, 10.04.2017 в 15:38, в сообщении № 3 ()
вариант макросом


Karataev,
Спасибо! А через макрос это как? если можно поподробнее, ни разу с макросами не сталкивался.
Автор - smeta
Дата добавления - 11.04.2017 в 07:22
китин Дата: Вторник, 11.04.2017, 07:43 | Сообщение № 6
Группа: Модераторы
Ранг: Экселист
Сообщений: 7034
Репутация: 1079 ±
Замечаний: 0% ±

Excel 2007;2010;2016
Смотрите: макрос от Karataev, в вашем файле
К сообщению приложен файл: 222111.xlsm (16.1 Kb)

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
СообщениеСмотрите: макрос от Karataev, в вашем файле
Автор - китин
Дата добавления - 11.04.2017 в 07:43
Hugo Дата: Вторник, 11.04.2017, 08:32 | Сообщение № 7
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3854
Репутация: 814 ±
Замечаний: 0% ±

365
Легко сделать вручную, использовав "текст по столбцам".

webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
 
Ответить
СообщениеЛегко сделать вручную, использовав "текст по столбцам".
Автор - Hugo
Дата добавления - 11.04.2017 в 08:32
smeta Дата: Вторник, 11.04.2017, 10:28 | Сообщение № 8
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Цитата китин, 11.04.2017 в 07:43, в сообщении № 6 ()
Смотрите: макрос от Karataev, в вашем файле
К сообщению приложен файл: 222111.xlsm(16Kb)

китин,
Макрос просто супер, спасибо!
 
Ответить
Сообщение
Цитата китин, 11.04.2017 в 07:43, в сообщении № 6 ()
Смотрите: макрос от Karataev, в вашем файле
К сообщению приложен файл: 222111.xlsm(16Kb)

китин,
Макрос просто супер, спасибо!
Автор - smeta
Дата добавления - 11.04.2017 в 10:28
китин Дата: Вторник, 11.04.2017, 10:38 | Сообщение № 9
Группа: Модераторы
Ранг: Экселист
Сообщений: 7034
Репутация: 1079 ±
Замечаний: 0% ±

Excel 2007;2010;2016
читаем внимательно:
Цитата китин, 11.04.2017 в 07:43, в сообщении № 6 ()
макрос от Karataev

я его просто в файл вставил и кнопку нарисовал :D

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Сообщение отредактировал китин - Вторник, 11.04.2017, 10:39
 
Ответить
Сообщениечитаем внимательно:
Цитата китин, 11.04.2017 в 07:43, в сообщении № 6 ()
макрос от Karataev

я его просто в файл вставил и кнопку нарисовал :D
Автор - китин
Дата добавления - 11.04.2017 в 10:38
smeta Дата: Вторник, 11.04.2017, 10:51 | Сообщение № 10
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Цитата китин, 11.04.2017 в 07:43, в сообщении № 6 ()
Смотрите: макрос от Karataev, в вашем файле
К сообщению приложен файл: 222111.xlsm(16Kb)

китин,
Макрос просто супер, спасибо!
 
Ответить
Сообщение
Цитата китин, 11.04.2017 в 07:43, в сообщении № 6 ()
Смотрите: макрос от Karataev, в вашем файле
К сообщению приложен файл: 222111.xlsm(16Kb)

китин,
Макрос просто супер, спасибо!
Автор - smeta
Дата добавления - 11.04.2017 в 10:51
smeta Дата: Вторник, 11.04.2017, 10:52 | Сообщение № 11
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Karataev, спасибо ваш макрос просто супер.!
 
Ответить
СообщениеKarataev, спасибо ваш макрос просто супер.!
Автор - smeta
Дата добавления - 11.04.2017 в 10:52
Nic70y Дата: Вторник, 11.04.2017, 10:59 | Сообщение № 12
Группа: Друзья
Ранг: Экселист
Сообщений: 9130
Репутация: 2415 ±
Замечаний: 0% ±

Excel 2010
для разнообразия
Код
=ЛЕВБ(A1;9)&-ПРАВБ(A1;2)

ЮMoney 41001841029809
 
Ответить
Сообщениедля разнообразия
Код
=ЛЕВБ(A1;9)&-ПРАВБ(A1;2)
Автор - Nic70y
Дата добавления - 11.04.2017 в 10:59
sv2014 Дата: Вторник, 11.04.2017, 11:41 | Сообщение № 13
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 226
Репутация: 61 ±
Замечаний: 0% ±

Excel 2013
smeta, еще вариант макроса,кнопки test и повтор

[vba]
Код
Sub test()
     Dim z, t$, i&: z = Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row).Value
  With CreateObject("VBScript.RegExp"): .Pattern = "(0)(?=[1-9]$)"
    For i = 1 To UBound(z): t = z(i, 1)
      z(i, 1) = .Replace(t, "")
    Next
   Range("A1").Resize(UBound(z), 1).Value = z
   End With
End Sub
[/vba]
К сообщению приложен файл: example_11_04_2.xls (32.0 Kb)
 
Ответить
Сообщениеsmeta, еще вариант макроса,кнопки test и повтор

[vba]
Код
Sub test()
     Dim z, t$, i&: z = Range("A1:A" & Range("A" & Rows.Count).End(xlUp).Row).Value
  With CreateObject("VBScript.RegExp"): .Pattern = "(0)(?=[1-9]$)"
    For i = 1 To UBound(z): t = z(i, 1)
      z(i, 1) = .Replace(t, "")
    Next
   Range("A1").Resize(UBound(z), 1).Value = z
   End With
End Sub
[/vba]
Автор - sv2014
Дата добавления - 11.04.2017 в 11:41
Мир MS Excel » Вопросы и решения » Вопросы по Excel » как убрать не значащий ноль (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!