Курсовая работа: Программная модель поиска глобального минимума нелинейных "овражных" функций двух переменных

End Sub

Private Sub TB6_Change()

Range("Z1").Select

ActiveCell = TB6.Text

Range("f2").Select

ActiveCell = Range("z1")

EndSub