拷贝数据

-4

我努力实现以下目标：拷贝数据

的HR，他为每个新的候选人在一个表中输入数据，这些数据主要是对每月的费用和每年。

什么，他正在寻找的是有一个添加按钮，在那里他可以添加一些选定的数据到另一个工作表，以建立某种形式的报告，所以每当他补充说它将被保存在一个新的生产线，在新数据其他表。

2017-08-14 Mohammed Alamoudi

没有看你的代码，这将是很难找出问题是什么。请提供您迄今为止所尝试的内容以及问题出现在代码中的位置。此外，工作表的快照和最终结果应该是什么样子。这将帮助我们确定问题。 – Zac

我没有代码开始，我不擅长VBA编码，我的朋友告诉我，我可以用VBA 基本上在工作表“EcE” 我有员工姓名，职位，基本工资，住房等。 ..在单元格D4，D5，D6等...我想要它将这些数据复制到另一个工作表“报告”行格式，然后当我再次单击添加它将添加另一个数据（相同的领域）在一个新行 –

试试这个。你在一张表中说每个新的候选人。所以你在宏中看到的数据是在范围（E4：E7）的“Ece”表中，因为你说它是在D4：D6 ..）。它只是复制，然后粘贴在表格第二行与转置功能报告。当您再次点击添加时，它将复制并粘贴到报告表的下一行。如果您的数据仅适用于工作表中的一位候选人，则此功能可用

Sub Macro1() 
' 
' Macro1 Macro 
' 

' 
Sheets("EcE").Select 
    Range("E4:E7").Select 
    Selection.Copy 
    Sheets("Report").Select 
    Range("A2").Select 
    lMaxRows = Cells(Rows.Count, "A").End(xlUp).Row 
Range("A" & lMaxRows + 1).Select 
    Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ 
     False, Transpose:=True 
    Range("A1").Select 



End Sub

来源

2017-08-14 12:08:01

谢谢@skimante Valentaite 我想复制D8到B5，D9到C5，D15到H5 E15到Q5，D23到N5等......我有一些结构在第一个条目表这应该是在另一个工作表中的行格式，我有大约23个单元格，在一张我想要以特定格式复制到另一个工作表，不像Range（“E4：E12）例如，如上所述，他们将从我的报表中的第5行开始并继续 –

D8在EcE表中，B5在报表中 –

回答

相关问题