셀 내에서 줄 바꿈을 포함하여 셀 내용을 가져 오는 방법은 무엇입니까?

Question

".Value"함수를 사용하여 줄 바꿈이있는 셀의 문자열 값을 가져 오려고합니다. 아래 B6 셀 B7을 참조

:

구문 내가 사용하고 있습니다 :

Dim foo as String 
foo = Range("B6").Value 

B6와 B7 모두 수익을 단 한 줄의 문자열로 예를 들면, "친애하는 Anon, 친절하게 부여합니다 ..."나는 줄 바꿈을 포함하여 실제 값을 가져야합니다.

내가 원하는 것을 성취 할 수있는 방법이 있습니까?

미리 감사드립니다.

편집 :

실제로 내가 이메일을 통해 보낼 수있는 HTML 콘텐츠에 문자열을 짓고 있어요. 이것으로, 셀이 실제로 줄 바꿈을하는지 확인하고 각 줄 바꿈을 html 태그 "<br>"- 으로 바꿔야합니다. 셀 내용을 실제로 바꾸지 않아도됩니다.

당신은 줄 바꿈을 포함하여 실제 값을, 필요한 경우 사용

Answer 1

..

<br>"Dear Anon,<br><br>Kindly grant the corre....."

당신이 도움이 될 수 있습니다 희망 당신이 현재 가지고있는 코드 : 내가 좋아하는 무언가로 변환하는 세포 B6에서 가져온 값이 필요합니다 당신이 줄 바꿈이 문자열에 포함 된 것을 볼 수 있습니다 그 문 다음에 MsgBox foo, 또는 Debug.Print foo와 같은 문을 포함하는 경우,

Dim foo as String 
foo = Range("B6").Value 

을 즉.

---

업데이트 된 질문을 바탕으로 사용해보십시오 줄 바꿈 문자를 제거하고 그 자리에 문자열 "<br>"를 삽입합니다

Dim foo As String 
foo = Replace(Range("B6").Value, vbLf, "<br>") 

.

Answer 2

이것은 LINEBREAK에서 < BR>

Dim str As String 
    str = Range("B6").Value 
    str = Replace(str, Chr(10), "<br>")