|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
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...):
* 아래줄에 질문을 작성하세요 >>
여러 개의 엑셀파일을 열어서 지정된 칼럼 안에
셀서식을 텍스트로 만들어 번호를 순서대로 증가시키려 합니다.
내부루프까지는 돌렸는데...
텍스트 셀서식과 결정적으로 +1씩 증가를 못시키겠습니다...
0001, 0002, 0003.... 이렇게 네자리의 숫자로 1씩 증가시키고 싶은데 어찌 해야되는지...
의외로 쉬울거 같기도 한데..도와주세요~~^^;;
==============[yhy님 글에 대한 답변입니다]==============
황선생님 조언해주신 방법을 검토하다가 이해가 되지 않는 점을 질문드립니다.
----------------------------------------------------------------
Sub dhTest()
With Range("A1:A10")
.NumberFormatLocal = "0000"
.Cells(1).Value = 1
.Cells(1).AutoFill .Offset(0), xlFillSeries '//
End With
MsgBox "작업 완료", vbInformation, "MagicSheet & 엑사모::http://officedev.co.kr"
End Sub
Sub dhTest2()
With Range("A1:A10")
.NumberFormatLocal = "0000"
.Cells(1).Value = 1
.Cells(1).AutoFill.Offset (0), xlFillSeries '//에러가 나는 부분
End With
MsgBox "작업 완료", vbInformation, "MagicSheet & 엑사모::http://officedev.co.kr"
End Sub
----------------------------------------------------------------
dhTest()와 dhTest2()의 차이점은
.AutoFill이 들어간 행인데요...
dhTest()는 동작을 하는데 dhTest2()은 에러가 나네요
무슨 차이인지 눈을 크게 떠도 보이지 않아요
첨부파일이 문제의 파일입니다.
좀 알려주세요~~
|
|