У меня есть книга Excel, которая с помощью кода VBA открывает другую книгу, копирует некоторые данные в оригинал, а затем закрывает вторую книгу.
Когда я закрываю вторую книгу (используя Application.Close), я получаю запрос:
Вы хотите сохранить буфер обмена.
Есть ли в VBA команда, которая обходит это приглашение?
Если можно, я добавлю еще одно решение: вы можете просто отменить буфер обмена с помощью этой команды:
Application.CutCopyMode = False
Я сталкивался с этой проблемой в прошлом - судя по всему, если вам действительно не нужен буфер обмена в момент выхода, вы можете использовать то же простое решение, что и я. Просто очистите буфер обмена. :)
ActiveCell.Copy
Если вы не хотите сохранять какие-либо изменения и не хотите, чтобы при сохранении файла Excel с помощью макроса появлялась подсказка «Сохранить», то этот фрагмент кода может быть вам полезен.
Sub Auto_Close()
ThisWorkbook.Saved = True
End Sub
Поскольку для свойства Saved задано значение True, Excel реагирует так, как если бы книга уже была сохранена и с момента последнего сохранения не произошло никаких изменений, поэтому запрос на сохранение не отображается.
Есть простой обходной путь. Предупреждение появляется только тогда, когда у вас в буфере обмена большой объем данных. Просто скопируйте случайную ячейку, прежде чем закрыть книгу, и она больше не будет отображаться!
Просто очистите буфер обмена перед закрытием.
Application.CutCopyMode=False
ActiveWindow.Close
предлагаемое решение редактировать работает, если вы замените строку
Set rDst = ThisWorkbook.Sheets("SomeSheet").Cells("YourCell").Resize(rSrc.Rows.Count, rSrc.Columns.Count)
с участием
Set rDst = ThisWorkbook.Sheets("SomeSheet").Range("YourRange").Resize(rSrc.Rows.Count, rSrc.Columns.Count)
