Function abc(X As Range) Dim XR As Integer, XC As Integer XR = X.Row XC = X.Column abc = Application.Average(Range(Cells(XR - 2, XC), ...
確定! 回上一頁