[EXCEL调用NISTREFPROP9.1.docxVIP

在EXCEl2010中直接调用NIST REFPROP的设置方法网上已经有很多在EXCEL中调用NIST REFPROP的设置方法，但是方法比较过时，本人也是试了好久才成功调用，先把主要步骤做下总结，现在电脑很多都是win8及win10的64位系统，所以针对64位的win10系统的安装方法声明：?1、为了保证安装成功，希望严格按照安装步骤进行；若安装完成遇到错误，对相应步骤调整即可。2、由于nist软件本身是32位软件，所以无论你怎么设置安装路径，都是C:\ProgramFiles (x86)\REFPROP下。D盘没有试过一、建立环境变量?打开“开始/控制面板/系统/高级系统设置/高级/环境变量”，如下图所示。 新建一个环境变量，变量名=RPprefix，变量值= C:\ Program Files (x86)\Refprop点击确定；?二、建立EXCEL加载项1、打开REFPROP安装文件夹下的Excel文件REFPROP.xls。?2、按“Alt+F11”键，打开VB编辑器（或者按开发工具/VB编辑器）。?3、打开右边Module，找到如下内容按“Ctrl+F”查找“Refprop.DLL”，并将其全部替换为C:\Program Files (x86)\Refprop\Refprop.DLL”，保存，并退出Excel。4、修改Refprop.DLL 中Declar为Declare PtrSafe 这一步比较关键有可能影响能否调用成功三、保存REFPROP为MicrosoftOffice加载项??打开第2步保存的REFPROP.xls文件“另存为……”，选择文件类型“Excel加载宏（*.xlam）”，默认的文件地址会变为“...\Microsoft\AddIns”，保存。?若未出现默认地址，在C盘搜索“*.xlam”，找到其所在文件夹，将保存的“REPROP.xlam”文件拷贝到该文件夹。?四、添加加载项AddIns打开一个空白Excel文件，在“文件/选项/加载项”中添加和激活“REFPROPAddIns”，确保其处于激活状态。?五、测试结果打开一个新的EXCEL空白文件，在任意一个单元格输入?=density(water,TP,SI,500,100)?如果显示为数值。恭喜你，成功了！如果显示错误，1.检查输入公式是否正确例如：是否有中文符号等；2.将安装目录中的文件夹fluid和mixtures，以及文件refprop.dll全部拷贝到REFPROP.xlam所存放的文件夹（...\Microsoft\AddIns），就OK了。附：常用函数举例MolarMass(Air)Temperature(argon,PD,SI,2,15)Pressure(r134a,TD,SI,400,50)Enthalpy(ethylene,TS,SI,300,3)Viscosity(oxygen,TP,SI,100,1)ThermalConductivity(nitrogen,Tliq,SI,100)Density(air,TP,E,70,14.7)Enthalpy(R32;0.3;R125;0.7,PS,molar si,10,110)Temperature(ethane;0.5;butane;0.5 ?mass,DH,E,30,283)SpeedOfSound(ammonia;0.4;water;0.6,TP,E,300,10000)Density(r218;.1;r123;.9,PH,cgs,7,180)Quality(methane;40;ethane;60 ?mass,TD,mks,200,300) kg/kgQuality(methane;40;ethane;60 ?mass,TP,mks,200,2814.5509) ?mass ratioQuality(methane;40;ethane;60 ?mass,TP,molar SI,200,2.8145509)?molar ratioHeatOfVaporization(octane,tliq,c,100)SurfaceTension(nitrogen,tl,SI,100)Viscosity(butane;.25;hexane;.75,TH,SI,300,-21)ThermalConductivity(carbon dioxide,.5,nitrogen,.5 ?mass,TH,SI,200,126)DielectricConstant(ethane;.5;propane;.5,tvap,SI,300)MoleFraction(R410A.MIX,1)mole2mass(R410A.MIX,1,A30,1-A30)mass2mole(R410A.MIX,1,0.5,0.5)L