Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / как создать новый документ / 9 сообщений из 9, страница 1 из 1
11.03.2005, 11:20:40
    #32955078
olinka
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как создать новый документ
как в макросе создать новый документ
Я пишу:
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile(ActiveDocument.Path & Application.PathSeparator & "new.doc", True)
как можно обойтися без FSO
...
Рейтинг: 0 / 0
11.03.2005, 11:39:25
    #32955147
MLeon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как создать новый документ
А зачем его создавать? Если это файл Word, то открывайте Word и создавайте в нем. Если это текстовый файл, то создавайте его средствами VB - Open/Close.
"Дело не во фраке, а что в ём"
...
Рейтинг: 0 / 0
11.03.2005, 11:43:57
    #32955168
olinka
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как создать новый документ
есть макрос который создает Word-документы и копирует в них текст.
Так что просто зайти в Word и создать мне не подходит
...
Рейтинг: 0 / 0
11.03.2005, 11:50:44
    #32955196
MLeon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как создать новый документ
Так если он уже создает, что Вам еще надо?
...
Рейтинг: 0 / 0
11.03.2005, 11:57:04
    #32955218
olinka
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как создать новый документ
у меня такая проблема
Есть документ Word
1.1. Текст задачи
1.2. Текст задачи
1.3. Текст задачи
Необходимо создать отдельные документы 1.doc, 2.doc, 3.doc с текстом задачи

я написала макрос:
k = ActiveDocument.Lists.Count
lt = ActiveDocument.Lists(k).CountNumberedItems
Set fs = CreateObject("Scripting.FileSystemObject")

For I = 1 To lt
Set
a = fs.CreateTextFile(ActiveDocument.Path & Application.PathSeparator & I ".doc", True)
a.writeline (ActiveDocument.Lists(k).ListParagraphs(I).Range)
Next I
Все вроде работает хорошо. Но когда в тексте задачи есть формулы, то они не копируются в новые документы.
Надо чтобы зароботало с формулами.
...
Рейтинг: 0 / 0
11.03.2005, 12:06:34
    #32955258
MLeon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как создать новый документ
Откройте Word: set w=CreateObject("Word.Application"). В нем создайте документ: set wd=w.Documents.Add. Делайте с ним, что хотите, а потом закройте wd.Close wdSaveChanges. А в конце закройте и сам Word: w.Quit wdDoNotSaveChanges.
...
Рейтинг: 0 / 0
11.03.2005, 12:27:19
    #32955348
olinka
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как создать новый документ
что то у меня не получается
пишет ошибку Object doesn't support this property or method
...
Рейтинг: 0 / 0
11.03.2005, 12:34:51
    #32955387
olinka
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как создать новый документ
как в Documents.Add указать имя нового файла
...
Рейтинг: 0 / 0
11.03.2005, 14:02:26
    #32955683
MLeon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как создать новый документ
Вместо Save используйте SaveAs - там укажете.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / как создать новый документ / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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