Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Тестовый формат при открытии тестового файла / 16 сообщений из 16, страница 1 из 1
05.06.2007, 14:25:03
    #34575121
Loyso
Loyso
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
Есть текстовый файл, в котором есть номера документов, причем номер может быть, скажем, "0000045". Данные выгружаются из внешней системы, после чсего текстовый файл открывается макросом. Так вот, в этом случае получаем номер как "45", а это ошибка. Если поменять формат этой ячейки, номер к тому времени уже "Искалечен". Собственно вопрос, как этого избежать? Может есть какой-нить спец. символ в Эксель, чтоб номир документа воспринимался вместе с нолями????????

Заранее спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 14:32:51
    #34575161
Deggasad
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
LoysoЕсть текстовый файл, в котором есть номера документов, причем номер может быть, скажем, "0000045". Данные выгружаются из внешней системы, после чсего текстовый файл открывается макросом. Так вот, в этом случае получаем номер как "45", а это ошибка. Если поменять формат этой ячейки, номер к тому времени уже "Искалечен". Собственно вопрос, как этого избежать? Может есть какой-нить спец. символ в Эксель, чтоб номир документа воспринимался вместе с нолями????????

Заранее спасибо.

Например. "'"&"0000045" , но это уже текст.
А если нужно число и если длинна номера постоянная, то можно восстанавливать нулями до нужной длинны.
Код: plaintext
Range("A1").NumberFormat = "0000000"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 14:48:51
    #34575214
Loyso
Loyso
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
Мне текс и нужен. Спасибо. Сейчас попробую.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 15:03:11
    #34575275
Deggasad
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
Опять же если уже есть значения, а нужен текст постоянной длинны, то можно так
Код: plaintext
1.
    Range("A1").NumberFormat = "@"
    Range("A1").Value = Format(Range("D59").Value, "0000000")
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 15:04:55
    #34575281
Deggasad
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
DeggasadОпять же если уже есть значения, а нужен текст постоянной длинны, то можно так
Код: plaintext
1.
    Range("A1").NumberFormat = "@"
    Range("A1").Value = Format(Range("D59").Value, "0000000")


ПАРДОН, ссылку не поменял
Код: plaintext
1.
    Range("A1").NumberFormat = "@"
    Range("A1").Value = Format(Range("A1").Value, "0000000")
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 15:23:17
    #34575347
Loyso
Loyso
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
Нет, все эти диапазоны мне неподходят - у меня данные портятся в момент открытия, а дополнять нулями не получится - дипазон номеров документов включает в себя буквы и т.д. Просто нужно, чтобы было AsIs, а как в твоем примере - остается знак & ты там что-то намудрил с кавычками... Может ошибся слегка? Я уже все перепробовал.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 15:34:34
    #34575395
Deggasad
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
LoysoНет, все эти диапазоны мне неподходят - у меня данные портятся в момент открытия, а дополнять нулями не получится - дипазон номеров документов включает в себя буквы и т.д. Просто нужно, чтобы было AsIs, а как в твоем примере - остается знак & ты там что-то намудрил с кавычками... Может ошибся слегка? Я уже все перепробовал.

Там опостраф в кавычках, ничего не напутал

Код: plaintext
Range("A1").Value = "'" & "0000045"

Пришли пример того чего нужно сделать. Так не пойму!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 15:36:32
    #34575399
Deggasad
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
Deggasad LoysoНет, все эти диапазоны мне неподходят - у меня данные портятся в момент открытия, а дополнять нулями не получится - дипазон номеров документов включает в себя буквы и т.д. Просто нужно, чтобы было AsIs, а как в твоем примере - остается знак & ты там что-то намудрил с кавычками... Может ошибся слегка? Я уже все перепробовал.

Там опостраф в кавычках, ничего не напутал

Код: plaintext
Range("A1").Value = "'" & "0000045"

Пришли пример того чего нужно сделать. Так не пойму!

Имеется ввиду апостраоф ставить в момент выгрузки данных в текстовый файл.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 15:40:21
    #34575414
Loyso
Loyso
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
Есть текстовый файл с разделителями ";"
Этот файл нужно открыть в экселе, чтобы потом отформатировать.
Есть столбец с номерами партий. Номер партии это некая символьная переменная, которая может начинаться как с буквы, так и с нолей. Когда я открываю макросом этот файл - получаю, что вместо записанного в текстовике 000008237 у меня просто 8237, при этом, длинну номера я тоже не знаю - дополнять нолями нереально. Я надеялся, что есть какой-то префикс, который я могу добавить перед номером при выгрузке данных из системы в текстовик, чтобы потом Эксель не обрезал ноли, а воспринял это число, как текст, при этом префикс желательно скрыть, чтобы он не отображался.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 15:43:13
    #34575433
k-nike
k-nike
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
LoysoЯ надеялся, что есть какой-то префикс, который я могу добавить перед номером при выгрузке данных из системы в текстовик, чтобы потом Эксель не обрезал ноли, а воспринял это число, как текст, при этом префикс желательно скрыть, чтобы он не отображался.
Апостроф это и делает.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 15:44:45
    #34575439
Loyso
Loyso
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
Он остается, паразит такой...
сейчас у меня исходник:

ллоывржвыдлпожвы; '00008237; жщшывождло

отображается:

'00008237
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 16:09:27
    #34575542
Loyso
Loyso
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
Народ, это какой то глюк. Если я открываю текстовый файл, то, получаю апостроф перед значением. Если я тут же беру и вместо апострофа пишу апостроф (да, да, такой вот бред), то он исчезает. Короче говоря, как эмулировать этот процесс (замены апострофа апострофом), в случае, если апостроф был. То есть нужно - проверку значения первого символа и подстановка вместо него его же. Может сработает. Подскажите, знатоки, я в VBA гость, причем не частый.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 16:12:18
    #34575551
Deggasad
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
LoysoНарод, это какой то глюк. Если я открываю текстовый файл, то, получаю апостроф перед значением. Если я тут же беру и вместо апострофа пишу апостроф (да, да, такой вот бред), то он исчезает. Короче говоря, как эмулировать этот процесс (замены апострофа апострофом), в случае, если апостроф был. То есть нужно - проверку значения первого символа и подстановка вместо него его же. Может сработает. Подскажите, знатоки, я в VBA гость, причем не частый.

после открытия файла вставь
Код: plaintext
Cells.Replace What:="'", Replacement:="'"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 16:21:47
    #34575582
Loyso
Loyso
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
АААА!!! Оно заработало!:)
Всем спасибо:)
А я думал, что ABAP - самый интересный язык - ан нет...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 16:24:13
    #34575590
k-nike
k-nike
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
Loyso
сейчас у меня исходник:

ллоывржвыдлпожвы; '00008237; жщшывождло

А зачем вы апостроф в исходник добавили? Его лучше при конвертации в эксель вставлять в нужный столбец.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.06.2007, 16:31:30
    #34575625
Loyso
Loyso
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Тестовый формат при открытии тестового файла
А как? Я просто открываю текстовый файл с разделителями. И сразу теряю нули, не успев ещё ничего сделать.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Тестовый формат при открытии тестового файла / 16 сообщений из 16, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 307ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2182840]:
 0ms
get settings:
 6ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 28ms
get topic data:
 5ms
get forum data:
 1ms
get page messages:
 32ms
get tp. blocked users:
 1ms
others: 221ms
total:  307ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]