Insert Rows and add Title

[chacha]

Hopefully someone can help me with this or point me in the right direction

The end user of the spreadsheet will enter the number of members in a structure (in cell C6).
I want to create this number of rows beginning in row 9. In the 1st cell of each row I want to have "Member 1", "Member 2" and so on until this list agrees with the user input.

Thanks in advance for any help you can give.
Cha

[Bob Phillips]

Public Sub ProcessData()
Dim i As Long

With ActiveSheet

For i = 1 To .Range("C6").Value
.Range("A9").Cells(i, 1).Value = "Member " & i
Next i
End With

End Sub