我已经制作了一个计算器来计算2个参数(Re
和De
),获得3个输入(Channel No
,Flow rate
和Flow direction
)并使用VLOOKUP计算5个中间变量(Area
,Perimeter
等。
现在,为了制作一些图形,我需要逐个设置输入值,以便在广泛的有效输入中获得输出(Re
和De
)。但是,手动执行此操作需要很长时间。
是否有 公式 将值分配给输入单元格并返回计算器的输出值?
编辑:
在VBA中实现它并不是什么大不了的事。但是,使用函数执行此操作可能是一个不错的主意。
Sub btnPopulateData_Click()
Dim Ch As Integer
Dim FD As Integer
' FD: Flow direction
FD = 1
For Ch = 1 To 7
Sheets("Calculator").Range("M3").Value = Ch
For Q = 0.5 To 9 Step 0.5
Sheets("Calculator").Range("M4").Value = Q
Sheets("Forward Graphs").Cells(5 + Ch, 3 + Q / 0.5).Value = Sheets("Calculator").Range("M11").Value
...
Next
Next
End Sub