所以我自动化了excel工作簿的某些部分。在代码中,我向某些工作表添加了一些按钮。在使用mac的同事遇到以下错误之前,一切似乎都运行得很好:运行时错误'1004':对象'Button'的方法'Caption'失败。
我检查了它,显然错误只发生在1个特定的工作表上。我尝试删除该特定工作簿并创建一个新工作簿,但错误仍然发生在该特定工作表上。
这是我的代码:
Dim btn As Button
Set btn = Sheet2.Buttons.Add(400, 5, 100, 50)
With btn
.OnAction = "add_feature_click"
.Caption = "ADD FEATURE"
.name = "add_feature"
End With
Set btn = Sheet2.Buttons.Add(510, 5, 100, 50)
With btn
.OnAction = "add_phase_click"
.Caption = "ADD PHASE"
.name = "add_phase"
End With
Set btn = Sheet3.Buttons.Add(400, 5, 100, 50)
With btn
.OnAction = "Add_Feature_click"
.Caption = "ADD FEATURE" '<--
.name = "add_feature"
End With
Set btn = Sheet3.Buttons.Add(510, 5, 100, 50)
With btn
.OnAction = "add_phase_click"
.Caption = "ADD PHASE"
.name = "add_phase"
End With
因此,在“Sheet2”中创建按钮工作正常,但在mac上执行时会在“Sheet3”上抛出错误。 (相同的代码用于向6个不同的工作表添加按钮,并在所有其他工作表中正常工作)
编辑:错误发生在带注释箭头的行
上知道如何解决这个问题吗?
答案 0 :(得分:0)
如果您在错误处停止代码,然后转到创建的按钮,右键单击和属性,当您尝试手动设置标题时会发生什么?