Bonjour à tous et à toutes.
Je cherche comment faire pour lire une trame en port serie et la stockée dans une cellule.
Autant que sur vb.net je sais faire autant en vba je n'y arrive point.
J'ai tenté de modifier mon code vb.net vers vba mais cela ne marche pas problème de bibliotheque me semble t'il.

Je colle le code vb.net que j'ai
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
Imports System.IO.Ports.SerialPort
Public Class Form1
 
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim Detecteur As System.IO.Ports.SerialPort = New System.IO.Ports.SerialPort("com3")
        Detecteur.BaudRate = 9600
        Detecteur.DataBits = 8
        Detecteur.Parity = 0
        Detecteur.StopBits = 1
        Detecteur.Open()
        Button1.Enabled = False
        ' reception des donnes IR
        Dim chaine As String = Detecteur.ReadLine
        TextBox1.Text = chaine
 
        Detecteur.Close()
        Dim MonStream As System.IO.StreamWriter = New System.IO.StreamWriter("\\Srv-ad\utilisateurs\egeorges\Mes documents\essaiInfra.txt")
        chaine = chaine.Replace(" ", "X")
 
        MonStream.WriteLine(chaine)
        MonStream.Close()
        Button1.Enabled = True
 
    End Sub
 
End Class
Merci d'avance pour votre aide