После обработки пропадает ноль в стринге. решения?

@AAAAAAAmidi · Регистрация: 17.09.2015

Author24 — интернет-сервис помощи студентам

Доброе время.
Есть таблицы (конверт из пдф), где в некоторых строках объединены сразу две (верхняя и нижняя).
Написал макрос, который ищет в ячейках Enter и разъединияет эту строку на две(все что слева от Enter- в верхнюю ячейку, все что справа- в нижнюю).
Проблема в том, что когда разделяется ячейка например вида(например)
"17
07"
то в нижней строке отображается не "07" а просто "7".

Морочался с форматами, добавлял апостроф и чего только не вытворял. Подскажите, чем осилить? Ноль необходим

Спасибо

@pashulka · 29.10.2015, 13:58

Лидирующий апостроф и текстовый формат :

Visual Basic

1	Range("C2") = "'07"

Visual Basic

1 2	Range("C3").NumberFormat = "@" Range("C3") = "07"

@AAAAAAAmidi · 29.10.2015, 14:10 **[ТС]**

Что только не делал. и
и формат текст
selection.numericformat="@"
и апостроф
activecell.offset(0,a).value="'"&(left(ent2,(ent22-1))

сейчас вот увидел интересное. После конвертации в ячейке отображается, например "02", но при редактировании ячейки(когда начинаю редактировать), ноль пропадает. даже в ячейке, где "00", к редактированию есть только "0"
я такого еще не видел. что это может быть то?

хм... формат ячейки ###00

@pashulka · 29.10.2015, 14:16

Если после редактирования пропадает ноль, но значит кто-то убрал апостроф (первый вариант), или перед редактированием кто-то сменил текстовый формат на общий/числовой (второй вариант)

P.S. Не numericformat, а numberformat

@AAAAAAAmidi · 29.10.2015, 14:25 **[ТС]**

В общем такая фигня. конвертатор в места, где видел впереди ноль, ставил формат ячейки ###00 или ####0
и в таком духе. Соответственно, впервые сталкиваюсь с тем, что не знаю, как "по умному" добавить недостающие ноли к стрингу...

P.S. Не numericformat, а numberformat

Простите, руками перенабирал, на той машине нет интернета.

@pashulka · 29.10.2015, 14:48

В этом примере наблюдается тот же эффект ?

@AAAAAAAmidi · 29.10.2015, 15:39 **[ТС]**

В этом примере наблюдается тот же эффект ?

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

Короче, отдельный макрос написал на поиск формата ### (и иже с ним) и замену его на текстовый формат с добавлением нужного кол-ва нулей в начале

ваш код - в копилку. спасибо.

@AAAAAAAmidi 4 / 4 / 1 Регистрация: 17.09.2015 Сообщений: 64
		1
	После обработки пропадает ноль в стринге. решения? 29.10.2015, 13:54. Показов 2423. Ответов 6 Метки нет (Все метки) Доброе время. Есть таблицы (конверт из пдф), где в некоторых строках объединены сразу две (верхняя и нижняя). Написал макрос, который ищет в ячейках Enter и разъединияет эту строку на две(все что слева от Enter- в верхнюю ячейку, все что справа- в нижнюю). Проблема в том, что когда разделяется ячейка например вида(например) "17 07" то в нижней строке отображается не "07" а просто "7". Морочался с форматами, добавлял апостроф и чего только не вытворял. Подскажите, чем осилить? Ноль необходим Спасибо 0

@AAAAAAAmidi 4 / 4 / 1 Регистрация: 17.09.2015 Сообщений: 64
	29.10.2015, 14:10 [ТС]	3
	Что только не делал. и и формат текст selection.numericformat="@" и апостроф activecell.offset(0,a).value="'"&(left(ent2,(ent22-1)) сейчас вот увидел интересное. После конвертации в ячейке отображается, например "02", но при редактировании ячейки(когда начинаю редактировать), ноль пропадает. даже в ячейке, где "00", к редактированию есть только "0" я такого еще не видел. что это может быть то? хм... формат ячейки ###00 0

@pashulka 4134 / 2238 / 940 Регистрация: 01.12.2010 Сообщений: 4,624
	29.10.2015, 14:16	4
	Если после редактирования пропадает ноль, но значит кто-то убрал апостроф (первый вариант), или перед редактированием кто-то сменил текстовый формат на общий/числовой (второй вариант) P.S. Не numericformat, а numberformat 1

@AAAAAAAmidi 4 / 4 / 1 Регистрация: 17.09.2015 Сообщений: 64
	29.10.2015, 14:25 [ТС]	5
	В общем такая фигня. конвертатор в места, где видел впереди ноль, ставил формат ячейки ###00 или ####0 и в таком духе. Соответственно, впервые сталкиваюсь с тем, что не знаю, как "по умному" добавить недостающие ноли к стрингу... P.S. Не numericformat, а numberformat Простите, руками перенабирал, на той машине нет интернета. 0

@AAAAAAAmidi 4 / 4 / 1 Регистрация: 17.09.2015 Сообщений: 64
	29.10.2015, 15:39 [ТС]	7
	В этом примере наблюдается тот же эффект ? Не совсеа. вернее разбираюсь дальше. Налажала программа конвертации (солид). Конвертит, добавляет формат под нули, но значения нулей не вставлчет. соответственно, при попытке работать с этими полями нули теряются. Короче, отдельный макрос написал на поиск формата ### (и иже с ним) и замену его на текстовый формат с добавлением нужного кол-ва нулей в начале ваш код - в копилку. спасибо. 0