‘大概思路如下Sheets("B").Select '激活BRows("1:2").Select ’选中前两行Selection.Delete Shift:=xlUp ‘删除'4、复制你要的数据'5、激活sheets("A").Select'6、粘贴到指定的位置
