2012-04-25 156 views
0

请帮助我看起来很简单的问题吗?请注意,这个问题已接近成为最后的解决办法,因为我尝试了所有常用网站来找到答案,但令人沮丧,没有成功。使用Excel VBA将值读入图表

我正在使用Excel vba。我想将工作表中的一些值复制到同一工作簿中的另一个工作表中。

的我已经产生代码的行如下所示:

Range(Cells(1, 4), Cells(1, 6)) = Worksheets("Summary Data").Range(Cells(1, 4), Cells(1, 6))

这行代码产生一个“运行时错误1004”。

如果我运行下面的代码行运行良好:

Range(Cells(1, 4), Cells(1, 6)) = Worksheets("Summary Data").Cells(1, 4)

不过,我想“摘要数据”复制的范围表上到另一个工作表。

请有人帮助我管理我的血压,提供上述错误和/或解决方案的解释?

+0

看看这有助于:) HTTP ://stackoverflow.com/questions/8047943/excel-vba-getting-range-from-an-inactive-sheet让我知道你是否还想要一个解释。 – 2012-04-25 19:18:38

回答

0

我会告诉简单的解决方案。开始录制宏并复制要复制到另一个工作表的单元格,然后粘贴并停止录制宏。然后转到Visual Basic编辑器并查看宏代码。

0

老问题,但...

也许你需要有资格的声明:

Range(Cells(1, 4), Cells(1, 6)).Value = _ 
    Worksheets("Summary Data").Range(Cells(1, 4), Cells(1, 6)).value

以上的完全限定的范围:

Dim ws1 As Worksheet, ws2 As Worksheet 
Set ws1 = ActiveSheet 
Set ws2 = Worksheets("Summary Data") 

ws1.Range(ws1.Cells(1,4), ws1.Cells(1,6)).Value = _ 
    ws2.Range(ws2.Cells(1,4), ws2.Cells(1,6)).Value