작동 시키려면 VBA를 필요로합니다. 이렇게하면 시작할 수 있습니다.
Sub writeKeysValues()
Dim i As Integer
Dim outFile As String
Dim fNum1 As Integer
'Open file
outFile = "C:\temp\outfile.txt"
fNum1 = FreeFile()
Open outFile For Output As fNum1
'loop through non-blanks
i = 1
With Worksheets("Book1")
Do Until .Cells(i, 1).Value = ""
Print #fNum1, "|" & .Cells(i, 1).Value & vbTab & .Cells(i, 2).Value
i = i + 1
Loop
End With
'All done
Close #fNum1
End Sub
참고 :
- 당신은 엑셀 매크로 사용 스프레드 시트 (.xlsm)로 파일을 저장해야합니다.
- 빈 키에서 읽는 것을 멈 춥니 다.
- 쓰기가 C : \ temp \ outfile.txt에 하드 코드됩니다.
이것은 코드 디자인 콘테스트에서 우승 할 것이지만 원하는대로 정확하게 파이프와 탭으로 작성하는 방법에 대한 아이디어를 제공해야합니다.
어떤 Excel 버전을 사용하고 있습니까? 데이터가 이미 A 열의 키와 B 열의 값으로 포맷 되었습니까? – rajah9
염두에두고 특정 버전은 없지만 2010 년 가능성이 큽니다. 열 a는 키이고 열 b는 값입니다. 나는 | 엑셀을 편집하는 사용자로부터 그래서 퍼팅 | 모든 키의 시작 부분에 이상적이지 않습니다. –
a, place 앞에 열을 삽입하는 것이 좋습니까? 칼럼에 넣은 다음 숨기시겠습니까? Excel 파일을 .txt로 내 보내면 필드 사이에 원하는 탭을 넣을 수 있습니다. (키와 | 키 사이에 여분의 탭이 있습니다.) – rajah9