powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Экспорт МЕМО поля в Word - как убрать лишние знаки абзаца (+)
3 сообщений из 3, страница 1 из 1
Экспорт МЕМО поля в Word - как убрать лишние знаки абзаца (+)
    #32468210
winini
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Здравствуйте, уважаемые!
Прощения прошу за, возможно, ламерский вопрос, но деваться некуда. Я создал в MS Access базу в которой есть MEMO поле, сляпал отчет по этой базе. Проблема в том, что когда сформированный отчет я экспортирую в Word (RFT) в конце каждой строки этого поля у меня появляется знак абзаца , который мне совсем там не нужен. Вопрос как сделать, чтобы лишние знаки абзаца не добавлялись в отчет.
С уважением, Winini
...
Рейтинг: 0 / 0
Экспорт МЕМО поля в Word - как убрать лишние знаки абзаца (+)
    #32468309
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
переводы строки в Memo поле которые делаются в форме ctrl+enter
имеют код chr(13),chr(10) можещь это увидеть обработав Memo посимвольно
ASC
WORD интерпретирует chr(13),chr(10) как конец абзаца

итого перед постоением отчета необходимо профильтровать Memo убрав все
vbCr сhr(13)

кусочек кода под кнопку Me![mmm] - Memo

Dim OutString As String
Dim Ct As Long
OutString = ""

For Ct = 1 To Len(Me![mmm])
OutString = OutString & (Asc(Mid(Me![mmm], Ct, 1)))
Next Ct
Debug.Print OutString
Me![P_Out] = OutString
Me![P_Out].Requery
...
Рейтинг: 0 / 0
Экспорт МЕМО поля в Word - как убрать лишние знаки абзаца (+)
    #32482626
winini
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо!
Буду ковыряться :)
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Экспорт МЕМО поля в Word - как убрать лишние знаки абзаца (+)
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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