ドキュメントの任意の位置の文字列を切り取り


【式】

    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;
}

[サンプル・ソース]