|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
1. 엑셀 버전 2000
2. win98,
3. CPU (IV
4. RAM (128,
* 아래줄에 질문을 작성하세요 >>
Sub 부평1공장()
ChDir "D:\My Documents\van\대우부평1공장"
Workbooks.OpenText Filename:= _
"D:\My Documents\van\대우부평1공장\b020B-20030722.xls", StartRow:=1, DataType:= _
xlDelimited, TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, _
Tab:=True, Semicolon:=False, Comma:=False, Space:=False, Other:=False _
, FieldInfo:=Array(Array(1, 1), Array(2, 1))
Cells.Select
Selection.Copy
Windows("대우VAN.xls").Activate
Sheets("부1").Select
ActiveSheet.Paste
End S
여기서......대우부평1공장에 b020B-20030722.xls 화일을 가지고 올려고 합니다
이파일은 날짜별로 바뀝니다..오늘이 07월22일 이니까...
위와 같이 됩니다..
날짜별로 들어오는 데이타엑셀파일을 가지고 올수 있는 방법이 없을까요?
내일 이면 b020B-20030723 인데..날짜별로 바꾸어서 오늘 날짜로 가지고 오는 방법이 없나요?
고수님들의 조언을 바랍니다. |
|