vba - 从串口读取到 Excel

Question

我需要在 Excel 中创建一个按钮来从串口读取数据。我不能将任何额外的文件附加到 Excel 工作表中。我需要将此 excel 文件传输到另一台计算机以读取此数据。以下是文件的功能假设： 按下按钮选择串行端口。然后，按另一个按钮将数据从串行端口读取到 excel 单元格中。有人可以告诉我该怎么做吗？使用 VB 宏还是 ActiveX 宏？对不起，这是我第一次使用excel。请帮忙。同样，我不能将另一个文件附加到 Excel 工作表。谢谢！

Answer 1

我在这里的德国 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