Нужно в цикле открывать книги и переносить обработанную в них информацию в новую книгу.
Казалось бы можно спокойно открыть в цикле книгу, изменить данные на листе этой открытой книги, перенести измененные данные в новую книгу, закрыть открытую книгу без сохранения. Но нифига не получается - открытая книга в которой провожу изменения записывается с изменениями.
Что не учитываю - подскажите?
Казалось бы можно спокойно открыть в цикле книгу, изменить данные на листе этой открытой книги, перенести измененные данные в новую книгу, закрыть открытую книгу без сохранения. Но нифига не получается - открытая книга в которой провожу изменения записывается с изменениями.
Что не учитываю - подскажите?
| Код |
|---|
Do While sFiles <> ""
Set importWB = Workbooks.Open(Filename:=sFolder & sFiles)
Set ws = importWB.Worksheets(1)
ws.Rows("1:2").Select
Selection.Delete Shift:=xlUp
importWB.Close savechanges:=False
Loop |
