Macro to Add Consecutive Numbers

I am using Excel 2010 and need a macro that will enter consecutive numbers in a column for one type of spreadsheet used at my company.

I have Microsoft query populate my spreadsheet and once the query refreshes, I run a macro to duplicate the applicable number of lines that I need. The one piece that is missing is I need to have one of the columns populated with consecutive numbers, 1, 2, 3, 4, and so on until the end of the duplicated data.

I know that I can use the Fill function, but these particular spreadsheets are for users with very basic Excel skills--the more I can automate them, the better for everyone! I am fairly new at VBA and writing macros, but am trying to learn as quickly as possible.

Thanks in advance for all your help!

Mary