Ati*_*ish 1 excel vba serial-port arduino
我需要在 Excel 中创建一个按钮来从串行端口读取数据。我无法将任何额外的文件附加到 Excel 工作表上。我需要将此 Excel 文件传输到另一台计算机才能读取此数据。该文件的功能如下: 按 按钮选择串行端口。然后,按另一个按钮将数据从串行端口读取到 Excel 单元格中。有人可以告诉我该怎么做吗?使用VB宏还是ActiveX宏?抱歉,这是我第一次使用 Excel 来完成此任务。请帮助。同样,我无法将另一个文件附加到 Excel 工作表。谢谢你!
我在 german microcontroler.net 论坛上找到了关于这个主题的讨论:
http://www.mikrocontroller.net/topic/64788
由于我在 Linux 上运行,因此无法验证代码是否正确。无论如何,这是它的副本:
Sub Send_and_Read()
'--------------------------------------------------------
cmnd$ = "Hello World" 'A string to send
'--------------------------------------------------------
Open "COM1" For Binary Access Read Write As #1
cmnd$ = cmnd$ + Chr(13) 'add [CR] to command string
Put #1, , cmnd$ 'write string to interface
'--------------------------------------------------------
answer = "" 'clear response string
char = Input(1, #1) 'get first character
While (char <> Chr(13)) 'loop until [CR]
If (char > Chr(31)) Then
answer = answer + char 'add, if printable char
Else
' Do what ever you like
End If
char = Input(1, #1) 'get the next character
Wend
Close #1
'--------------------------------------------------------
Cells(1, 1) = answer 'put response in cell("A1")
End Sub
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
38737 次 |
| 最近记录: |