Hi everyone,
I have a table in excel which i need to add extra lines on the bottom as and when they arise from another lot of source data.
I've written a macro that does this but the problem is that because i'm copying and pasting the data in my excel table range doesn't extend to the new rows and I don't know how to extend it.
This is what i've got so far...
Sheets("Counters").Select
Range("AH4").Select
ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh
Range("AH3").Select
ActiveCell.Offset(1, 0).Range("A1").Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.Copy
Sheets("Tracker").Select
Range("TrackerTable[[#Headers],[Reference]]").Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Is there anything I can add in at the end which will extend my table range?
Hopefully that is clear, I can try and upload a sample workbook but i'll have to take out all the confidential stuff.
Thanks,
Alice
Bookmarks