在Office中，將Word中控件（或數(shù)組）的數(shù)據(jù)送到Excel指定行、列的單元格（或區(qū)域）中，保存Excel文檔，然后進(jìn)行數(shù)據(jù)的匯總統(tǒng)計(jì)，是經(jīng)常采用的方法。其基本步驟如下。
　　1.定義和創(chuàng)建用于接受Word文檔中各控件（或數(shù)組）值的Excel工作表“對(duì)象”，并將其“隱藏”（即保留在內(nèi)存中而不在屏幕上顯示出來(lái)）。其典型語(yǔ)句如下。
　　Dim ExcelSheet As Object
　　Set ExcelSheet = CreateObject("Excel.Sheet")
　　ExcelSheet.Application.Visible = False'隱藏Excel工作表單
　　2.把Word文檔中控件（或數(shù)組）的值賦予Excel的指定單元格（或區(qū)域）。
　　下列語(yǔ)句可以把用戶選定調(diào)查的年份組合框（Year_CBox）的值賦予Excel的第1行第1列單元格：
　　ExcelSheet.Application.Cell