Excel VBA sendkeys问题

各位好,我需要写一段代码,可以让我依次选中第一行中所有的单元格,之后对每个单元格安F2+回车。求帮助。谢谢... 各位好,我需要写一段代码,可以让我依次选中第一行中所有的单元格,之后对每个单元格安F2+回车。求帮助。谢谢 展开
 我来答
轮回岂无边关3
推荐于2016-12-02 · TA获得超过1.1万个赞
知道小有建树答主
回答量:1100
采纳率:100%
帮助的人:303万
展开全部
sendkeys 有2个参数的,第2个参数为TRUE,则 Microsoft Excel 等待击键处理完后再将控制返回到宏
那么你写成
Application.Quit
Application.SendKeys "{tab}",TRUE
Application.SendKeys "{enter}",TRUE

这样应该行了,MSDN说,向对话框发送按键时,需要先调用SENDKEYS...,我在做试验时,你上写的2种方法都可以正常退出..没看出区别,可能是我们的EXCEL版本不一样
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
【名臣】f2
推荐于2016-06-29 · TA获得超过1911个赞
知道大有可为答主
回答量:1594
采纳率:0%
帮助的人:1519万
展开全部

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

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

 你要列,我却弄成行的

更多追问追答
追问
是的,日期的问题,选中之后输入F2+回车貌似就解决了,有什么好办法吗?谢谢
追答
从什么改成什么?直接点就行了。不用给他绕弯
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
人生如戲我來演
2013-07-11
知道答主
回答量:3
采纳率:0%
帮助的人:4333
展开全部
Sub test2()
Dim i As Integer

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

End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式