Я запустил этот макрос с тех пор, как я его запомнил, и он никогда не завершался с ошибкой, сегодня ему не удалось скопировать 4 листа в новый файл, возвращая ошибку «Отказано в доступе»
Информации об этой проблеме не так много, поэтому я попытался проверить, что я все запускаю от имени администратора, чтобы запустить Excel в качестве администратора. Однако, это не работает только с файлами .xlsm, остальные работают нормально
Код не выполняется в первой строке, когда используется команда Copy. Предполагается создать новую рабочую книгу с копиями этих листов. Вместо этого отображается сообщение об ошибке «Отказано в доступе», а в конце отображается «: \ name.temp», где имя начинается с «VB», а некоторые цифры после этого всегда меняются, когда я пытаюсь повторить попытку.
Worksheets(Array("POS", "VAL", "COL2(USD)", "COL2(PS)")).Copy
Sheets("POS").Select
Cells.Copy
Cells.PasteSpecial xlPasteValues
Sheets("VAL").Select
Cells.Copy
Cells.PasteSpecial xlPasteValues
Sheets("COL2(USD)").Select
Cells.Copy
Cells.PasteSpecial xlPasteValues
Sheets("COL2(USD)").Select
Cells.Copy
Cells.PasteSpecial xlPasteValues
Кто-нибудь знает, как это исправить?