2011年2月26日土曜日

エクセルに出力

1.参照の追加

2.Main の Application が Excel::Application とバッティングするので名前空間を指定
ソリューションエクスプローラから、プロジェクト名.cpp を開いてコードを入力します。
// コントロールが作成される前に、Windows XP ビジュアル効果を有効にします
System::Windows::Forms::Application::EnableVisualStyles();
System::Windows::Forms::Application::SetCompatibleTextRenderingDefault(false); 

// メイン ウィンドウを作成して、実行します
System::Windows::Forms::Application::Run(gcnew Form1());


あいまいなシンボルです。と怒られたら
3.コードの入力
 using namespace Microsoft::Office::Interop::Excel;
Microsoft::Office::Interop::Excel::Application^ ap1 = gcnew Microsoft::Office::Interop::Excel::ApplicationClass();

Workbook^ wb = ap1->Workbooks->Add(Type::Missing);

Worksheet^ ws  = static_cast<Worksheet^>(ap1->ActiveSheet);

ws->Name = "ワークシート名";
ws->Cells[1,1] = "セル1,1";
ap1->Visible = true;

0 件のコメント:

コメントを投稿