Форма Excel с макросом макроса VBA завершается с ошибкой на Mac

Я сделал форму для клиента, который вычисляет пакеты, необходимые для выполнения заказа для данного общего объема. Это целая проблема оптимизации. Поэтому я сделал кнопку, которая запускает надстройку Solver с предустановленными настройками и автоматическое закрытие окна результатов.

Вот код. Он установлен в неактивную кнопку. Основа для расчета находится в скрытом листе, поэтому я отображаю и снова скрываю лист: Sheets("Back end").Visible = True а затем =False . Поскольку это беспорядочно смотреть, я устанавливаю Application.ScreenUpdating = False . Функция AutoStop просто возвращает True .

Это отлично работает в Windows, но не на Mac моего клиента. Когда клиент нажимает кнопку на своем Mac, появляется окно настроек решателя. Я сделал некоторый Googling, и кажется, что это известная проблема. В самом деле?? Нет ли способа сделать эту работу?

 Sub Button2_Click() ' ' Packing Macro ' ' Application.ScreenUpdating = False Sheets("Back end").Visible = True Sheets("Back end").Select Sheets("Back end").Range("E60:E69").Select Selection.Copy Sheets("Back end").Range("D76").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False SolverReset SolverOk SetCell:="$C$91", MaxMinVal:=2, ValueOf:="0", ByChange:="$D$76:$D$85" SolverAdd CellRef:="$D$76:$D$85", Relation:=3, FormulaText:="0" SolverAdd CellRef:="$D$76:$D$85", Relation:=4, FormulaText:="integer" SolverOk SetCell:="$C$91", MaxMinVal:=2, ValueOf:="0", ByChange:="$D$76:$D$85" SolverOptions MaxTime:=5, Iterations:=100, Precision:=0.00000000001, _ AssumeLinear:=False, StepThru:=False, Estimates:=1, Derivatives:=1, _ SearchOption:=1, IntTolerance:=2, Scaling:=True, Convergence:=0.005, _ AssumeNonNeg:=True SolverOk SetCell:="$C$91", MaxMinVal:=2, ValueOf:="0", ByChange:="$D$76:$D$85" SolverSolve UserFinish:=True, ShowRef:="AutoStop" Sheets("Back end").Visible = False Sheets("Front end").Select Application.ScreenUpdating = True End Sub