使用Excel VBA将值读入图表
你能帮我解决一个看似简单的问题吗?注意,这个问题几乎是最后的选择,因为我尝试了所有常用的网站来寻找答案,但令人沮丧的是,没有成功 我正在使用excelvba。我想将工作表中的一些值复制到同一工作簿中的另一个工作表中 我产生的代码行如下:使用Excel VBA将值读入图表,excel,vba,Excel,Vba,你能帮我解决一个看似简单的问题吗?注意,这个问题几乎是最后的选择,因为我尝试了所有常用的网站来寻找答案,但令人沮丧的是,没有成功 我正在使用excelvba。我想将工作表中的一些值复制到同一工作簿中的另一个工作表中 我产生的代码行如下: Range(单元格(1,4),单元格(1,6))=工作表(“摘要数据”)。Range(单元格(1,4),单元格(1,6)) 这行代码生成“运行时错误1004” 如果我运行以下代码行,它将正常运行: 范围(单元格(1,4),单元格(1,6))=工作表(“摘要数据”
Range(单元格(1,4),单元格(1,6))=工作表(“摘要数据”)。Range(单元格(1,4),单元格(1,6))
这行代码生成“运行时错误1004”
如果我运行以下代码行,它将正常运行:
范围(单元格(1,4),单元格(1,6))=工作表(“摘要数据”)。单元格(1,4)
但是,我想将工作表“摘要数据”上的范围复制到另一个工作表中
请有人帮我管理我的血压,为上面的错误提供解释和/或解决方案吗?我会告诉简单的解决方案。开始录制宏,将要复制的单元格复制到另一张工作表并粘贴到该工作表,然后停止录制宏。然后转到visual basic编辑器并查看宏代码。旧问题,但是 也许您需要对您的声明进行限定:
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
看看这是否有帮助:)如果你还需要解释,请告诉我。