You are only getting the cell address, you need the range of that address

Range("P1").Value = Range(Range("O2").Value & Range("M2").Value).Value
Range("P2").Value = Range(Range("O3").Value & Range("M3").Value).Value