作業中ワークシートの全カラム(列)のオブジェクトを取得



【オブジェクト】

  _Application

【プロパティ】

    RangePtr object->Columns

【戻り値】

    作業中のワークシートの全てのカラムを示すRangeオブジェクト

【サンプル】

//Excelを操作するためのタイプライブラリを読みこむ(Excel2000用)
#import "C:\Program Files\Microsoft Office 2000\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 2000\Office\excel9.olb" rename("DialogBox", "DialogBoxXL") rename("RGB", "RBGXL") rename("DocumentProperties", "DocumentPropertiesXL") no_dual_interfaces

void CImp_app_ColumnsDlg::OnButton1() 
{
	using namespace Excel;
	_ApplicationPtr pXL;

 	//Excelの起動
	pXL.CreateInstance(L"Excel.Application");

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

	//WorkBookを新規で開く
	pXL->Workbooks->Add();

	//全カラム(列)のオブジェクトを取得する
	RangePtr pRange  = pXL->Columns;

	//オブジェクトが正しく取得できていることを確認
	long ColCnt = pRange->Count;
	TRACE("カラム数 = %d\n", ColCnt);

	//Excelを終了
	pXL->Quit();	
}

[サンプル・ソース]