当我在工作站上激活宏时,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