如何用vba在两个excel之间复制数据

如何将aa.xls中sheet1中A1的数据复制到bb.xls中sheet1中B2里

aa.xls路径为D:/aa.xls
bb.xls路径为E:/bb.xls

用VBA应该如何实现。谢谢了。
如果A1中的数据是通过公式计算出来的,那么复制到B2中的也是带有公式的数据,如何只复制A1的数据到B2,不包括公式?

Sub Macro1()
Windows("aa.xls").Activate
Range("A1").Select
Selection.Copy
Windows("bb.xls").Activate
ActiveSheet.Paste
End Sub

前提是两个表都要打开才行!
温馨提示:内容为网友见解,仅供参考
第1个回答  2009-08-19
cells.PasteSpecial Paste:=xlPasteValues
粘贴时,用选择性粘贴,只要数值,就是上面的写法
另外告诉你个不求人的方法,用录制宏,完成操作后,自己看代码,我的vba就是这么学的,不明白的代码,去帮助或baidu里查。
第2个回答  2019-11-03
下标越界
应该是找不到
表格的意思
sheets(2)
的意思应该氏
表的名字是
2
如果你要表达
sheet2
直接用
sheet2.[b1:b10]
或者
sheets("sheet2").[b1:b10]
第3个回答  2009-08-11
后台打开

Workbook("aa.xls").sheets("****").Range("A1").Copy Windows("bb.xls").Sheets("***").Paste

请教如何利用VBA实现将一个工作表复制到另一个工作簿中
返回Excel主界面,点击"开发工具"下的"宏",找到并选择"复制表",然后点击"执行"按钮。此时,"工作表1"中的指定工作表"移动表"已成功复制到"工作表2"的第1个工作表中,操作过程直观且高效。通过这种方式,你可以轻松地使用VBA在Excel中实现工作表的复制,无需手动操作,大大提高了工作效率。

怎样用VBA自动提取跨多工作表的数据?
1. 理解VLOOKUP函数的基本原理:VLOOKUP函数是Excel中用于查找并提取数据的函数。其基本结构为`=VLOOKUP`。其中,“查找范围”可以跨工作表进行设定。2. 设置跨工作表的查找范围:要实现跨工作表的数据提取,首先需要在VLOOKUP函数的查找范围中指定另一个工作表的数据范围。这可以通过在工作表名后加上感叹号...

EXCEL VBA 求区域的重复复制与粘贴到不同区域的代码
' 循环遍历源数据区域 For i = 2 To lastRowSrc ' 检查当前行的数据是否符合复制条件 If wsSrc.Cells(i, "A").Value > "" And wsSrc.Cells(i, "B").Value > "" Then ' 计算目标区域的起始位置,按列间隔3,复制15个 For j = 1 To copyCount If j Mod columnInterval = 1 Then...

excel里面我想 用VBA实现调用另一个工作簿中的数据怎么解决
在Excel中,利用VBA可以轻松实现跨工作簿的数据调用。首先,你需要在工作簿的宏录制功能中开始操作。点击左下角的录制宏按钮,为即将执行的操作创建一个宏。在宏名处,输入一个易理解的名称,例如"DataTransfer",并选择存储在"个人宏工作簿"中,然后点击"确定"。录制完成后,通过点击停止录制宏按钮暂停...

vba将一个excel的数据复制到另一个excel中vba把一个表格内容复制到另外...
Public Sub Copy()Range(\\"A1:C10\\").Select '复制的区域,自行修改 Selection.Copy '复制 Workbooks(2).Activate'激活第二个BOOK Range(\\"A1\\").Select'区域,自行修改 ActiveSheet.Paste'粘贴 End Sub

怎么在两个excel表里面的内容同步更新呢?
你可以编写VBA脚本来自动同步两个表格的内容。例如,你可以设置一个按钮,当点击这个按钮时,VBA脚本会从一个表格复制数据到另一个表格。这种方法需要一定的编程知识,并且要小心处理数据,以避免数据丢失或错误。3. 使用链接 在Excel中,你可以将一个表格的数据链接到另一个表格。这样,当原始表格中的...

如何用vba在两个excel之间复制数据
Sub Macro1()Windows("aa.xls").Activate Range("A1").Select Selection.Copy Windows("bb.xls").Activate ActiveSheet.Paste End Sub 前提是两个表都要打开才行!

excel编程问题(两个表格之间的复制粘贴)
1、打开A文件,在excel中按Alt+F11键进入VBA编程窗口 窗口中工具栏第二个图标边上的小三角形下拉下出来,选择“模块”,这就会在VBA中插入一个新的模块 2、现在在左边栏双击模块1,然后进入右边模块代码的书写窗口,写入以下代码 --- Sub trans()Dim wk As Workbook Dim wkOpend As Boolean Dim...

如何把两个文件表格用VBA从另一个EXCEL表格导入数据到这个表格中?_百 ...
Set xlbook = ThisWorkbook.Application.Workbooks.Add(ListBox1.List(ll))Set xlsheet = xlbook.Worksheets(1)T11.Text = xlsheet.Range(T1.Text)xlbook.Close SaveChanges:=False xlsheet.Copy ThisWorkbook.Sheets(1)xlbook.Close SaveChanges:=False 若不明白之处,可联系848555411@qq.com ...

如何使用VBA 把第一个excel文件中的某一个单元复制到另一个excel文件中...
Sheets("Sheet1").Select 金币20到手 = InputBox("亲爱的老板~,当前是'工具'表,要放到哪个单元格呀?", "干活的搬运工")Range(金币20到手).Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False MsgBox "谢谢老板", vbOKOnly, "下班的...

相似回答