récupération données sous une autre appli

[legolas86]

Bonjours à tous.
A partir d'excel j'envoie des commandes sur une appli en langage homme machine. Actuellement ma macro fonctionne mais je n'attend pas un acquitement de ma commande pour envoyer une autre commande (j'ai une fonction sous VBA "patiente_bis" qui me met une temporisation. Maintenant je voudrait attendre un acquitement avant d'envoyer une autre commande et selon l'acquitement la commande sera différente. Pouvez-vous m'aider. Ci-dessous la macro:
Sub creation_dlci_nortel()


NOMNORTEL = Range("J20").Value
Dim putty As Integer
AppActivate (NOMNORTEL)
Patiente_bis (1)
SendKeys "end p" & "~", Wait:=True
Patiente_bis (2)
SendKeys "st p" & "~", Wait:=True
Patiente_bis (1)
ligne = 75
ligne:
ligne = ligne + 1
If ligne < 90 Then GoTo send Else GoTo fin:
send:
If Range("a" & ligne).Value = "" Then GoTo ligne:
SendKeys Range("a" & ligne).Value & "~", Wait:=True
Patiente_bis (1)
GoTo ligne:
fin:
End Sub