Ошибка файла после пересохранения
Вложений: 1
Ребята подскажите после того как открыл файл в формате "*.docm" и сохранил кодом ,
поправлюсь пишу на VB6
Цитата:
Public f$
Sub saveDOC() 'в модуле
f$ = App.Path & "\вывод\" & Form1.Text1 & ".docx"
wa.ActiveDocument.SaveAs2 FileName:=f$
End Sub
|
я не могу открыть файл после сохранения пишет ошибку, фото в вложении
подскажите что не так делаю? |
DUNAEV78, нужен сам файл, упакованный в архив.
|
Вложений: 1
Файл 161064вот пример, алгоритм такой :
1. из списка выберите организацию - кликните на кнопку записать
2. появится вордовский файл на некоторое время
4. потом зайти в папку вывод и запустить файл
|
DUNAEV78, может быть — «сохранить»:
Цитата:
Код:
Begin VB.CommandButton Command1
Caption = "сохранить"
Height = 855
Left = 5040
TabIndex = 7
Top = 3720
Width = 3015
End
|
?
|
Цитата:
Цитата Iska
Begin VB.CommandButton Command1 »
|
не совсем понимаю этот код, ведь это VB6 а не VBA - остальное понятно это параметры кнопки |
DUNAEV78, ну, так Вы и выложили VB-проект. Также непонятно, зачем Вам .doc m, если в документе нет VBA-проекта.
Вы пишете:
Цитата:
Цитата DUNAEV78
кликните на кнопку записать »
|
Покажите скриншот с кнопкой «записать». Я её не вижу в коде.
|
я так понимаю требуется написать код для сохранения документа в формате *.doc? |
DUNAEV78, покажите скриншот, где бы я мог увидеть пресловутую кнопку «записать».
|
я тут немного подумал и решил вопрос и вообще сам код переосмыслил,
Цитата:
Sub saveDOC()
f$ = App.Path & "\вывод\"
wa.ActiveDocument.SaveAs f$ & Form1.Text1 & ".doc"
End Sub
|
|
Время: 16:22.
© OSzone.net 2001-
