Disliked{quote} @mtharwat, The file doesn't have any VBA code for me to check.Ignored
Sub Execute_Trade()
Set cmd = CreateObject("FXBlueLabs.ExcelCommand")
Dim X As Integer
For X = 4 To 31
If Cells(X, 15) = "Yes" And Cells(X, 14) = "Long" Then
strResult = cmd.SendCommand("1336976", "BUY", "s=D4|v=1000", 5)
Else: Cells(X, 15) = "No"
End If
If Cells(X, 13) = "Trade Condition Met" Then
Cells(X, 15) = "Yes"
End If
If Cells(X, 15) = "Yes" And Cells(X, 14) = "Short" Then
strResult = cmd.SendCommand("1336976", "Sell", "s=D4|v=1000", 5)
Else: Cells(X, 15) = "No"
End If
Next X
End Sub