在vb中控制  excel中的 控件 表1中 有个CommandButton控件
以下语句在vba中 可以执行
Sheet1.OLEObjects("CommandButton2").Enabled = False但如果写到vb中就 错误........请问如何修改  使其  在vb中  也 可以 使用,(vb中创建excel对象已经 会了,只要这一个语句)VBVBA

解决方案 »

  1.   

    [code=vbs]
        Dim EXCEL , xlBook 
        set EXCEL = CREATEOBJECT("Excel.Application")
        Set xlBook = EXCEL.Workbooks.Open("d:\2.xlsm")
        xlBook.Worksheets("Sheet1").OLEObjects("CommandButton1").Enabled = False
        xlBook.Save
        xlBook.Close
    [/code]
      

  2.   


        Dim EXCEL , xlBook 
        set EXCEL = CREATEOBJECT("Excel.Application")
        Set xlBook = EXCEL.Workbooks.Open("d:\2.xlsm")
        xlBook.Worksheets("Sheet1").OLEObjects("CommandButton1").Enabled = False
        xlBook.Save
        xlBook.Close