读书人

vb向EXCEL2007发送回车如何不能跳到上

发布时间: 2012-12-14 10:33:08 作者: rapoo

vb向EXCEL2007发送回车怎么不能跳到下一个单元格呢?
本帖最后由 sosoben 于 2012-08-13 12:52:44 编辑 现在串口传送过来一系列数据已经通过sendmassage输到某一单元格了

 For i = 1 To Len(str)
SendMessage hwnd, WM_IME_CHAR, Asc(Mid(str, i, 1)), 1
Next


现在我想他自动跳到下一个单元格继续输入

但无论我用
  SendMessage hwnd, WM_KEYDOWN, VK_RETURN, 0
SendMessage hwnd, WM_KEYUP, VK_RETURN, 0

还是
 SendKeys ("{ENTER}") 


都无效,上面最多只能在单元格内换行,下面那个更不行,会使我的数据少了一个数
但是在excel里面按回车分明就是跳到下面的单元格啊,困扰新手啊!在线求高手解答。。。
[最优解释]
postmessage试试
[其他解释]
不用发送回车,用VBA选中你要填写数据的单元格直接填写数据就可以了
[其他解释]
直接在当前行数+1再赋值就行了
[其他解释]
怎么没人教啊? 是不是太深了不属于基础类啊? 是不是分不够啊,可以说啊,万事有商量
[其他解释]
引用:
现在串口传送过来一系列数据已经通过sendmassage输到某一单元格了
VB code
For i = 1 To Len(str)
SendMessage hwnd, WM_IME_CHAR, Asc(Mid(str, i, 1)), 1
Next


现在我想他自动跳到下一个单元格继续输入

但无论我用
VB code
SendMessage hwnd, WM_K……


怎么一条回复都没有?太难了还是太少分了啊? 我再加!!!
[其他解释]
引用:
不用发送回车,用VBA选中你要填写数据的单元格直接填写数据就可以了


不是用VBA 是我要弄一个通用的读码程序,可以实现读完一个码输到一个单元格自动换一个单元格再读码,
包括其他没有excel的地方(例如wps,OPEN office)

要是VBA的话 我只能特定用这个EXCEL才能读码,不够通用
[其他解释]
引用:
直接在当前行数+1再赋值就行了


那个EXCEL 文件不是特定的一个文件, 我想实现光标(鼠标)所在位置输出我在串口读到的信息(这已经成功了,主要是不会到下一个单元格,明明按回车就会下的,但用VB送回车不能下)

要是开了很多excel呢? 我怎么知道当前读的是哪个excel?

如果不是用EXCEL呢? 那我怎么识别当前行数?



[其他解释]
  SendMessage hwnd, WM_KEYDOWN, VK_RETURN, 0
SendMessage hwnd, WM_KEYUP, VK_RETURN, 0


我加了一句后,我的就程了在元格行了
[其他解释]
该回复于2012-08-16 15:17:58被版主删除
[其他解释]
引用:
postmessage试试


真的OK了,当然我自己也改成了不再鼠标位置输入,而是在光标位置输入,最后都成功了!!

读书人网 >VB Dotnet

热点推荐