C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

掲示板トップ C# と VB.NET 入門 新規作成 利用方法 ツリー表示 トピック表示 ランキング 記事検索 過去ログ
ログ内検索
  • キーワードを複数指定する場合は 半角スペース で区切ってください。
  • 検索条件は、(AND)=[A かつ B] (OR)=[A または B] となっています。
  • [返信]をクリックすると返信ページへ移動します。
キーワード/ 検索条件 /
検索範囲/ 強調表示/ ON (自動リンクOFF)
結果表示件数/ 記事No検索/ ON
大文字と小文字を区別する

No.50809 の関連記事表示

<< 0 >>
■50809 　Re[8]: Excel(SaveAs)がフ゜ロセスに残る
□投稿者/ VBねっと -(2010/06/18(Fri) 14:25:32)
    ■No50808 (よねＫＥＮ さん) に返信
    > ■No50806 (VBねっと さん) に返信
    >>--------------------- VB.net(修正版) --------------------
    >> System.Runtime.InteropServices.Marshal.ReleaseComObject(oRange)
    >> System.Runtime.InteropServices.Marshal.ReleaseComObject(oSheet)
    >>
    >
    > oSheetsの解放がありませんので、まずはそれの追加を・・・
    >

    忘れていました。　追加したら解決しました。

    VB.netではレイトバインドを使うとうまくいくというのが判りました。
    VB.netはレイトバインドで実装し直ししますが、VBSがうまくいかないの
    が気にかかります。

    下記のようにQuitの後にSleep 5000を追加すると9/10回はうまくいきます。
    VBSで確実にExcelを開放する方法があれば知りたいのですが。。。。。

    掲示板とは違う言語の質問になりましたが、これを機会にVBSでもExcelを
    動かせるようにしたいと考えています。


    ----------------------- 改善VBS -----------------------
    Dim oBooks
    Dim oBook
    Dim oSheets
    Dim oSheet
    Dim oRange

    '①エクセルオブジェクトを作成します
    Set oExcel = CreateObject("Excel.Application")
    Set oBooks = oExcel.Workbooks
    Set oBook = oBooks.Add
    Set oSheets= oBook.Sheets
    Set oSheet = oSheets.item(1)
    Set oRange = oSheet.Range("A1")

    oRange.Value = "hoge"

    '②エクセルを終了します
    oExcel.DisplayAlerts = false
    oBook.SaveAs("c:\Book1.xls")
    oBook.close()
    oExcel.Quit
    WScript.Sleep 5000

    'オブジェクトの破棄
    Set oExcel = Nothing
    Set oBooks = Nothing
    Set oBook = Nothing
    Set oSheets = Nothing
    Set oSheet = Nothing
    Set oRange = Nothing

記事No.50704 のレス /過去ログ86より / 関連記事表示
削除チェック/



<< 0 >>
パスワード/

- Child Tree -