A
alldreams
Could you help me get these conditions in VBA code?
':: first condition
IF A3 < A5 AND A4 > A5,
THEN A6 = A4 - A5 AND A7 = LONG.
IF A3 < A5 and A4 < A5
THEN A6 = A4 - A5 AND A7 = LOSS
IF A3 > A5 AND A4 < A5 THEN A7 = NOT LONG
':: second condition
IF A7 = null OR LOSS OR NOT LONG
THEN first condition for next column, B
IF A7 = LONG
THEN IF B4 > B5,
THEN B6 = B4-A5 AND A6 = 0 AND B7 = LONG.
IF B4 < B5 THEN B6 = B4-A5 AND A6 = 0 AND B7 = CLOSE
LONG.
':: This loops until the last nonblank value in row 1.
':: first condition
IF A3 < A5 AND A4 > A5,
THEN A6 = A4 - A5 AND A7 = LONG.
IF A3 < A5 and A4 < A5
THEN A6 = A4 - A5 AND A7 = LOSS
IF A3 > A5 AND A4 < A5 THEN A7 = NOT LONG
':: second condition
IF A7 = null OR LOSS OR NOT LONG
THEN first condition for next column, B
IF A7 = LONG
THEN IF B4 > B5,
THEN B6 = B4-A5 AND A6 = 0 AND B7 = LONG.
IF B4 < B5 THEN B6 = B4-A5 AND A6 = 0 AND B7 = CLOSE
LONG.
':: This loops until the last nonblank value in row 1.