objExcel.Quit
Set objExcel = Nothing
vba kill excel process
Sub Run_macros()
Dim objExcel
Dim Op_writ
Dim Wb
'запускаем Excel-процесс
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
Op_writ = "R:\ЭКСЕЛЬ\файл1"
Set Wb = objExcel.Workbooks.Open(Op_writ)
'запуск макроса
objExcel.Run "ОБН_данных"
'сохранение файла
objExcel.Workbooks("файл1.xlsm").Save
'по завершению закрываем документ. Пишем только имя файла, без пути
objExcel.Workbooks("файл1.xlsm").Close (False)
'закрываем Excel-процесс
objExcel.Quit
objExcel = Nothing
Op_writ = Nothing
Wb = Nothing
End Sub
objExcel.run "ОБН_данных"
set objExcel = CreateObject ("Excel.Application")
14 проще определить свой ItemsControl чтобы при изменении типов столбов и материалов UI часть не несла изменений.
для каждой VM определяете свой userControl, соответствие между ними задаете через DataTemplate.
Set
же надо..