
Ниже приведен код VBA, использованный в видео:
«Код создан Сумитом Бансалом с сайта TrumpExcel.com»
Подразделение SplitEachWorksheet()
Тусклый FPath как строка
Приложение FPath.ActiveWorkbook.Path
Application.ScreenUpdating False
Application.DisplayAlerts False
Для каждого ws в ThisWorkbook.Sheets
ws.Copy
Application.ActiveWorkbook.SaveAs Имя файла:FPath & /"///" & ws.Name & /".xlsx/"
Application.ActiveWorkbook.Close False
Следующий
Application.DisplayAlerts True
Application.ScreenUpdating True
Конец субтитра
Чтобы использовать этот код, вам необходимо сохранить книгу Excel (из которой вы хотите разделить листы) в той же папке, где вы хотите хранить отдельные файлы.
Это видео является частью моей серии «Excel — это две минуты», где я делюсь простыми и быстрыми советами, которые помогут вам ускорить работу и повысить эффективность.
Бесплатный курс Excel — https://trumpexcel.com/learn-excel/
Платное онлайн-обучение — https://trumpexcel.com/excel-training/
Лучшие книги Excel: https://trumpexcel.com/best-excel-books/
️ Снаряжение, которое я рекомендую:
Камера — https://amzn.to/3bmHko7
Устройство записи экрана — techsmith.z6rjha.net/26D9Q
USB-микрофон — https://amzn.to/2uzhVHd
Беспроводной микрофон: https://amzn.to/3blQ8uk
Освещение — https://amzn.to/2uxOxRv
Подпишитесь, чтобы каждую неделю получать потрясающие советы по Excel: https://www.youtube.com/user/trumpexcel?sub_confirmation1
Примечание. Некоторые из этих ссылок являются партнерскими!
#Excel #Советы по Excel #ExcelTutorial
Пожалуйста, воспользуйтесь возможностью подключиться и поделиться этим видео со своими друзьями и семьей, если вы считаете его полезным.
No Comments