问题描述
这是我正在使用的代码,而且我遇到这个问题。我是Excel的新手,我无法弄清楚是什么问题。
This is the code that I'm currently working with, and I'm getting this problem. I'm novice at Excel and I can't figure out what's wrong.
Private Sub cmdRecord_Click()
Sheets("BxWsn Simulation").Range("Result").Select //This is the line with the problem, as excel told me.
Selection.Copy
Sheets("Reslt Record").Select
Sheets("Reslt Record").Range("A5000").End(xlUp).Offset(1).Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False
Sheets("CuCon Simulator").Select
Application.CutCopyMode = False
Range("Improvement").Select
End Sub
错误是通过VBA选择Range类失败的方法,错误1004.
任何想法?
The error is Select method of Range class failed via VBA, Error 1004.Any ideas?
谢谢。
编辑:
所以我只是将代码更改为
So I just changed the code to
Sheets("BxWsn Simulation").Select
Range("Result").Select
我相信这是你的意思,使其活跃?
但是我仍然得到对象_Worksheet失败的Method'Range',错误1004
I believe this is what you mean by making it active?However I'm still getting Method 'Range' of object '_Worksheet' failed, error 1004
推荐答案
我相信你有在这里。
该表必须是活动的,然后才能选择一个范围。
I believe you are having the same problem here.
The sheet must be active before you can select a range on it.
另外,don不要使用工作表名称限定符:
Also, don't omit the sheet name qualifier:
Sheets("BxWsn Simulation").Select
Sheets("BxWsn Simulation").Range("Result").Select
或者,
With Sheets("BxWsn Simulation")
.Select
.Range("Result").Select
End WIth
这是一样的。
这篇关于通过VBA选择Range类的方法失败的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!