Hello,

I have Error Run-Time Error on the VBA procedu
Can someone help me?

If ActiveCell.Value = "SP" Then
Set CellWithValueToMatch = ActiveCell.Offset(0, -2).Value
--
Regards,
Jeff