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

Вход

Регистрация

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

 

= Мир MS Excel/Сантиметры в миллиметры - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Сантиметры в миллиметры
rav80 Дата: Четверг, 07.05.2015, 00:54 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Здравствуйте!
Есть кажется тривиальная задача, но что-то на форуме не нашел решения.
Есть таблица товаров с кучей параметров, в столбцах указаны размеры в разных единицах, например 20 см и 1000 мм, нужно все ячейки в которых указаны сантиметры поменять на миллиметры, т.е. что бы все измерения были указаны в мм, плюс убрать подпись мм, оставить только численное значение. Вручную методом сортировка, поиск-замена, умножение на 100 совсем не удобно, т.к. база огромная все тормозит дико.
Заранее спасибо откликнувшимся.
К сообщению приложен файл: __.xls (24.0 Kb)


Сообщение отредактировал rav80 - Четверг, 07.05.2015, 00:56
 
Ответить
СообщениеЗдравствуйте!
Есть кажется тривиальная задача, но что-то на форуме не нашел решения.
Есть таблица товаров с кучей параметров, в столбцах указаны размеры в разных единицах, например 20 см и 1000 мм, нужно все ячейки в которых указаны сантиметры поменять на миллиметры, т.е. что бы все измерения были указаны в мм, плюс убрать подпись мм, оставить только численное значение. Вручную методом сортировка, поиск-замена, умножение на 100 совсем не удобно, т.к. база огромная все тормозит дико.
Заранее спасибо откликнувшимся.

Автор - rav80
Дата добавления - 07.05.2015 в 00:54
krosav4ig Дата: Четверг, 07.05.2015, 01:11 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
А зачем сортировка умножение? Почему умножение на 100? Заменяете ” см" на 0 и " мм" на пустое значение


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Четверг, 07.05.2015, 01:17
 
Ответить
СообщениеА зачем сортировка умножение? Почему умножение на 100? Заменяете ” см" на 0 и " мм" на пустое значение

Автор - krosav4ig
Дата добавления - 07.05.2015 в 01:11
rav80 Дата: Четверг, 07.05.2015, 01:39 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Сори описка, конечно на 10, действительно, как я сразу не догадался так сделать, спасибо за совет, можно и макрос такой записать. Но появилась новая проблема, а что делать если указан размер 45.5 см в том же столбце? Прикрепил другой файл.
К сообщению приложен файл: 7417410.xls (24.5 Kb)


Сообщение отредактировал rav80 - Четверг, 07.05.2015, 02:19
 
Ответить
СообщениеСори описка, конечно на 10, действительно, как я сразу не догадался так сделать, спасибо за совет, можно и макрос такой записать. Но появилась новая проблема, а что делать если указан размер 45.5 см в том же столбце? Прикрепил другой файл.

Автор - rav80
Дата добавления - 07.05.2015 в 01:39
AndreTM Дата: Четверг, 07.05.2015, 03:08 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1762
Репутация: 501 ±
Замечаний: 0% ±

2003 & 2010
Примерные варианты. На ваше усмотрение
К сообщению приложен файл: 2-17332-1.xlsx (10.0 Kb)


Skype: andre.tm.007
Donate: Qiwi: 9517375010
 
Ответить
СообщениеПримерные варианты. На ваше усмотрение

Автор - AndreTM
Дата добавления - 07.05.2015 в 03:08
МВТ Дата: Четверг, 07.05.2015, 03:17 | Сообщение № 5
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация: 137 ±
Замечаний: 0% ±

Excel 2007
Можно макросом (работает на выделенном диапазоне) [vba]
Код
Sub Millimetr()
Application.ScreenUpdating = False
For Each Cell In Selection
With Cell
If InStr(.Value, "ñì") <> 0 Then .Value = Val(.Value) * 10 Else .Value = Val(.Value)
End With
Next Cell
Application.ScreenUpdating = True
End Sub
[/vba]
 
Ответить
СообщениеМожно макросом (работает на выделенном диапазоне) [vba]
Код
Sub Millimetr()
Application.ScreenUpdating = False
For Each Cell In Selection
With Cell
If InStr(.Value, "ñì") <> 0 Then .Value = Val(.Value) * 10 Else .Value = Val(.Value)
End With
Next Cell
Application.ScreenUpdating = True
End Sub
[/vba]

Автор - МВТ
Дата добавления - 07.05.2015 в 03:17
jakim Дата: Четверг, 07.05.2015, 12:30 | Сообщение № 6
Группа: Друзья
Ранг: Старожил
Сообщений: 1218
Репутация: 316 ±
Замечаний: 0% ±

