Как изменить ячейку копирования

[ren23rus]

Добрый день. Подскажите пожалуйста как скопировать строки в разные листы, но только в определенную строку. На данном этапе все работает, но не могу прописать копирование строк в 90-ю строку.

Sub Copy()
'
Dim i As Long, ws As Worksheet, aws As Worksheet
Application.ScreenUpdating = False: Set aws = Sheets("Îò÷åò")
For i = aws.Cells(Rows.Count, 1).End(xlUp).Row To 3 Step -1
If aws.Cells(i, 1) <> "" Then
On Error Resume Next: Set ws = ThisWorkbook.Sheets(CStr(aws.Cells( i, 1)))
If Err <> 0 Then
Set ws = Sheets.Add: ActiveSheet.Name = aws.Cells(i, 1): On Error GoTo 0
aws.Cells.Copy
ws.Cells.PasteSpecial Paste:=xlPasteColumnWidths
ws.Cells.PasteSpecial Paste:=xlPasteColumnWidths
End If
aws.Rows(i).Copy ws.Cells(Rows.Count, 1).End(xlUp).Offset(1)
End If: Next
End Sub

[IgorGO]

worksheets(X).cells(90,1).paste