vba 如何把sheet1的数据复制到sheet2最后一行的下一行？

把A4：M15区域有效数据复制到sheet2的最后一行的下一行。

因为表里有公式，所以需要只复制有数值的数据（剃除0或者空值）

只复制最后显示出来的数值

推荐答案 2018-05-02

å¤å¶çè¯å¥ï¼

Sheet1.Range("A4:M15").Copy
å¯»æ¾ä¸ä¸è¡çåæ³æ¯ï¼
Sheet2.Cells(Rows.Count,1).End(xlUP).Offset(1,0)
å¨æåä¸è¡éæ©æ§ç²è´´ï¼åªç²è´´æ°å¼çè¯å¥æ¯ï¼
Sheet2.Cells(Rows.Count,1).End(xlUP).Offset(1,0).Specialaste xlValues
ä½ éè¦çé¦å°¾ä¸¤ä¸ªè¯å¥ï¼ä¸é´ä¸ä¸ªåªæ¯è§£éè¿½é®

è¯·é®ä¸ï¼æä½¿ç¨ä¹åæç¤ºä¸æ¯æè¯¥å±æ§ææ¹æ³ããã

温馨提示：答案为网友推荐，仅供参考

当前网址：http://77.wendadaohang.com/zd/GNNY3vYWI8q8qGqvvYv.html

相似回答

将工作表某一区域的数值复制粘贴到另一个工作表某一行的下一行及...答：当前工作表为SHEET1目标工作表为SHEET2 复制区域为 A1:B10 粘贴到SHEET2的A3 SUB 复制粘贴()Range("A1:B10").Copy Sheets("Sheet2").Select Sheets("Sheet2").Range("A3").Select ActiveSheet.Paste END SUB

想在excel里用VBA,点击按钮复制一行数据到另外一行,可是不知道该怎么写...答：Private Sub ComboBox1_Change()Sheet2.Cells(1, 1).Value = ComboBox1.ValueDim i As Integeri = 2Do While Not i > 100000If Sheet3.Cells(i, 1) = "" ThenSheet3.Cells(i, 1).Value = Sheet2.Cells(1, 1).ValueSheet3.Cells(i, 2).Value = Now()GoTo lastlineElsei = i...

excel vba 如何将sheeet1中第一行的数据赋值给sheet2中最后一行啊?答：sheets("import").Range("1:1").copy sheets("export").Range("A" & num)

vba如何copy wb1的sheet1到wb2的sheet2后面?vba是wb2中的脚本答：需要用代码代开Sub test2() dim wb as Workbook Dim copySht As Worksheet, afterSht As Worksheet Set wb = Workbooks.Open("D:\wb1.xls") Set copySht = wb.Sheets("sheet1") Set afterSht = ThisWorkbook.Sheets("sheet2") copySht.Copy after:=afterShtEnd Sub ...

如何用VBA判断符合条件的数据复制粘贴到相应工作表?答：Set targetSheet = Worksheets("Sheet2") ' 指定目标工作表 lastRow = sourceSheet.Cells(Rows.Count, 1).End(xlUp).Row ' 获取最后一行数据 For i = 2 To lastRow ' 逐行遍历源数据 If sourceSheet.Cells(i, 1) = "需要筛选的条件" Then ' 如果符合条件，则将该行数据复制到目标工作表...

VBA两表格之间的数据复制答：a=sheet1.usedrange.rows.count,b=sheet1.usedrange.colounms.count.c=sheet2.usedrange.rows.count,d=sheet2.usedrange.colounms.count.然后用个循环 for h=1 to a for i= 1 to b sheet2.cells(c+a,d+b)=sheet1.cells(a,b)这样不改变原来表二的数据，把表一的数据全部复制过来 ...

excel怎样把一行的数据复制到下一个答：1、公式法，比如要把sheet1中B2单元格内容复制到sheet2的A1单元格，A1单元格的公式为：=sheet1!B2，如果是连续的可以下拉公式，你说的情况不是连续单元格，就只能这样了 2、编程法，可以根据你的需要，通过录制或是直接手动输入的方法生成vba程序段，然后通过的手工编辑，从源位置读取数据，然后把内容...

大家正在搜

vba 从多个表复制数据到一个表 vba 多个sheet一起复制将sheet复制多个的vba vb复制sheet至另一个工作簿 vba复制行到另一个工作表 vba 复制一行 vba复制一个excel文件 vba运行后保留复制 vba如何复制图表