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

Excel VBAでセル内改行の挿入を行うには、定数・vbCrLfではなくvbLfを使いましょう。