Всем привет! Есть такой кусок кода, который под определенной основной строкой добавляет новые строки и заполняет их значениями. нужен код, который вставит формулу в последнюю добавленную строку. Вопрос в том, как обозначить или как определить в vba эту последнюю добавленную строку в которую мне надо вставить формулу. Формула должна быть следующей: в основной строке вручную пишется сумма, в новых добавленных строках пишутся слагаемые этой суммы, а последняя строка из этих новых-добавленных рассчитывается как сумма в основной строке минус все слагаемые из новых строк выше.
Код добавления и группировки строк:
Помогите пожалуйста
Код добавления и группировки строк:
| Код |
|---|
Dim i, j As Integer
Sheets("060").Select
For i = 25 To 500
For j = 17 To 100
If Cells(i, 46) = 1 And Sheets("060").Cells(i, 44) = Sheets("Ном").Cells(j, 5) Then
Rows(i + 1).EntireRow.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Sheets("Ном").Select
Sheets("Ном").Range(Cells(j, 7), Cells(j, 32)).Select
Selection.Copy
Sheets("060").Select
Range(Cells(1 + i, 47), Cells(1 + i, 47)).Select
ActiveSheet.Paste
Rows(i + 1 & ":" & i + 1).Select
Selection.Rows.Group
End If
Next j
Next i |
