セル内改行には vbCrLf ではなく vbLf を使いましょう:Excel VBA Rangeオブジェクト/セル数式
Excel VBAでセル内改行の挿入を行うには、定数・vbCrLfではなくvbLfを使いましょう。