Copy, Countif, Paste Macro

Hey everyone,

To start, I'm less than a novice when it comes to programming & VBA. I'm looking for a macro that can paste a value down a certain number of rows. The number of rows to count down will be determined by the number in a given column. This value will change for certain rows. The number to be pasted will also change for certain rows. Below is a sample of the data. Attached is a sample of the data.

Property, Count, TotalSF, $PSFAdj
7, 8, 132410, 239.78
8, 0, 0,
9, 0, 0,
10, 0, 0,
11, 0, 0,
12, 0, 0,
13, 0, 0,
14, 0, 0,

For example, I'm looking for a macro that can paste the "$PSFAdj" value, 239.78, down according to the number in the "Count" column, 8 rows. There are roughly +860K rows. Both the $PSFAdj and Count numbers will change occasionally throughout the data set so a static reference to the cell or number doesn't work.

Thanks in advance. I appreciate all your help and time. Have a great one.

from looking at your form looks like all you are asking for is auto filtering on column J. Here is the code to do that but it is a build in to excel. If you are using office 2007 you can find it under the data tab.

Sub Macro1()
'
' Macro1 Macro
'

'
    ActiveWorkbook.Worksheets("Sheet1").AutoFilter.Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Sheet1").AutoFilter.Sort.SortFields.Add Key:=Range _
        ("J1"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
        xlSortNormal
    With ActiveWorkbook.Worksheets("Sheet1").AutoFilter.Sort
        .Header = xlYes
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
End Sub