Just can't get the LEN/MID thing quite right...
ste mac skrev:
If Len(ActiveSheet.Cells(xlrow, 10).Value = 2) Then
two1 = Left(ActiveSheet.Cells(xlrow, 10).Value, 1)
two2 = Mid(ActiveSheet.Cells(xlrow, 10).Value, 2, 1)
End If
Seems you have the rightmost parenthesis in the wrong place, move it a
couple of characters to the left :)
/impslayer, aka Birger Johansson
|