Код:
Sub save1()
ActiveDocument.SaveAs FileName:=Left(ActiveDocument.Name, 7) +
"-1.doc", FileFormat:= _wdFormatDocument, LockComments:=False,
Password:="", AddToRecentFiles:= _True, WritePassword:="",
ReadOnlyRecommended:=False, EmbedTrueTypeFonts:= _False,
SaveNativePictureFormat:=False, SaveFormsData:=False,
_SaveAsAOCELetter:=False
End Sub
Идея такова...
создается файл ID.doc, я выполняю нужную работу и взависимости от кол-ва страниц сохраняю: ID+1+2+3+n.doc, где n - кол-во страниц
все это изложено выше в коде, дан пример только для одной...
проблема такая: я хочу, чтобы ID.doc удалялся, а ID+n.doc оставался. Пробуя стандартную функцию удаления - ворд ругается, мол, документ активен и все такое...
p.s. Какая функция отвечает за распечатку отдельных страниц?