isiiさん、こんにちは。
どうもありがとう御座いました。  教えていただいたスクリプトで解決いたしました。
アシストのPowersoftホームページですが、見てみましたが中身が殆どありませんでした。

＞t-shimmyさん、こんばんは。
＞
＞＞いつもお世話になってます。 OLEオートメーションを使ってEXCEL FILEを更新してるのですが、
＞＞レスポンスが悪いので、EXCEL FILEの計算方法を自動から手動に切り替えようと思ってます。
＞＞EXCELのマクロでは以下のようになるのですが、PBのスクリプトはどのように書けばいいのか、
＞＞どなたか解りましたら、教えてください。
＞＞
＞＞With Application
＞＞        .Calculation = xlManual      手動の場合
＞＞        .MaxChange = 0.001
＞＞    End With
＞＞
＞＞With Application
＞＞        .Calculation = xlAutomatic   自動の場合
＞＞        .MaxChange = 0.001
＞＞    End With
＞
＞OLEオートメーションにつきましては、アシストのPowersoftホームページに参考になる情報
＞があります。（技術ドキュメントのOLE&ActiveX）
＞http://powersoft.ashisuto.co.jp/technicalservice/techdocument/technoteonline
＞
＞PBでの例を以下に示します。
＞なお、Excel(VBA)の定数は、マクロにて値を確認してください。
＞
＞OLEObject ExcelObj
＞ExcelObj = create OLEObject
＞ExcelObj.ConnectToNewObject( \"Excel.Application\" )
＞
＞// Microsoft Excel(VBA)の定数
＞CONSTANT long xlManual = -4135
＞CONSTANT long xlAutomatic = -4105
＞
＞// 手動
＞ExcelObj.Application.Calculation = xlManual
＞ExcelObj.MaxChange = 0.001
＞
＞// 自動
＞ExcelObj.Application.Calculation = xlAutomatic
＞ExcelObj.MaxChange = 0.001
＞
＞