2014-12-03 108 views
-1

所以,我有一个简单的宏只是清除特定的单元格。它工作得很好,然后我添加了一个用户窗体,它通过文本框接受输入,并且我添加了最后一行TextBox1.Value =“”来清除它。现在,单击运行宏的按钮即可运行,它甚至会清除该框,但这会给我带来424错误。我敢肯定它的一些基本的东西,我忽略了,语法或者一些结束语。任何帮助,将不胜感激。错误424 - 在Excel宏中需要的对象

Sub Clear() 
' 
' Clear Macro 
' 

' 
Range("A1").Select 
Selection.ClearContents 
Range("H17").Select 
Selection.ClearContents 
Range("H11").Select 
Selection.ClearContents 
Range("B1").Select 
Selection.ClearContents 
Range("I4").Select 
Selection.ClearContents 
Range("K4").Select 
Selection.ClearContents 
Range("M4").Select 
Selection.ClearContents 
Range("H10").Select 
Selection.ClearContents 
Range("H16").Select 
Selection.ClearContents 
TextBox1.Value = "" 
End Sub 
Sub notebutton1_Click() 
Range("K8").Select 
Selection.Copy 
End Sub 
Sub notebutton2_Click() 
Range("K13").Select 
Selection.Copy 
End Sub 
Sub notebutton3_Click() 
Range("K18").Select 
Selection.Copy 
End Sub 
+1

如何告诉我们是什么高亮行,当您收到错误? – 2014-12-03 13:02:47

+0

请发布整个代码,因为我认为你的错误出现在其他地方... – 2014-12-03 13:11:58

回答

0

TextBox1.Value =“”应该是生活在形式陪同。因此,例如Userform1.TextBox1.Value =“”

+0

谢谢,就是这样。 – Michael 2014-12-04 14:02:09

+0

@Michael如果你还没有,请参阅http://stackoverflow.com/help/accepted-answer。 – pnuts 2014-12-18 15:08:25

相关问题