VBA Code:
If range("A1") > 0 And range("A1") <> 0 Then
SendSpecialKeys("[field+]")
ElseIf range("A1") < 0 And range("A1") <> 0
SendSpecialKeys("[field-]")
End If
>0 is +ve; <0 is negative but 0 is neither so you really have 3 conditions to worry about. What I wrote will do nothing if cell is 0 but I'm thinking it could be simpler:
VBA Code:
If range("A1") > 0 Then
SendSpecialKeys("[field+]")
ElseIf range("A1") < 0
SendSpecialKeys("[field-]")
End If
This will also do nothing if cell value is 0.
Perhaps you will need to worry about no value in the cell as well.
Provide your own range/cell reference instead of A1. Could also be done with a Select Case block.
BTW, you rarely need to use Call statement.