로그인 유지
이 게시판은 아별닷컴 회원만 질문을 올릴 수 있습니다. 회원에게 주어지는 특권인셈이지요. 회원이 아닌 분들은 열람만 가능합니다.
예를들어서
홍길동 서울시 010-111-2222
전우치 대구시 010-333-4444
라고 있을때
엑셀에서 이 파일을 불러들여서
| 홍길동 | 서울시 | 010-111-2222 |
| 전우치 | 대구시 | 010-333-4444 |
이런식으로 할 수 있나요??
2009.11.24 20:46:42 *.130.73.75
메뉴에서 파일 > 열기 하시고 파일형식은 "모든파일(*.*)"로 변경하신 다음 텍스트파일을 열면,
텍스트마법사가 뿅~하고 나타납니다.
원본데이터형식을 "구분 기호로 분리됨"으로 하시고, 다음 버튼 누르시고..
구분 기호에서 "공백(S)"체크하시고 마침 누르시면 원하시는 결과가 나올겁니다.
매크로로 기록하면 아래처럼 나오네요.
Sub openTextFile() Workbooks.OpenText Filename:="D:\DeskTop\test.txt", Origin:=949, StartRow _ :=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _ ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=False, Comma:=False, _ Space:=True, Other:=False, FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3 _ , 1)), TrailingMinusNumbers:=TrueEnd Sub
새 창으로
선택한 기호
엑셀 문의드립니다. [2]
VBA win7 64bit / 64bit 엑셀 / 32bit DLL의 사용법이 궁금합니다.
sum 함수 관련 질문있습니다~ [3]
VLookup 엑셀 글씨를 점수로 환산하는 방법 [3]
엑셀 질문 [2]
엑셀수식 검색창 만들기에 대한 질문 올립니다. [3]
셀서식(표시형식) 엑셀 피벗테이블 셀서식에 관한 내용입니다. [1]
엑셀수식 엑셀 데이터 선택을 통한 차트 자동 업데이트 [1]
엑셀탭 다른시트로 복사하기 [3]
엑셀 만게가 넘는 데이타에서 원하는 이하의 값 찾아내기 [3]
엑셀에서 동작에 따른 이벤트를 발생시킬 때... [1]
엑셀에서 TXT문서를 참조할 수 있나요? [1]
페이지 고정이요 [1]
VBA 파일&폴더 ExecuteExcel4Macro로 다른 파일 열지않고 셀 데이터 가져오기 시 실패
엑신께..문의합니다. [2]
엑셀일반 도대체 외부연결 값은 통합문서 어디에 저장이 될까요? [2]
엑셀일반 안녕하세요 재고의 연령분석에 대해 질문드립니다. [2]
감사합니다. 다시 한번 문의 드립니다. ^^: -조건부 서식의 셀 색상 참조 방법- [1]
피벗에서 질문 [1]
엑셀에서 Enter가 이상해요....ㅠ,,ㅠ [1]
![[레벨:1]](http://abyul.com/zbxe/modules/point/icons/default/1.gif "포인트:130point (14%), 레벨:1/30"){kind=icon}
이천
![[레벨:30]](http://abyul.com/zbxe/modules/point/icons/default/30.gif "포인트:141971point, 레벨:30/30"){kind=icon}
아별
메뉴에서 파일 > 열기 하시고 파일형식은 "모든파일(*.*)"로 변경하신 다음 텍스트파일을 열면,
텍스트마법사가 뿅~하고 나타납니다.
원본데이터형식을 "구분 기호로 분리됨"으로 하시고, 다음 버튼 누르시고..
구분 기호에서 "공백(S)"체크하시고 마침 누르시면 원하시는 결과가 나올겁니다.
매크로로 기록하면 아래처럼 나오네요.
Sub openTextFile()
Workbooks.OpenText Filename:="D:\DeskTop\test.txt", Origin:=949, StartRow _
:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=False, Comma:=False, _
Space:=True, Other:=False, FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3 _
, 1)), TrailingMinusNumbers:=True
End Sub