Работа с внешними переменными 3d на VBA +Excel?

[Luhan]

С помощью Менеджера шаблонов, долго!
  Легче использовать циклы!!!
Почему на этом форуме никто не показал, как это сделать без менеджера шаблонов, используя VBA?

'отрываем документ деталь D2.m3d
Dim k5 As Kompas6API5.KompasObject
Dim d3d As Kompas6API5.Document3D
    Set k5 = CreateObject("KOMPAS.Application.5")
        k5.Visible = True 'сделали видимым компас
    Set d3d = k5.Document3D '
        d3d.Open "C:\D2.m3d", False ' открыли файл


Кому не жалко выложите, как это сделать, пожалуйста!
Простой пример открыть, и заменить переменные на новые значения, и сохранить файл под новым именем...
D2.m3d => Компас V13