dimanche 19 avril 2015

How to paste copied data to the next empty cell

i need to paste the copied data to the next empty cell. i'm already done with my codes on copying the data. and i am getting trouble in pasting it. below is my code.



`Dim eRow As Long
Workbooks("Daily Task Tracker - March 2015.xlsx").Activate
Worksheets("Tasks").Activate
Sheets("Tasks").Select
eRow = WorksheetFunction.CountA(Range("A:A")) + 1
Cells(eRow, "A:G").PasteSpecial xlPasteValuesAndNumberFormats`


Could someone help me on finding the error on my syntax. Thanks. ur prompt response is much appreciated. :)


Aucun commentaire:

Enregistrer un commentaire