82问答网 > 在excel中我想在sheet1添加一个vb按钮点击后sheet2的第一行添加到sheet1的第一列中

在excel中我想在sheet1添加一个vb按钮点击后sheet2的第一行添加到sheet1的第一列中

2025-04-09 01:35:18

推荐回答（4个）

回答1：

为什么要用VB啊？
直接复制了，然后选择性黏贴中选择“转置”就可以了。
不过如果一定要VB的话，我帮你做好了。
有百度Hi么？加我，我帮你搞定

回答2：

复制下面的代码到宏，你添加一个按钮把宏加进去，就可以了！

Sub 转置()
ends = Sheet2.Cells(1, Columns.Count).End(xlToLeft).Column
Q = Cells(1, ends).Address
Sheet2.Range("a1:" & Q).Copy
Sheet1.Range("a1").PasteSpecial 12, , , True
End Sub

这个你试一下

回答3：

看错了，转置吧

回答4：

不清楚

在excel中 我想在sheet1添加一个vb按钮 点击后sheet2的第一行添加到sheet1的第一列中

在excel中我想在sheet1添加一个vb按钮点击后sheet2的第一行添加到sheet1的第一列中