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