Добрый день.
У меня есть надстройка "Моя Надстройка" всегда подключенная к Excel.
Иногда при расчетах в больших файлах Excel задумывается на 7-8 минут.
В это время, если нужен Excel, чтобы проделать кое-что другое, пока идут эти 7-8 минут я запускаю vbs-скрипт:
Код |
---|
1 2 3 4 | Set NewExcel = CreateObject( "Excel.Application" )
NewExcel.Workbooks.Add
NewExcel.Visible = True
Set NewExcel = Nothing
|
|
Открывается новый экземпляр Excel, но в нём не подключена надстройка (хотя в окне надстроек галочка стоит).
Чтобы новый Excel открывался с подключенной надстройкой я добавил строку:
Код |
---|
1 | NewExcel.AddIns( "Моя Надстройка" ).Installed = True
|
|
Это не помогло, и я добавил ещё строку и код стал таким:
Код |
---|
1 2 3 4 5 6 | Set NewExcel = CreateObject( "Excel.Application" )
NewExcel.Workbooks.Add
NewExcel.Visible = True
NewExcel.AddIns( "Моя Надстройка" ).Installed = False
NewExcel.AddIns( "Моя Надстройка" ).Installed = True
Set NewExcel = Nothing
|
|
Этот код решил проблему, но меня смущает, что я сначала отключаю и потом заново подключаю надстройку.
Может можно было как-то корректнее?