ドキュメントの任意の位置の文字列を切り取り
【式】
HRESULT Range::Copy ( );
【サンプル】
//Wordを操作するためのタイプライブラリを読みこむ(Word2000用)
#import "C:\Program Files\Microsoft Office\Office\Mso9.dll" no_namespace rename("DocumentProperties", "DocumentPropertiesDOC")
#import "C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\Vbe6ext.olb" no_namespace
#import "C:\Program Files\Microsoft Office\Office\Msword9.olb" rename("ExitWindows", "ExitWindowsDOC")
using namespace Word;
//Word操作用オブジェクト
_ApplicationPtr pDOC;
_DocumentPtr pDocument;
//Wordの起動
void CImp_word_cutDlg::OnButton1()
{
//Wordの起動
pDOC.CreateInstance(L"Word.Application");
pDOC->Visible = TRUE;
//新規 Word document を追加する
DocumentsPtr pDocuments = pDOC->GetDocuments();
pDocument = pDocuments->Add();
}
//指定された文字列を切り取り
void CImp_word_cutDlg::OnButton2()
{
//指定された文字列を切り取り
//(注意:指定範囲に文字列が存在しない場合は、エラーが発生します。)
RangePtr pRange = pDocument->Range(COleVariant((short)5),COleVariant((short)10));
pRange->Cut();
}
//Wordを終了
void CImp_word_cutDlg::OnButton3()
{
//Wordを終了
pDOC->Quit(COleVariant((short)wdDoNotSaveChanges));
pDOC = NULL;
}
[サンプル・ソース]