Правка Найти/Заменить

[лилу1986]

Не могу исправить число в ячейке
200100012101000000022_____ нужно заменить на
20010001210100000002200010 делаю правка заменить и ввожу
в поле найти 022_____ в поле заменить на 02200010 итог
2,01+25Е что делать незнаю пыталась менять формат ячейки ничего не помогает. Дело в том что табл состоит из многих таких ячеек меняется в них конечная часть.
200100012102000000022_____
230100015106000000022_____ и т.д.
получить надо
20010001210200000002200010
23010001510600000002200010. Помогите!!!!

[EducatedFool]

Сначала замените все 20010001 на '20010001
(с одинарной кавычкой вначале - это придаст ячейкам текстовый формат)

а потом производите замену 022_____ на 02200010

(добавлено)
не, так не получится - начальные цифры отличаются, а я сразу не заметил
короче, надо в начало каждой ячейки с текстом типа 200100012102000000022_____
добавить одинарную кавычку - это можно сделать, к примеру, формулой в доп.столбце,
а потом скопировать столбец с результатами вычисления формул, и вставить как значения поверх ячеек без кавычек

[лилу1986]

Сообщение от EducatedFool

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

Не поняла конечные действия.......можно поконкретней пошаговую инструкцию для жирафа.........)))

[Teslenko_EA]

Здравствуйте лилу1986.
если однократно выполнить подобный код, на актином листе все замены выполнятся без Вашего участия.

Sub changeNumber()
Const sOld = "022", sNew = "02200010"
Dim o As Object, s$
For Each o In UsedRange
    If Not Len(o.Text) = 21 Then
    ElseIf IsNumeric(o) Then
        s = o.Text
        s = Replace(s, sOld, sNew)
        o.Value = "'" + s
    End If
Next
End Sub

экспериментировать рекомендую на копии файла.
Евгений.

[Sparkman]

Сообщение от лилу1986

Не могу исправить число в ячейке
200100012101000000022_____ нужно заменить на
20010001210100000002200010 делаю правка заменить и ввожу
в поле найти 022_____ в поле заменить на 02200010 итог
2,01+25Е что делать незнаю пыталась менять формат ячейки ничего не помогает. Дело в том что табл состоит из многих таких ячеек меняется в них конечная часть.
200100012102000000022_____
230100015106000000022_____ и т.д.
получить надо
20010001210200000002200010
23010001510600000002200010. Помогите!!!!

Товарищи! Все гораздо проще чем кажется!

Лилу (оо мы с вами одногодки XD) берете и делаете формат столбца с корявыми, уже замененными, данными числовым с пустой дробной частью:

[лилу1986]

Сообщение от Sparkman

Товарищи! Все гораздо проще чем кажется!

так молодой человек берете и делаете свои действия, а цифры для примера берете мои, которые выше и смотрите что получается.... НЕ ВСЕ ТАК ПРОСТО

[лилу1986]

по чему то ничего не произошло совсем ничего

[Serge 007]

лилу1986, в Экселе есть ограничение на разрядность - это 15.
Всё что более Экс округляет. Если Вы хотите получить числа большей разрядности, то Вам следует пользоваться надстройкой Leanardo Volpi.

Скачать её можно здесь.

Если Вам нужен текст, то воспользуйтесь советом EducatedFool и поставьте перед "числом" апостроф.

[лилу1986]

Сообщение от Serge 007

лилу1986,
Если Вам нужен текст, то воспользуйтесь советом EducatedFool и поставьте перед "числом" апостроф.

Скажите как????)))

[Serge 007]

Сообщение от лилу1986

Скажите как????)))

Что значит - как?
Вы на клавиатуру жать умеете? Апостроф (в английской раскладке) там же где и "Ё" в русской.