Я новичок в VBA и столкнулся с проблемой с макросом вставки / значения / транспонирования. Мне нужно иметь возможность копировать информацию из нескольких рабочих книг с разными именами, однако рабочая книга, в которую она будет вставлена, будет одинаковой, за исключением ячеек, в которые она будет вставлена.
Я попытался изменить («Лист») фактическое имя листа, которое называется «Сводка стоимости работ», а также изменить «Лист» на «Лист1». Одна вещь, которая происходит, когда я копирую информацию из рабочей книги, она показывает строку хэшированной информации, которую я скопировал, но как только я нажимаю «макросы», хэш-метки исчезают. Не уверен, если это важно.
Sub Pasteinfo()
Dim WS As Worksheet
Set WS = ThisWorkbook.Worksheets("Sheet1")
WS.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Transpose:=True
End Sub
Я надеюсь на макрос, который позволит мне взять ранее скопированную информацию из рабочих книг и рабочих листов с разными именами, вставить их в качестве значений и перенести в другую рабочую книгу.
Когда я запускаю код выше, я получаю ошибку 9, которая говорит: «Подстрочный индекс вне диапазона».