Bonjour,
J'ai trouvé sur ce forum du code VBA pour envoyer un signal sur le port série:
Mais est-ce que l'on peut faire de même pour envoyer un signal sur le port parallèle?
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 Private Sub CommandButton1_Click() With MSComm1 'configuration du port If .PortOpen Then _ .PortOpen = False 'ouverture du port .CommPort = 1 'On utilise le port COM1: '.Handshaking = 2 'RTS '.RThreshold = 1 '.RTSEnable = True 'mieux pour le port COM: .Settings = "9600,n,8,1" '.SThreshold = 1 .PortOpen = True 'ouverture du port .OutPut = "c'est moi" .PortOpen = False 'ouverture du port End With End Sub
Merci pour votre aide
Soph
Partager