Добрый вечер уважаемые форумчане!
Прошу Вашей помощи в написании макроса.
Есть пользовательская форма которая вносит данные в ячейки
необходимо еще и вносить формулу
[vba]Код
Private Sub CommandButton1_Click()
Dim iLastRow As Long
iLastRow = Cells(Rows.Count, 4).End(xlUp).Row + 1
Cells(iLastRow, 1) = Me.TextBox1
Cells(iLastRow, 2) = Me.TextBox2
Cells(iLastRow, 3) = Me.TextBox3
Cells(iLastRow, 4) = Me.TextBox4
Cells(iLastRow, 6).Formula = "=(A1/C1)*100"
End Sub
[/vba]
Необходимо что бы при переходе от строчки до строчки менялось A1/C1
для второй A2/C2, для третей A3/C3