お世話になっております。
EXCELのブックにヘッダーと書式設定だけ入っているBook1.xlsに値をいれて
保存しようとしています。データは入るし、保存もされるのですが
出来あがったファイルを開くとシートが非表示になっています。
「ウィンドウ」→「再表示」とやれば開けるのですが、最初から表示された状態に
出来ないものでしょうか？
---------------------------以下スクリプト-------------------------------
OLEObject myoleobject
myoleobject = CREATE OLEObject
result = myoleobject. ConnectToObject( \"C:\\Book1.xls\" )
//出力する
FOR i = 1 TO 10 //行数分のループ
  myoleobject.application.workbooks(1).worksheets(1).cells(i, 1).value = \"A\")
NEXT
//ＥＸＣＥＬを保存してＯＬＥオブジェクトを切り離す
result2 = myoleobject.application.workbooks(1).save( )
IF result2 <> True THEN
  MessageBox(\"保存失敗\",\"EXCELファイルの保存に失敗しました。\")
ELSE
  MessageBox(\"完了\",\"EXCELファイルの保存が終了しました。\")
END IF
myoleobject.DisconnectObject ( )
DESTROY myoleobject