PS.... I wrote:
Ostensibly, the Evaluate syntax should be:
PP = Evaluate("vlookup(" & rng & ",'[Code Master.xls]Sheet1'!B:K,4,0)")

That syntax as well as your original design assume that "Code Master.xls" is
already open in the same Excel instance.