VBA Errors

Hi

I have inhertited a workbook with VBA script already detailed out. I am adding the following code to populate my worksheet with my required formula once the report is run from our MIS

Sheets("Analysis").Select
Dim n As Integer
n = ActiveSheet.Range("A1").End(xlDown).Row
Range("a2").Select
Selection.AutoFill Destination:=Range("a2:a" & n)

Each time I try and run the report I get one of the following errors

Error 1004 : Autofill method of range class failed
Error 6 : overflow

I am not familiar with VBA to fully understand where the problem lays. Attached is my worksheet. I am taking the information from our MIS which will be published in Student Data and pulling the information I want into my Analysis tab (where the formula is).

Can anyone help?

It's not exactly clear what your code is supposed to do but the attached worksheet has a essentially blank worksheet, so the line to define where to autofill the formula to (n = activesheet.range("A1").end(xldown).row) returns 2, so you try to autofill A2 to A2 which gives the error I think. I'm guessing that you should be working out the number of lines from the student data worksheet rather than the analysis worksheet (you also can do it all in one go, rather than individually like you do in your code. Try something like:

Sheets("Analysis").Range("A2:N" & Sheets("student data").Range("A" & rows.count).end(Xlup).row).formula = Sheets("Analysis").Range("A2:N2").formula

Thank you - that worked