Disliked{quote} Try the code below to see if this works. -------------------------------- Private Sub Worksheet_Calculate() Dim X As Integer Set cmd = CreateObject("FXBlueLabs.ExcelCommand") For X = 3 To 30 If Cells(X, 4) = "Buy" And Cells(X, 6) = "You Can Trade" Then strResult = cmd.SendCommand(Cells(1, 2), "BUY", "s=" & Cells(X, 1) & "|v=1000", 5) End If If Cells(X, 4) = "Sell" And Cells(X, 6) = "You Can Trade" Then strResult = cmd.SendCommand(Cells(1, 2), "SELL", "s=" & Cells(X, 1) & "|v=1000", 5) End If Next X End SubIgnored
- #549
- Jun 19, 2021 3:15am Jun 19, 2021 3:15am
- Joined Nov 2015 | Status: Trader | 2,525 Posts
Practice makes a person perfect
- #550
- Jun 19, 2021 3:18am Jun 19, 2021 3:18am
- Joined Nov 2015 | Status: Trader | 2,525 Posts
Practice makes a person perfect
- #554
- Jul 12, 2021 5:05am Jul 12, 2021 5:05am
- Joined Nov 2015 | Status: Trader | 2,525 Posts
Practice makes a person perfect
- #558
- Aug 1, 2021 1:32am Aug 1, 2021 1:32am
- | Commercial User | Joined Feb 2015 | 1,380 Posts
When you are successful perhaps give a thought to others ... Kiva dot org
- #560
- Aug 1, 2021 8:30pm Aug 1, 2021 8:30pm
- | Commercial User | Joined Feb 2015 | 1,380 Posts
When you are successful perhaps give a thought to others ... Kiva dot org