powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Текст из ячейки Word для имени файла
9 сообщений из 9, страница 1 из 1
Текст из ячейки Word для имени файла
    #37643709
indy2000
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Посредством Scripting.FileSystemObject нужно переименовывать файлы, используя текст в ячейке таблицы.
Табличка состоит из двух колонок и одной строки, данные берутся из второй ячейки
Такой фрагмент VBA Word, NUMB из которой будет формировать полный путь, возвращает пустое значение...(
NUMB = dst.Tables(1).Cell(1, 2).Range.Words(1).Text
Подскажите как поправить.
И как предусмотреть передачу только корректного текста (без абзаца и "мусора")?
...
Рейтинг: 0 / 0
Текст из ячейки Word для имени файла
    #37643743
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
выложи тестовый файл
...
Рейтинг: 0 / 0
Текст из ячейки Word для имени файла
    #37643792
indy2000
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Нужно из таблички извлекать ФИО.
затруднение в методе его программного извлечения, и еще заморочка в удалении концевых непечатаемых символов типа Chr(13)
...
Рейтинг: 0 / 0
Текст из ячейки Word для имени файла
    #37643906
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
indy2000,
кто-то кому-то врёт. Код, показаный Вами в первом посте, возвращает именно "корректного текст", без всякого мусора. Разве что Вы обращаетесь не к тому файлу.
...
Рейтинг: 0 / 0
Текст из ячейки Word для имени файла
    #37643994
indy2000
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
скукотища,

Извиняюсь, писал несколько вариантов, не обратил внимания - действительно при сохранении только с первым словом сохраняется нормально, но при сохранении всего текста из ячейки как-то надо убирать непечатаемый хвост в конце, а то "не удается завершить сохранение из-за ошибки доступа к файлу"
...
Рейтинг: 0 / 0
Текст из ячейки Word для имени файла
    #37644233
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
indy2000,
если нужен весь текст ячейки, то:
Код: vbnet
1.
2.
NUMB = dst.Tables(1).Cell(1, 2).Range.Text
NUMB = Left(NUMB, Len$(NUMB)-1)
...
Рейтинг: 0 / 0
Текст из ячейки Word для имени файла
    #37644469
indy2000
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
скукотища,

оказалось хитрее, правильно так:
Код: vbnet
1.
2.
NUMB = dst.Tables(1).Cell(1, 2).Range.Text
NUMB = Left(NUMB, Len(NUMB) - 2)


т.к. даже пустая ячейка в таблице содержит два непечатаемых символа - Chr(13) & Chr(7)
...
Рейтинг: 0 / 0
Текст из ячейки Word для имени файла
    #37657336
GrafBerkut
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Кто знает как файл .doc программно сохранить в .txt c расстановкой переносов?
...
Рейтинг: 0 / 0
Текст из ячейки Word для имени файла
    #37657343
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GrafBerkutc расстановкой переносов?не очень понятно, то, что делает Ворд при "Сохранить как..." не устраивает?
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Текст из ячейки Word для имени файла
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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