VBA 从一个Excel文件复制一行数据到另一个Excel文件

最新推荐文章于 2024-08-13 08:39:15 发布

小飞鱼通达二开

最新推荐文章于 2024-08-13 08:39:15 发布

阅读量8w

点赞数 6

分类专栏： VBA 文章标签： excel vba

本文链接：https://blog.csdn.net/upi2u/article/details/7094513

版权

VBA 专栏收录该内容

6 篇文章 3 订阅

订阅专栏

临时用到VBA，做一个需求：把不在同一个文件中的数据复制到一个文件中。

新建过程，如下：

Sub 复制行()
    Dim mybook As Workbook
    Set mybook = Workbooks("2011明细表.xls")
    
    Dim target As Workbook
    Set target = Workbooks("详单.xls")
    
    mybook.Sheets("sheet1").Rows(6).Copy target.Sheets("sheet2").Cells(1, 1)
    
    Set mybook = Nothing
    Set target = Nothing
End Sub

Cells(1,1)也可以用Range("A1")来表示，更直观。

一开始，运行时总会报错“下标越界”，最后发现是不支持sheet为中文，改成英文就OK了。

另外一点是需要把两个文件都打开，这个还没找到怎么处理。