Excel VBA sendkeys问题

2024-11-17 07:32:02

推荐回答（3个）

回答1：

sendkeys 有2个参数的,第2个参数为TRUE,则 Microsoft Excel 等待击键处理完后再将控制返回到宏
那么你写成
Application.Quit
Application.SendKeys "{tab}",TRUE
Application.SendKeys "{enter}",TRUE

这样应该行了,MSDN说,向对话框发送按键时,需要先调用SENDKEYS...,我在做试验时,你上写的2种方法都可以正常退出..没看出区别,可能是我们的EXCEL版本不一样

回答2：

有这必要吗、是单元格文本型数字转值吗？

Sub lklkkl()
    For i = 1 To [a1].End(2).Column
        Cells(1,I).Select
        SendKeys "{F2}+{ENTER}"
    Next
End Sub

你要列，我却弄成行的

回答3：

Sub test2()
Dim i As Integer

For i = 1 To 256
Cells(1, j).Select
Application.SendKeys "{F2}"
Application.SendKeys "{ENTER}"
Next

End Sub