Hello,
I am trying to run:
*Cut value from cell A1
*Paste value in column B, only IF column A equals "Drinks"
Rick provided the code below for a similar requirement but would like to edited for th above.
Thanks in advance for your help!
"Dim Amount As Long
Amount = Cells(Rows.Count, "B").End(xlUp).Row
Range("F2:F" & Amount) = Evaluate("IF(B2:B" & Amount & "=""OK"",IN2:IN" & Amount & ",IO2:IO" & Amount & ")")"
Bookmarks