我需要一个VBA代码从一张纸上移动特定单元格(在代码中也可以称之为Sheet1),单元格需要复制:AA5,AA6,AA7,AA8和AA10 .
需要复制的单元格需要连续粘贴到另一张纸(sheet2)(AA5 - A,AA6-B,AA7 - D,AA8 - F和AA10 - G)显然,A,B等等我的意思是sheet2中的列 .
如果要将单元格A1从Sheet1复制到Sheet2
Sheets("Sheet2").Range("A1").Value = Sheets("Sheet1").Range("A1").Value
如果要复制多个单元格,请创建一个函数
Sub paste() Sheets("Sheet2").Range("A1").Value = Sheets("Sheet1").Range("A1").Value Sheets("Sheet2").Range("A2").Value = Sheets("Sheet1").Range("A2").Value Sheets("Sheet2").Range("A3").Value = Sheets("Sheet1").Range("A3").Value End Sub
那就叫你这样的方法:
Call paste()
让我知道更多信息
或者你可能试图这样做:
Sheets("Sheet2").Range("A1").Value = Sheets("Sheet1").Range("A1").Value & "," & Sheets("Sheet1").Range("A2").Value
1 回答
如果要将单元格A1从Sheet1复制到Sheet2
如果要复制多个单元格,请创建一个函数
那就叫你这样的方法:
让我知道更多信息
或者你可能试图这样做: