@skbfjdv

Всем доброго вечера, прошу вашей помощи!
Изначально нужен был макрос на разделение файла word после слияния, но ничего не вышло и способы не помогли...
Теперь же я решил максимально упростить задачу и просто создать макрос, который:
1. выделяет 82 абзаца
2. копирует(вырезает) их в новый документ
3. по первому абзацу дает название данному документу и сохраняет с этим наименованием
4. цикл повторяется и исходник тихонько уменьшается
суть в том что нужно нарезать файл из 14 тысяч страниц на файлы по 4 страницы

однако макрос выдает ошибки
при статичном названии типа "saveas2 filename:="блабла" - никаких проблем нет, но при подстановке переменной которая будет брать свое значение из первого абзаца нового файла - выдает ошибку (type mismatch)

А если изменить "Dim var as range" на "Dim var as string" и убрать перед Var - Set , то выдает другую ошибку: 4198
и выделяет строчки
ActiveDocument.SaveAs2 FileName:=var & ".docx", FileFormat:= _
wdFormatXMLDocument, LockComments:=False, Password:="", AddToRecentFiles _
:=True, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts _
:=False, SaveNativePictureFormat:=False, SaveFormsData:=False, _
SaveAsAOCELetter:=False, CompatibilityMode:=14

0