I just inserted a new sheet, copied the code and ran it.
It worked.
I think the "major" difference there that I had Type:=xlCellValue and
you had Type:=xlExpression.
Davids solution also worked.
He included an = in front of the 2 quotes.
I blame me just being careless..