某些工作站上的Excel运行时错误438

时间:2015-10-19 14:03:59

标签: excel excel-vba runtime vba

当我在工作站上激活宏时,Excel会给我这个错误:运行时错误'438'。

然而,在我的同事工作站上,我的设置与我相同(使用Excel 2007的Windows 7 32位),他没有此错误,并且宏正在工作。

尝试debuging时,错误显示在此代码的第一行:

If ThisWorkbook.Worksheets("quote").ComboBox1.Value <> "" Then
    ThisWorkbook.Worksheets("quote").Range("H11").Value = ThisWorkbook.Worksheets("quote").ComboBox1.Value
    ThisWorkbook.Worksheets("Quote").Unprotect Password:="password"
    Data_extract
    ThisWorkbook.Worksheets("Quote").Protect Password:="password", AllowFormattingCells:=True
End If

0 个答案:

没有答案