powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Переделать ОТЧЕТ в WORD – документ
23 сообщений из 23, страница 1 из 1
Переделать ОТЧЕТ в WORD – документ
    #32680387
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет, всем!

Хотелось бы программно сделать следующее:
1. Удалить старый файл.
2. Переделать ОТЧЕТ в WORD (!) –документ.
3. Сохранить файл, причем не там, куда Бил хочет, а куда я.
При закрытии отчета такую бы процедурку.
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680395
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
на закрытие отчёта привесь сам
сам и имя отчёта передай
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Dim stDocName As String
    Dim rtfName As String
    rtfName = "d:\inna.rtf"
    stDocName = "Tcorp"
    On Error Resume Next
    Kill rtfName  '  - убьётся и сам 
    DoCmd.OutputTo acReport, stDocName, acFormatRTF, rtfName
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680634
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всё, конечно прекрасно, даже один раз сработало, только потом:
Run-time error "2585"
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680635
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
v skopinВсё, конечно прекрасно, даже один раз сработало, только потом:
Run-time error "2585"
код не вижу - вечер темно!
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680638
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
"Невозможен запуск этой макрокоманды при обработке события формы или отчета"
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680640
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
v skopin"Невозможен запуск этой макрокоманды при обработке события формы или отчета"
итить код НЕ ошибки - твой код (VBA доннер веттер)
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680643
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Dim rtfName As String

rtfName = "E:\BSkopin1.rtf"
stDocName = Report_B.Name
'Kill rtfName ' -
DoCmd.OutputTo acReport, stDocName, acFormatRTF, rtfName
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680646
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В.Скопин - ВЕСЬ код покажи(от начала процедуры)
+ Report_B.Name он чё с неба берётся(и где его Dim)
+ версия Access/формат файла
+ на какой строке ошибка
+ debug.print Report_B.Name
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680649
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Private Sub Report_Close()
Dim stDocName As String
Dim rtfName As String
stDocName = Report_tab.Name
rtfName = "E:\" & stDocName & ".rtf"
'On Error Resume Next
'Kill rtfName ' - ??????? ? ???
DoCmd.OutputTo acReport, stDocName, acFormatRTF, rtfName
End Sub
это эксперементальая база из одного отчета "tab" и таблици "tab"
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680652
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Больше кадов в ней никаких нет!
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680653
Фотография Victosha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
скопин - ты зачем издеваешься?

тебе дают рабочий код, ты его ломаешь и говоришь - бяка мол код - не работает.

Скопин - ты ПЛОХАЯ девочка...

(с выражением лица)
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680662
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Option Compare Database

Private Sub Report_Close()
Dim stDocName As String
Dim rtfName As String
rtfName = "E:\Rep_tab.rtf"
stDocName = "tab"
'On Error Resume Next
'Kill rtfName
DoCmd.OutputTo acReport, stDocName, acFormatRTF, rtfName
End Sub

Сейчас, надеюсь, всё, как в оригенале - но ошибка прёт!!!
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680664
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
v skopinPrivate Sub Report_Close()
Dim stDocName As String
Dim rtfName As String
stDocName = Report_tab.Name
rtfName = "E:\" & stDocName & ".rtf"
'On Error Resume Next
'Kill rtfName ' - ??????? ? ???
DoCmd.OutputTo acReport, stDocName, acFormatRTF, rtfName
End Sub
это эксперементальая база из одного отчета "tab" и таблици "tab"
Report_tab.Name - это замена Me.Name ?
+ версия Access/формат файла
+ на какой строке ошибка
типа чукча писатель - он вопросов не читает ?
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680666
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Office XP SP3 русский/Access 2002
на какой строке ошибка
MS VB
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680667
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Report_tab.Name - это замена Me.Name ?
уже не так, а stDocName = "tab"
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680668
Фотография xax_nv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Private Sub Report_Close()
Dim stDocName As String
Dim rtfName As String
rtfName = "E:\Rep_tab.rtf"
stDocName = "tab"
 'On Error Resume Next 
 'Kill rtfName 
DoCmd.OutputTo acReport, stDocName, acFormatRTF, rtfName
End Sub


Код работает, но запускать его надо не на событие закрытия отчета а отдельно (т.е. отчет должен быть открыт).
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680671
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо, однако почему - то раньше пару раз и там сработало!?
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680695
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не понос, так золотуха!
Не сохраняет гад две последние строчки отчета!
Мой отчет состоит из одного поля типа Мемо.
И борюсь я с этим безобразием так: добавляю
"
_____________________________________________"
Но это же безграмотно как-то!
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680907
S. Fedorenko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А Access в Word линии не перебрасывает.
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32680947
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
S. FedorenkoА Access в Word линии не перебрасывает.
это не линия это подчёркивание
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32681334
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Какая разница "линии",..., буквы все равно две последние строчки текста не записывает!!!
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32681346
255
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
255
Гость
по границе 255 символов обрезает чтоли?
...
Рейтинг: 0 / 0
Переделать ОТЧЕТ в WORD – документ
    #32681354
v skopin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Размер роли не играет!(тип: МЕМО!)
...
Рейтинг: 0 / 0
23 сообщений из 23, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Переделать ОТЧЕТ в WORD – документ
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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