開いている全てのワークブックを閉じる




【オブジェクト】

  _Workbooks

【メソッド】

    object->Close

【内容】

    開いている全てのワークブックを閉じます。
    (注意:このメソッドを実行しても、Auto_Closeマクロは実行されません。)

【サンプル】

//Excelを操作するためのタイプライブラリを読みこむ(Excel2000用)
#import "C:\Program Files\Microsoft Office\Office\Mso9.dll" no_namespace rename("DocumentProperties", "DocumentPropertiesXL")   
#import "C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\Vbe6ext.olb" no_namespace   
#import "C:\Program Files\Microsoft Office\Office\excel9.olb" rename("DialogBox", "DialogBoxXL") rename("RGB", "RBGXL") rename("DocumentProperties", "DocumentPropertiesXL") no_dual_interfaces


//名前空間の設定
using namespace Excel;

//オブジェクトの定義
_ApplicationPtr pXL;


//Excelの起動
void CImp_wbk_CloseDlg::OnButton1() 
{
     //Excelの起動
    pXL.CreateInstance(L"Excel.Application");

    //Excelを表示
    pXL->Visible = TRUE;

    //ワークブックを追加
    pXL->Workbooks->Add();
    pXL->Workbooks->Add();
    pXL->Workbooks->Add();
    pXL->Workbooks->Add();
}

//全てのワークブックを閉じる
void CImp_wbk_CloseDlg::OnButton2() 
{
    pXL->DisplayAlerts =false;

    //全てのワークブックを閉じる
    pXL->Workbooks->Close();
}

void CImp_wbk_CloseDlg::OnButton3() 
{
    pXL->Quit();
    pXL = NULL;
}


[サンプル・ソース]