Ошибка выполнения «9» при копировании рабочего листа в другую книгу

Я пытаюсь написать макрос, чтобы скопировать «Sheet1» из одной книги в другую, но я продолжаю получать ошибку времени выполнения «9»: «Подстрочный код» выходит за пределы диапазона.

Sub CopySheetToOtherWbk() Dim CopyFromBook As Workbook Dim CopyToWbk As Workbook Dim ShToCopy As Worksheet Set CopyFromBook = Workbooks("AllBugs.xlsx") Set ShToCopy = CopyFromBook.Worksheets("Sheet1") Set CopyToWbk = Workbooks("YourFriendlyNeighborhoodTemplateWorksheet.xlsx") ShToCopy.Copy After:=CopyToWbk.Sheets(CopyToWbk.Sheets.Count) End Sub 

Выделенная линия – «Set CopyFromBook = Рабочие книги (« AllBugs.xlsx »)». Не уверен, что я делаю неправильно здесь. Относительно новый для VBA. Любая помощь приветствуется.

Коллекция « Workbooks относится ко всем открытым книгам. Если книга не открыта, вам нужно будет сделать это в первую очередь.

 Set CopyFromBook = Workbooks.Open("C:\Some Location\AllBugs.xlsx") 
  • изменение ошибки div0 в значение (получение ошибки 13) vba excel
  • Ввод Excel VBA в SAP и извлечение электронной таблицы - застрял в Excel
  • Определенная пользователем или объектная ошибка при вставке формулы в VBA
  • Как вставить диапазон на другой рабочий лист с фильтрами
  • IF ... (AND) ошибка времени выполнения инструкции "13"
  • Ошибка времени выполнения над условным форматированием в VBA
  • Ошибка выполнения «9» Подзаголовок вне диапазона - Диапазоны копирования
  • Экспорт XML-файла из Excel
  • Ошибка RunTime на макросе VBA
  • Ошибка времени выполнения '13' VBA Macro Excel
  • #REF! вставлен как значение, но не рассматривается как таковое при циклировании
  • Interesting Posts

    Написание кода для экспорта из веб-службы, очистка данных, а затем импорт в другую веб-службу

    Объединить заголовки строк и столбцов

    Есть ли способ автоматической настройки ширины столбцов Excel с помощью pandas.ExcelWriter?

    Импорт листа Excel в Asp.Net

    Использование ActiveX Control для вставки пользовательской карты Google в рабочий лист

    Excel автоматически преобразуется в формат h.mm

    EXCEL Получить подмножество строк из столбца даты без VBA

    Большой файл Excel, импортированный в базу данных SQL Server

    Использование дат из ячейки или именованного диапазона в запросе Sql

    Перемещение определенных столбцов на основе критериев поиска

    Формула для выбора диапазона в сводной таблице

    Как разбить числа на разные части

    COM-надстройка для Excel не загружается при запуске Excel, открывая файл

    Excel interop – сохранение моей недавно созданной таблицы делает исключение

    Синтаксис MDX для DAX-измерений, рассчитанный с помощью AVERAGE ()

    Давайте будем гением компьютера.