|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
1. 엑셀 버전(95,97,2000,2002):
2. 윈도우즈의 버전(win95,win98,winME,winNT,win2000,winXP):
3. CPU (486,PentiumI/II/III/IV...):
4. RAM (32,64,128,256,512MB,1G...):
* 아래줄에 질문을 작성하세요 >>
1174번에 해결방법이 있어서 화일다운받아서 실행하였더니 컴파일 오류(선택적인수가 아닙니다)가 나네요..
Private Sub Workbook_Open()
fname = Application.GetOpenFilename
If fname = False Then Exit Sub
Open fname For Input As #1
Line Input #1, Str -> error : Str에서 선택적 인수가 아니라고 메세지가 나오네요..
r = 1
Do While Not EOF(1)
Cells(r, 1) = Str
Line Input #1, Str
r = r + 1
If r > 65536 Then
Sheets.Add
r = 1
End If
Loop
Close #1
End Sub
그리고 화일 열자 자동으로 실행되는데 그러면 txt화일이름은 어떻게 불려오나요?
==============[자유님 글에 대한 답변입니다]==============
변수 str의 선언이 안되었군요...
수정해서 다시 올립니다.
그리고 파일이름은 application.getopenfilename 이라는 문이 파일열기 창을 띄우게 되어 있습니다. |
|