2015-05-13 4 views
0

Извините за основной вопрос, но многое в поисковых системах только дало мне сложные ответы. При нажатии кнопки я делаю копию другого рабочего листа, мне нужно скопировать какой-то текст с первого листа на этот вновь созданный рабочий лист одним и тем же нажатием кнопки (имя кого-то может отличаться. Ie sheet1 (1), sheet1 (2) . Я уверен, что это очень просто ссылки на активный лист, оцененная помощь.VBA Копирование текста с одного листа на рабочий лист

Private Sub CommandButton2_Click() 
ActiveWorkbook.Sheets("AUTHORITIES VISIT").Copy _ 
after:=ActiveWorkbook.Sheets("CREATE REPORT") 
End Sub 
+0

Просто делайте «листы (« SHEETNAME »)', которые будут ссылаться на имя листа, а затем просто выберите текст, который вы хотите скопировать. Просто замените «имя листа» на имя листа – Sam

+0

Имя листа изменяется, я копирую из Таблиц («СОЗДАТЬ ОТЧЕТ»), но я вставляю активный лист. – Andrew

+0

Это падает на последнюю строку? . Range ("b8") Выберите Selection.Copy ActiveWorkbook.Sheets ("авторитетами ВИЗИТ") Copy _ после:. = ActiveWorkbook.Sheets ("CREATE REPORT") ActiveSheet.Range ("C14") .Выбрать ActiveSheet.Paste End Sub – Andrew

ответ

0

Вы также можете посмотреть на записи макросов и попробовать его на свой собственный.

Этот код должен работать для вас :

Sub test() 
Sheets("AUTHORITIES VISIT").Copy After:=Sheets("CREATE REPORT") 
ActiveSheet.Cells(14, 3).Value = Sheets("CREATE REPORT").Cells(8, 2) 
End Sub 

Как я понимаю из ваших комментариев выше выкладывает лист «ВИЗИТЫ ВИЗИТА» после листа «СОЗДАТЬ ОТЧЕТ» и копирует из ячейки «СОЗДАТЬ ОТЧЕТ» «В8» в новую ячейку листа «C14»

Смежные вопросы