无法设置字体类的斜体属性

我有这个代码写在一个命令button下，工作表被保护。 命令button用作重置button，从多个单元格中删除数据并更改字体属性。 这里是代码：我正在改变使用这个button的范围已经被添加到例外

Range("C10:c18") = "" Range("C20:c24") = "" Range("c5:c6") = "_" Range("c11:c12") = "Optional" With Range("c11:c12") With .Font .Italic = True '"Line 1" .ColorIndex = 48 '"Line 2" End With End With 

它引发VBA错误：无法设置行1和字体类的斜体属性

第2行的应用程序定义或对象定义的错误

Answer 1

您必须在保护工作表时允许格式化单元格，或使用UserInterfaceOnly：= True参数保护Workbook_Open上的工作表，以便即使在受保护的工作表（对于大多数情况下），您的代码也能工作。