复制" X"数据行

时间:2016-12-16 17:50:21

标签: excel-vba vba excel

我需要构建一个允许我将一系列数据复制到剪贴板的宏,但该数据存储在每日更改的行数中。为了澄清,我在这个空白工作表上有两个标签,我每天都会填写。标签1被称为" Recap",并根据我在" Recap"中键入的内容。选项卡我有数据拉入我的第二个标签,名为" Exception Log"通过"如果"公式。数据拉入A8到F8,列E为空白,这样如果我复制A8:F8,它会匹配另一个电子表格中的格式,我将粘贴数据。有些日子里只有3行数据意味着我想要A8:F10复制到剪贴板但其他日子有30行数据意味着我想要A8:F37复制到剪贴板。为了尝试使这更容易一些,我向Cell H5添加了一个基本计数公式,它计算了包含数据的行数,因此我希望从第8行开始从列A到F复制的行数但是我无法弄清楚如何将其用于宏。有任何想法吗?提前谢谢!

1 个答案:

答案 0 :(得分:1)

示例:要从Sheet1中的范围复制到Sheet2中从C6开始的另一个范围:

Range("A8:F13").Select
Selection.Copy
Sheets("Feuil2").Range("C6").Select
ActiveSheet.Paste

如果你的行号是H5:

n=range("H5").value
Range("A8:F" & n).Select
Selection.Copy
Sheets("Feuil2").Range("C6").Select
ActiveSheet.Paste