OLE オートメーションを使用して Excel のシートにデータを追加する方法

文書翻訳 文書翻訳
文書番号: 142193 - 対象製品
すべて展開する | すべて折りたたむ

目次

概要

OLE オートメーションにより他 OLE 準拠のアプリケーションと対話する Windows の Visual FoxPro できます。 OLE を使用して、Visual FoxPro プログラムことができます Excel セッションを開始、ブックを開く、ブックからワークシートを選択、セルまたはセル範囲にデータを配置、ワークシートを印刷する、更新されたブックを保存、して、Microsoft Excel のセッションを閉じます。 ここでその方法の例ではします。

詳細

ステップ バイ ステップの例

  1. プログラム例この資料では動作するように Excel 5. 0 または Microsoft Excel 7. 0 (Office 95 の一部) Microsoft Excel 97 (Office 97 の一部) で新しいブックを開きます。
  2. タブ、ワークシートの下部をクリックして 3 のシートを選択し、スプレッドシートに、次のデータを入力:
          Enter         In Cells
          ----------------------------
          Part #        A1
          Sales YTD     B1
          1             A2 through A4
          2             A5 through A7
          3             B2 through B7
    					
  3. [Microsoft Excel のデータ] メニューの [小計] をクリックします。 結果] ダイアログ ボックスで変更した各 ''、集計するフィールドを追加' 営業年度の年初から今日までの累計を SUM' #、関数は、そのし、その概要データの下を表示することを表示する必要があります。 場合は、[OK] をクリックします。
  4. シート 1 に、ブックの既定のページを復元するシート 1 のワークシートの末尾にタブをクリックします。
  5. ブックを保存します。 ブックを閉じて Excel を終了します。
          C:\XLSheets\Testbook.xls.
    					
  6. Microsoft Visual FoxPro for Windows をで oleExcel.prg という名前の次のプログラムを作成:
    *** Program oleExcel.prg *****
    #DEFINE xlLandscape 2
    #DEFINE xlDoNotSaveChanges 2
    
    DIMENSION laDemoData(4)      && For some Visual FoxPro users, data
    laDemoData(1)= 1024          && could come from table or view
    laDemoData(2)= 2048
    laDemoData(3)= 5120
    laDemoData(4)= "The Sample Message"
    
    loExcel = CREATEOBJECT("Excel.application") 
    
    WITH loExcel
       .Application.Workbooks.Open("C:\XLSheets\testbook.xls")
       .Application.Worksheets("Sheet3").Activate  && Select sheet
       
       .Range("b2").Value = 14444          && constants as data
       .Range("b3").Value = 25555
       .Range("b4").Value = 30001
    
       .Range("b6").Value = laDemoData(1)  && variables as data
       .Range("b7").Value = laDemoData(2)
       .Range("b8").Value = laDemoData(3)
       .Range("a12").Value = laDemoData(4)
    
       .Worksheets("Sheet3").PageSetup.Orientation = xlLandscape
       .ActiveSheet.PrintOut  && Example of printing the worksheet
    
       .Visible = .t. && See the results
       =MESSAGEBOX("Click OK to close Excel.") && Keep the program running, 
                                               && so Excel isn't stranded
    
       .ActiveWindow.Close(xlDoNotSaveChanges)
       .Quit()
    ENDwith
    					

関連情報

Excel のヘルプ トピック「アプリケーションのオブジェクト」とは、プロパティとメソッドのトピックの一覧で導入された多くのトピックを調べます。

サンプル プログラムで取り上げた概念の多くの詳細については、次の記事「サポート技術情報」(Microsoft Knowledge Base) を参照してください。
139051OLE オートメーションを使用して Microsoft Excel でセルを選択する方法
132535PRB: オブジェクト変数を解放ができない閉じる Excel
138398PRB: リリースがない削除 OLE オブジェクト メモリから

プロパティ

文書番号: 142193 - 最終更新日: 2004年7月13日 - リビジョン: 3.3
この資料は以下の製品について記述したものです。
  • Microsoft Visual FoxPro 3.0 Standard Edition
  • Microsoft Visual FoxPro 3.0b Standard Edition
  • Microsoft Visual FoxPro 5.0 Standard Edition
  • Microsoft Visual FoxPro 6.0 Professional Edition
キーワード:?
kbhowto kbinterop kbcode kbmt KB142193 KbMtja
機械翻訳の免責
重要: このサポート技術情報 (以下「KB」) は、翻訳者による翻訳の代わりに、マイクロソフト機械翻訳システムによって翻訳されたものです。マイクロソフトは、お客様に、マイクロソフトが提供している全ての KB を日本語でご利用いただけるように、翻訳者による翻訳 KB に加え機械翻訳 KB も提供しています。しかしながら、機械翻訳の品質は翻訳者による翻訳ほど十分ではありません。誤訳や、文法、言葉使い、その他、たとえば日本語を母国語としない方が日本語を話すときに間違えるようなミスを含んでいる可能性があります。マイクロソフトは、機械翻訳の品質、及び KB の内容の誤訳やお客様が KB を利用されたことによって生じた直接または間接的な問題や損害については、いかなる責任も負わないものとします。マイクロソフトは、機械翻訳システムの改善を継続的に行っています。
英語版 KB:142193
Microsoft Knowledge Base の免責: Microsoft Knowledge Baseに含まれている情報は、いかなる保証もない現状ベースで提供されるものです。Microsoft Corporation及びその関連会社は、市場性および特定の目的への適合性を含めて、明示的にも黙示的にも、一切の保証をいたしません。さらに、Microsoft Corporation及びその関連会社は、本文書に含まれている情報の使用及び使用結果につき、正確性、真実性等、いかなる表明・保証も行ないません。Microsoft Corporation、その関連会社及びこれらの権限ある代理人による口頭または書面による一切の情報提供またはアドバイスは、保証を意味するものではなく、かつ上記免責条項の範囲を狭めるものではありません。Microsoft Corporation、その関連会社 及びこれらの者の供給者は、直接的、間接的、偶発的、結果的損害、逸失利益、懲罰的損害、または特別損害を含む全ての損害に対して、状況のいかんを問わず一切責任を負いません。(Microsoft Corporation、その関連会社 またはこれらの者の供給者がかかる損害の発生可能性を了知している場合を含みます。) 結果的損害または偶発的損害に対する責任の免除または制限を認めていない地域においては、上記制限が適用されない場合があります。なお、本文書においては、文書の体裁上の都合により製品名の表記において商標登録表示、その他の商標表示を省略している場合がありますので、予めご了解ください。

フィードバック

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com