我经常需要将excel中的信息粘贴到各种表单中。如果我不必在复制和粘贴之间切换窗口,我会节省时间。我的想法是按一个按钮激活宏,这样它将复制第一个单元格,检查是否在另一个应用程序中执行了ctrl-v的任何实例,然后复制列中的下一个单元格。这可能吗?
为了让您了解我想要的是这个例子:
Dim rownum As Integer
Dim copiedtext As String
Sub Button1_Click()
rownum = 2
copiedtext = Range("B" & rownum).Value
Application.OnKey "^v", "ABC"
End Sub
Sub ABC()
ActiveCell.Value = copiedtext
rownum = rownum + 1
copiedtext = Range("B" & rownum).Value
End Sub
当然,在这个例子中,它只是在同一个应用程序中找到了按键,但希望能够正确解释我希望它如何工作的想法。谢谢你的帮助!