Excel 2010
Можно применить такую формулу, протянув её направо и вниз, предварительно заменив (Ctrl+h) точки на запятые.

Код
=--IF(RIGHT(A2;2)="см";LEFT(A2;FIND(" ";A2)-1)*10;LEFT(A2;FIND(" ";A2)-1))
 
Ответить
Сообщение
Можно применить такую формулу, протянув её направо и вниз, предварительно заменив (Ctrl+h) точки на запятые.

Код
=--IF(RIGHT(A2;2)="см";LEFT(A2;FIND(" ";A2)-1)*10;LEFT(A2;FIND(" ";A2)-1))

Автор - jakim
Дата добавления - 07.05.2015 в 12:30
_Boroda_ Дата: Четверг, 07.05.2015, 12:39 | Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 16895
Репутация: 6613 ±
Замечаний: ±

2003; 2007; 2010; 2013 RUS
Еще вариант
Код
=ЛЕВБ(ПОДСТАВИТЬ(A2;".";",");ПОИСК(" ";A2))*10^(ПРАВБ(A2;2)="см")
К сообщению приложен файл: 9841684984.xlsx (9.8 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеЕще вариант
Код
=ЛЕВБ(ПОДСТАВИТЬ(A2;".";",");ПОИСК(" ";A2))*10^(ПРАВБ(A2;2)="см")

Автор - _Boroda_
Дата добавления - 07.05.2015 в 12:39
rav80 Дата: Четверг, 07.05.2015, 14:24 | Сообщение № 8
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Спасибо всем огромное, буду пробовать все способы. :D
 
Ответить
СообщениеСпасибо всем огромное, буду пробовать все способы. :D

Автор - rav80
Дата добавления - 07.05.2015 в 14:24
rezhisser Дата: Воскресенье, 10.05.2015, 00:06 | Сообщение № 9
Группа: Пользователи
Ранг: Прохожий
Сообщений: 9
Репутация: 0 ±
Замечаний: 20% ±

Excel 2013
Подскажите, плиз, решение для по сути такой же задачи, только нужно получить значения в см (без "см")
 
Ответить
СообщениеПодскажите, плиз, решение для по сути такой же задачи, только нужно получить значения в см (без "см")

Автор - rezhisser
Дата добавления - 10.05.2015 в 00:06
Nic70y Дата: Воскресенье, 10.05.2015, 04:12 | Сообщение № 10
Группа: Друзья
Ранг: Экселист
Сообщений: 9133
Репутация: 2416 ±
Замечаний: 0% ±

Excel 2010
по сути такой же
без вашего файла не видно,
что задача такая же.
скорей всего она другая.
т.е. новая тема.


ЮMoney 41001841029809

Сообщение отредактировал Nic70y - Воскресенье, 10.05.2015, 04:13
 
Ответить
Сообщение
по сути такой же
без вашего файла не видно,
что задача такая же.
скорей всего она другая.
т.е. новая тема.

Автор - Nic70y
Дата добавления - 10.05.2015 в 04:12
МВТ Дата: Воскресенье, 10.05.2015, 09:19 | Сообщение № 11
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация: 137 ±
Замечаний: 0% ±

Excel 2007
Nic70y, вопрос был задан здесь. Посоветовал эту тему, как достаточно близкую. В исходной теме мной уже написана UDF как раз под поставленную задачу
 
Ответить
СообщениеNic70y, вопрос был задан здесь. Посоветовал эту тему, как достаточно близкую. В исходной теме мной уже написана UDF как раз под поставленную задачу

Автор - МВТ
Дата добавления - 10.05.2015 в 09:19
rezhisser Дата: Воскресенье, 10.05.2015, 10:07 | Сообщение № 12
Группа: Пользователи
Ранг: Прохожий
Сообщений: 9
Репутация: 0 ±
Замечаний: 20% ±

Excel 2013
МВТ, спасибо!
 
Ответить
СообщениеМВТ, спасибо!

Автор - rezhisser
Дата добавления - 10.05.2015 в 10:07
Nic70y Дата: Воскресенье, 10.05.2015, 22:46 | Сообщение № 13
Группа: Друзья
Ранг: Экселист
Сообщений: 9133
Репутация: 2416 ±
Замечаний: 0% ±

Excel 2010


ЮMoney 41001841029809
 
Ответить
СообщениеМихаил...
http://www.excelworld.ru/forum/12-17187-1

Автор - Nic70y
Дата добавления - 10.05.2015 в 22:46
  • Страница 1 из 1
  • 1
Поиск:

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