将工作表1中的1行数据复制到工作表2的2行中的更改数据

Question

我对VBA比较陌生。

我在10的{​​{1}}中有一个A1位数（1234567890），并希望在Sheet 1的{​​{1}}中使用连接值复制此数据（-qwerty）并再次在A1 sheet 2中使用另一个连接值（-abcdef）。因此，工作表A2的{​​{1}}中的最终值为sheet 2，A1的{​​{1}}中的最终值为2

同样，我想在1234567890-qwerty中填充A2行的Sheet 2行到1234567890-abcdef列n列。{ / p>

在excel中寻找VBA帮助。 提前谢谢。

Answer 1

我认为不需要VBA

只需在excel的Sheet2列A1中写一个公式

= Sheet1.A1 & "-qwerty"

然后在excel的Sheet2列A2中写一个公式

= Sheet1.A1 & "-abcdef"

或类似的东西

Answer 2

使用字符串连接进行直接值传输似乎是最简单的。

initialize

可以使用简单的公式和更多的字符串连接来完成批量传输。

sheet2.cells(1,1) = sheet1.cells(1, 1).value2 & "-qwerty"
sheet2.cells(2,1) = sheet1.cells(1, 1).value2 & "-abcdef"

填充公式后，单元格中的值将恢复为公式中的值（从而删除公式）。