2009-10-27 5 views
0

1 열만있는 일반 Excel 스프레드 시트가 있습니다. 나는 그것을 구분 기호로 텍스트 파일로 보내고 싶다. 컬럼을 분리하는 것에 관심이 없습니다. 컬럼이 하나 밖에 없기 때문입니다. 내 관심사는 줄 바꿈 대신 구분 기호를 사용하여 내 마지막 결과가 "item1", "item2", "item3"...과 같은 간단한 목록이되도록 내보내는 것입니다. item1, item2 및 item3은 Excel 파일의 다른 행에서 같은 열에있었습니다. 이 작업을 Excel에서 바로 수행 할 수 있습니까? 나는 줄 바꿈으로 만 최종 파일을 얻을 수있다. 감사!Excel에서 줄 바꿈없이 텍스트 파일로 내보내기

답변

1

"VBA"를 사용하여 해당 열의 셀을 반복하여 내용을 파일로 인쇄해야합니다.

0

vba 솔루션을 원하지 않고 max. 256 행을 사용하면 사용 된 셀을 복사하여 A1의 다른 시트로 바꾸어 붙여 넣을 수 있습니다.

이제 모든 값이 연속으로 저장되며 시트를 * .csv로 내보내거나 저장할 수 있습니다. 셀 값은 세미콜론으로 구분되지만 은 따옴표로 묶이지 않습니다! 문자 메시지 작성자가 ;" ;"으로 바꿀 수 있어야합니다.

VBA 루프가 더 좋은 솔루션입니다.

0

ADO 및 GetString을 사용할 수 있습니다.

Dim cn As Object 
Dim rs As Object 

strFile = Workbooks(1).FullName 
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strFile _ 
    & ";Extended Properties=""Excel 8.0;HDR=No;IMEX=1"";" 

Set cn = CreateObject("ADODB.Connection") 
Set rs = CreateObject("ADODB.Recordset") 

cn.Open strCon 

strSQL = "SELECT F1 FROM [Sheet1$]" 

rs.Open strSQL, cn 

str = rs.GetString(2,,"|") 

추가 정보 :

1

당신이 신속하고 우아 할 단지의 분리와 연결하여 오른쪽으로 세포를 사용하려면 http://www.w3schools.com/ADO/met_rs_getstring.asp이 (세미콜론 말).

=A1 

을 그리고 B3에 넣고 아래로 채우기 : A2에서 데이터를 시작 가정, B2에 넣고

=B2&";"&A3 

당신은 B 열의 아래 셀에 원하는 텍스트를.

관련 문제