Excel宏:快速将表格1 A列数据导入表格2 B列
以下是一种可能的解决方案:
-
打开表格1和表格2,并确保它们都在同一Excel工作簿中。
-
在表格1中,按下Alt + F11打开Visual Basic Editor。
-
在Visual Basic Editor中,选择菜单栏中的'插入'>'模块'。
-
在新的模块中,输入以下代码:
Sub ImportData()
Dim i As Integer
Dim lastRow As Integer
lastRow = Worksheets('Sheet1').Cells(Rows.Count, 'A').End(xlUp).Row '获取表格1中A列最后一行的行数
For i = 1 To lastRow
Worksheets('Sheet2').Cells(i, 'B').Value = Worksheets('Sheet1').Cells(i, 'A').Value '将表格1中A列的数据导入表格2中B列
Next i
End Sub
-
修改上述代码中的'Sheet1'和'Sheet2'为你实际使用的工作表名称。
-
按下F5运行该宏。表格1的A列数据将被导入表格2的B列中。
原文地址: https://www.cveoy.top/t/topic/lV0Z 著作权归作者所有。请勿转载和采集!