This commit is contained in:
raytrace
2019-10-10 22:59:09 +09:00
parent 55f737dae5
commit c7ab6c5668

View File

@@ -377,7 +377,7 @@
Select Case Dr공조.공조방식.Trim ' Worksheets("공조처리시스템").Range("공조방식1").Offset(0, i_count_AHU - 1) Select Case Dr공조.공조방식.Trim ' Worksheets("공조처리시스템").Range("공조방식1").Offset(0, i_count_AHU - 1)
Case "정풍량" '정풍량" Case "정풍량" '정풍량"
V_dot_mech_m = V_dot_mech_max V_dot_mech_m = TOSG(T, Dr공조.급기풍량) '/////////20191010 V_dot_mech_max 를 공조급기풍량으로 수정
Case "변풍량" '변풍량" Case "변풍량" '변풍량"
'//계산결과가들엉잇는 12개월용시트(1~12)에ㅓ 해당값을 찾는 엑셀루틴이다. 이건좀 교환하기가 그러네;;ㅠ '//계산결과가들엉잇는 12개월용시트(1~12)에ㅓ 해당값을 찾는 엑셀루틴이다. 이건좀 교환하기가 그러네;;ㅠ
@@ -601,7 +601,7 @@
End If End If
If eta_ABL <> 0 Then If eta_ABL <> 0 Then
P_V_ABL_m = V_dot_mech_m * Delta_p_star_ABL / eta_ABL / 3600000 P_V_ABL_m = TOSG(T, Dr공조.배기풍량) * Delta_p_star_ABL / eta_ABL / 3600000 ''/////////20191010 V_dot_mech_max 를 공조배기풍량으로 수정
Else Else
P_V_ABL_m = 0 P_V_ABL_m = 0
End If End If