1、安装REFPROP文件后,找到REFPROP8.0的安装根目录(通常默认根目录是“C:\ProgramFiles\REFPROP”)下的REFPROP.xls文件。打开该文件后按Alt+F11打开VB程序界面,对该程序进行如下更改。
将程序中的
PrivateConst FluidsDirectory As String = “fluids\”
PrivateConst MixturesDirectory As String = “mixtures\”
改为:
PrivateConst FluidsDirectory As String = “C:\Program Files\REFPROP\fluids\”
PrivateConst MixturesDirectory As String = “C:\Program Files\REFPROP\mixtures\”
将程序中的”REFPROP.DLL”全部改为”C:\Program Files\REFPROP\REFPROP.DLL”,如图2所示(如果实际软件安装路径不同,则根据实际安装路径修改)。
2、完成以上更改后,将此EXCEL以”.xla”的格式另存到”Application Data\Microsoft\AddIns”目录下。不同计算机中这个路径所在位置会有所变化。但是在EXCEL中另存为”.xla”格式时,系统会自动寻找到”AddIns”这个文件夹的位置。
存储好REFPROP.xla文件后,需要在EXCEL中加载,才可以使用。在EXCEL中的EXCEL选项——加载项——管理EXCEL加载项 转到——勾选REFPROP AddIns——确定,OK。
经过以上步骤之后即可在EXCEL中通过调用函数直接计算制冷剂的物性参数。
首先,你的要把PropRef 作为Add-in,加入Excel。。。
加入步骤。。。建立环境变量、建立REFPROP加载项、添加加载项AddIn。。。
具体的添加方法你在NIST的网站可以找到详细说明。。。
然后,你就可以直接在Excel中进行批量计算流体性质了。。。就是 “=” + “函数名字”
具体的函数名字可以在 (fx) 那个按钮里的“用户自定义函数”中找到,如 Enthalpy, Temperatur, Density 等等。。。
举例——计算氦的焓值:在一个单元格输入 =Enthalpy(“Helium”,”PT”,”SI”, 0.1, 50)
解释:氦焓值,计算根据 压力(P) + 温度(T),单位为 SI 国际单位(kg, m, s, K, kmol, MPa …)
上式计算结果就是 0.1 MPa (1bar), 50 K 条件下的氦气焓值。。。
👍
好东西👍