Скопируйте и вставьте на VBA Excel

Question

Мне не удалось найти какой-либо код, уже опубликованный для фактического копирования всей строки (например, формы)

, а затем вставлять внизу в первомпустая строка базы данных.

Может кто-нибудь помочь, пожалуйста?Спасибо

форма A6: AY

Answer 1

Не проверено с мобильного:

Sub CopyPaster()

With ActiveSheet
     .Range("A6").EntireRow.Copy
     .Cells(Application.WorksheetFunction.CountA(.Range("A:A")+3,1).PasteSpecial xlPasteValues 'Plus 3 to account for the two blank cells in column A
End With

End sub