Я пытаюсь закрыть файл Excel.
Приведенный ниже макрос открывает файл необработанных данных, копирует данные и вставляет его в отчет.
Путь к файлу в ячейке A1 часто меняется, поэтому я не могу поместить имя файла в сам код VBA.
Шаги
1.) «Открыть» Открывает файл, расположенный в ячейке A1
2.) Диапазон копирования A1: S299
3.) Вставьте в «Строительный дамп данных»
4.) Закройте файл в ячейке A1
Sub Construction_Open()
'Opens File and Pastes Last years Construction Data
fileopen = ThisWorkbook.Worksheets("Construction Data Dump").Range("A1")
Workbooks.Open Filename:=fileopen, UpdateLinks:=0
Range("A1:S299").Copy
Windows("Construction Report for kelly.xlsm").Activate
Sheets("Construction Data Dump").Range("A2").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
Worksheets("Construction Data Dump").Range("A1").Close SaveChanges:=False
(CELL «A1») = N: \ Панель инструментов конструкции \ MVP \ 2019 YTD Data.xlsx