7.3
Конвертнул кубик с помощью программы SAP_CONVERT_NORMAL_TRANS в транзационный. Но система всё равно не видела его правильно. Пришлось достать из мультика, активировать и затащить снова - тогда всё нормализовалось.
Понадобилось запустить функцию планирования при старте рабочей книги.
После некоторого "исследования" получилась такая схема.
2 кнопка - Расчет и Reset
Для глобальной переменной пришлось создать отдельный модуль
Option Explicit
Public pRun As Integer
и код
'----------------------------------------------------------------------------------------
'--- Call-Back Macro: Executed on Refresh for each Table Item
'----------------------------------------------------------------------------------------
Sub CallBack(ParamArray varname())
'varname(0): BExExcelItem.DataProvider.Name
'varname(1): BExExcelItem.Range
'varname(2): BExExcelItem.Name
If pRun = 0 Then
'hide activity
Application.Interactive = False
Application.EnableEvents = False
Application.DisplayAlerts = False
Application.ScreenUpdating = False
'reset previous result
'pRun = pRun + 1
'Application.Run ("test.xlsm!Sheet2.BUTTON_40_Click")
'calculate
pRun = 2
'Application.Run ("test.xlsm!Sheet2.BUTTON_38_Click")
Call ThisWorkbook.Sheets(2).BUTTON_38_Click
pRun = 0
Application.Interactive = True
Application.EnableEvents = True
Application.DisplayAlerts = True
Application.ScreenUpdating = True
Exit Sub 'we don't need update screen
ElseIf pRun = 1 Then
Exit Sub 'we don't need update screen
Else 'update screen
pRun = 0 'if button pressed
End If
'Remember current EnableEvents setting and set to False (disable)!
Комментариев нет:
Отправить комментарий