Mình tạo dáng lại hàm bạn sưu tầm như dưới đây cho dễ nhìn:
Option Explicit
Private Function Nthep(Ra As Double, Ea As Double, L As Double, bB As Double, _
A As Double, Phi As Double, Kc As Double, X As Double) As Double
Dim I As Integer, No As Double
Dim SThep As Double, SThep1 As...