그래서, 정확히 내가 원하는 것을하는 코드가 있습니다 : A1 셀의 내용을 사용하여 텍스트 파일에 새 줄을 추가합니다. 하지만 파일을 보면 줄에 "새 줄"문자가 있습니다. 해당 문자를 작성하는 코드를 피하려면 어떻게해야합니까?
그게 내 코드입니다.
Sub append_data()
Dim srtfile_path As String
strfile_path = "C:\Users\me\textfile.txt"
output = StrConv(Worksheets("Sheet1").Range("A1"), vbUnicode)
linebreak = StrConv(vbNewLine, vbUnicode)
Open strfile_path For Append As #1
Print #1, output + linebreak
Close #1
End Sub
명시 적으로 작성중인 줄 바꿈뿐만 아니라 텍스트 파일에서 한 줄을 다음 줄과 구분하는 줄 바꿈도 삭제하려면 문 ;
끝에 세미콜론 ( )을 추가해야 Print
합니다.
Sub append_data()
Dim srtfile_path As String
strfile_path = "C:\Users\me\textfile.txt"
output = StrConv(Worksheets("Sheet1").Range("A1"), vbUnicode)
Open strfile_path For Append As #1
Print #1, output;
Close #1
End Sub
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다