ActiveX在Excel中的運用

字號:

Excel 97在工作表或圖表上可使用ActiveX控件,根據(jù)我使用的體會,在工作上處理控件時,必須注意和了解如下事項:
    (一)用Excel5.0/95工作簿文件格式保存Excel97工作簿時,將選擇ActiveX控件信息。當用戶通過雙擊鼠標來編輯內(nèi)嵌在其它應用程序文檔中的Excel97工作簿時,該工作簿上的控件將不會正常工作。如果用戶是通過用右鍵單擊工作簿,然后選中快捷菜單上的“打開”命令來編輯工作簿的話,工作簿上的控件就能正常工作了。
    (二)當ActiveX控件處于激活狀態(tài)時,將禁用某些MicrosoftExcelVisualBasic方法和屬性。
    例如,當某一控件激活時,就不能使用Sort方法,故下述按鈕單擊事件處理過程中的代碼將失敗(因為用戶單擊按鈕后,該按鈕就處于激活狀態(tài))。
    PrivateSubCommandButton1Click
    Range(″a1:a10″)SortKey1:=Range(″a1″)
    EndSub
    解決辦法是通過選激活工作表上其它元素的方法來繞過這種問題。例如,可用下列代碼對單元格區(qū)域排序:
    PrivateSubCommandButton1Click
    Range(″a1″)Activate
    Range(″a1:a10″)SortKey1:=Range(″a1″)
    CommandButton1Activate
    End Sub
    (三)在MicrosoftExcel中,用OLEObjects集合中的OLEObject對象代表ActiveX控件。
    如果要用編程的方式向工作表添加ActiveX控件,可用OLEObjects集合的Add方法。例如向第一張工作表添加命令按鈕。
    Worksheets(1)O(jiān)LEObjectsAdd″FormsCommandButton1″,Left:=10,Top:=10,Height:=20,Width:=100
    因為ActiveX控件也可用OLEObjects集合中的OLEObject對象代表,所以也可用該集合中的對象來設置控件的屬性。例如要設置控件“CommandBotton1”的“左邊位置”屬性。
    Worksheets(1)O(jiān)LEObjects(″CommandButton1″)Left=10
    那些不屬于OLEObject對象屬性的控件屬性,可通過由Object屬性返回的實際控件對象來設置。例如要設置控件“CommandButton1”的標題。
    Worksheets(1)O(jiān)LEObjects(″CommandButton1″)
    ObjectCaption=″runme″
    因為所有的OLE對象也是Shapes集合的成員,所以也可用該集合設置若干控件的屬性。例如要對齊第一張工作表上所有控件的左邊框。
    ForEachsInWorksheets(1)Shapes
    IfsType=msoOLEControlObjectThensLeft=10
    Next
    考試大提示:當在控件所在工作表的類模塊之外使用控件的名稱時,必須用工作表的名稱限定該控件的名稱。在工作表上ActiveX控件的事件處理過程中,Me關鍵字所指向的是工作表,而非控件。