По задаче нужно - сохранить указанные значения с нулями в текстовом формате.
Простановка текстового формата автоматически убирает нули.
Апостроф не ставится добавлением "'"&B2; даже при редактировании вручную (нужно для 50 000 строк) в строке со значением сразу стоит число без нулей. Если только вручную дописывать '00 к 88.
alfastudent написал: По задаче нужно - сохранить указанные значения с нулями в текстовом формате.
какие значения? Те которые уже 88? Или они где-то есть как 0088, и их нужно занести на лист? В общем пока точно и подробно не ясна задача (что-где-как-куда-зачем-почему) практически решать нечего.
alfastudent написал: Нужно, чтобы ОТОБРАЖАЕМЫЕ коды типа 0088 были ЗАПИСАНЫ в столбец D с нулями
я уже говорил про формат ячейки? Про пользовательский формат. Но можно сделать формулами или макросом, но тоже нужно задействовать формат ячейки. Текстовый. P.S. наконец появился файл - но толку от него немного, куда и сколько нулей нужно не рассказали.
Custom format - не совсем понял, какой именно формат в данном случае сделать для данной задачи. Не вижу общего формата для данных чисел, к которому следовало бы привести их.
PS Нулей должно быть столько же, сколько отображается в столбце В. Для каждой строки - по своему. Может быть например число 00008, которое должно быть сохранено в D именно как текст "00008".
alfastudent написал: Нулей должно быть столько же, сколько отображается в столбце В.
там вообще ничего не отображается! Поэтому не могу сказать про сколько нулей. Но если нужно всего 6 символов с ведущими нулями - то формат 000000 Но если нужно "которое должно быть сохранено в D именно как текст "00008"" - то тут уже формат не поможет, он не изменяет то, что "должно быть сохранено". Вы уж разберитесь и нас просветите - должно отображаться, или должно быть в ячейке? Это разные вещи.
alfastudent, расскажите: 1.где изначально находятся артикулы с нулями (с видимыми нулями) 2. что Вы делаете, когда они пропадают (копируете, экспортируете или..)
"..Сладку ягоду рвали вместе, горьку ягоду я одна."
В приложенном мной файле отображаются числа с нулями, как в приложенном скриншоте. При этом в строке значений видно именно значение без нулей. В скачанном Вами файле действительно "вообще ничего не отображается", и нули в столбце В вначале всё же отображаются в колонке?
alfastudent написал: и нули в столбце В вначале всё же отображаются
в этом столбце только заголовок! На Вашем скриншоте правда этого столбца нет, так что не могу сравнить. А в F нули есть, выводятся форматом ячейки - только не изучал каим именно.
alfastudent, в скачанном файле в столбце D числа имеют обычный вид, отображаются в нужных местах с лидирующим нулем посредством формата ячейки. аналогично в столбце F
"числа имеют обычный вид, отображаются в нужных местах с лидирующим нулем посредством формата ячейки" - это применимо и к первому, и ко второму столбцам?
посредством каких действий я могу получить в новом столбце текстовые значения ячеек из В, сохраняющие все нули?
Вот кстати и Максим появился, т.к. этот макрос спёр у него. Он может и пояснения более подробные сделает. ------------- Выделяете артикулы в столбце E и нажимаете кнопочку.
AlexTM, "ПЕРЕД вставкой данных ставится текстовый формат, как и говорил Hugo" - данные уже когда-то вставлены, остаётся только работать с имеющимися. Вставка имеющихся данных в отформатированный текстом столбец не решает проблемы.
точнее, копируем? ЗЫ я уж и не помню, когда такой писал, но суть проста - в буфер обмена попадают данные в отображаемом виде с учетом форматов. Вот их потом растаскиваем на ячейки.
ЗЫЫ в вашем случае можно вот такой функцией, но она неоптимальна:
Код
Function REPTZERO(aCell As Range) As String
Dim s
s = aCell.NumberFormat
If s = String(Len(s), "0") And Len(s) > 1 Then
s = String(Len(s) - Len(aCell), "0")
Else
s = ""
End If
REPTZERO = s & aCell
End Function
Доброго дня всем. Подскажите как решить проблему, есть прайс в экселе, артикулы в нем содержат символы / - . и т.д. Когда я удаляю эти символы через замену на пустое значение, то артикулы по типу 08880-10606, превращаются в 888010606, первый 0 удаляется, а мне его нужно оставить. Пробовал перед эти поменять в столбце формат на текстовый, не помогает.