タイトルバーの名前を変更
【オブジェクト】
_Application
【プロパティ】
[値を取得]
_bstr_t object->Caption
[値の変更]
object->Caption = _bstr_t
【内容】
Excelウィンドウのタイトルバーに表示される名前を変更します。
何も設定しない場合は、"Microsoft Excel"という文字が設定されています。
また、Empty値(空文字)を設定すると"Microsoft Excel"が設定されます。
【サンプル】
//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
void CImp_app_CaptionDlg::OnButton1()
{
//名前空間の設定
using namespace Excel;
//オブジェクトの定義
_ApplicationPtr pXL;
//Excelの起動
pXL.CreateInstance(L"Excel.Application");
//Excelを表示
pXL->Visible = TRUE;
//ウィンドウのタイトルを変更
pXL->Caption = "テスト";
//動作チェック
AfxMessageBox("動作チェックのため、一時停止");
//Excelを終了
pXL->Quit();
}
[サンプル・ソース]