"空气物性计算加载宏-VBA.bas
直接导入Excel模板里,在Excel单元格里就可以直接调用函数进行计算了。
压力单位Pa,温度单位K,焓单位j/kg,比容单位m3/kg,密度单位kg/m3,熵单位j/kg.K,音速单位m/s,普朗特数没有单位,'导热系数单位W/m.K,粘度单位'kg/m.s。
H_PT_Air(P,T),根据压力,温度计算焓值;
S_PT_Air(P,T),根据压力,温度计算熵值;
V_PT_Air(P,T),根据压力,温度计算比容;
rou_PT_Air(P,T),根据压力,温度计算密度;
yita_PT_Air(P,T),根据压力,温度计算粘度;
lamda_PT_Air(P,T),根据压力,温度计算导热系数;
Pr_PT_Air(P,T),根据压力,温度计算普朗特数;
Vs_PT_Air(P,T),根据压力,温度计算音速;
Z_PT_Air(P,T),根据压力,温度计算压缩因子;
还可以反算,如:
H_PS_Air(P,S)根据压力,熵反算焓
S_PH_Air(P,S)根据压力,焓反算熵
T_PH_Air(P,H)根据压力,焓反算温度
T_PS_Air