Преобразование разрывов строк в Excel в vbCrLf?

Question

В моих столбцах есть разрывы строк, но как их преобразовать в vbCrLf при чтении с Range("A" & r).Value?

Answer 1

В Excel разрывы строк в ячейках представлены vbLf, , а не vbCrLf.

Вы можете заменить разрывы строк вручную:

Dim CellValue As String

CellValue = Replace(Range("A" & r).Value, vbLf, vbCrLf)

Это заменяет все разрывы строк в Excel стандартными переносами строк в Windows.