AddIns.Add ("D:\...папка...\normal")
Options.DefaultFilePath(Path:=wdStartupPath) = "D:\...папка...\"
Путь к шаблону
Можно ли как-то указать шаблон Normal.dot, не используя такую громоздкую конструкцию (тем более, что на рабочем компе путь будет отличаться именем компьютера):
[COLOR="Navy"]Application.OrganizerCopy Source:= _
"C:\Documents and Settings\Fil\Application Data\Microsoft\Шаблоны\Normal.dot" _
, Destination:=MyPat, Name:= _
"Заголовок 4", Object:=wdOrganizerObjectStyles
[/COLOR]
Я написал [COLOR="Navy"]Application.OrganizerCopy Source:=NormalTemplate (или Source:=NormalTemplate.FullName) [/COLOR], но VBA это не понял. Пишет "объект не найден".
[COLOR="Navy"]Application.OrganizerCopy Source:= _
"C:\Documents and Settings\Fil\Application Data\Microsoft\Шаблоны\Normal.dot" _
, Destination:=MyPat, Name:= _
"Заголовок 4", Object:=wdOrganizerObjectStyles
[/COLOR]
Я написал [COLOR="Navy"]Application.OrganizerCopy Source:=NormalTemplate (или Source:=NormalTemplate.FullName) [/COLOR], но VBA это не понял. Пишет "объект не найден".
Я в подобном случае делал так: помещал Normal.dot в удобное мне место и прописывал
Код: