2017-03-01 91 views
0

我似乎无法找到适合我的代码的正确答案。Excel vba Underscore。删除_

我试图删除Sheet1 我敢肯定,第一行下面我的代码将工作

但我抛出一个运行时错误“438”。对象不支持此属性或方法。

Worksheets("Sheet1").Range("1:1").Delete_ 

以下是我的代码:

Option Explicit 
Sub C2P() 
     Worksheets("Sheet1").Range("C:C,F:F").Replace _ 
      What:=",", replacement:=".", LookAt:=xlPart 
     Worksheets("Sheet1").Range("1:1").Delete_ 
End Sub 

任何反馈,将不胜感激。谢谢!

+3

“Delete_”错字? – TnTinMn

+0

不,它不是!也许这是造成问题@TnTinMn –

+0

@TnTinMn哈!它确实有用!请发布一个问题,我会接受它。谢谢! –

回答

1

在删除方法名称中有一个额外的字符。
Worksheets("Sheet1").Range("1:1").Delete_
删除下划线。

学习使用“F1”键调出内置的帮助系统。这是有原因的。