插入VBA程序后，可直接在EXCEL单元格调用函数进行计算。函数参数：P压力MPa、T温度℃、dp差压kPa、density密度kg/s、D1_20管道20℃时的内径、D2_20文丘里管20℃时喉部直径、alfa1管道膨胀系数、alfa2文丘里管膨胀系数。