Function sgRatio(Temp As Double) As Double
sgRatio = 1.00130346 - 0.000134722124 * Temp + 0.00000204052596 * Temp ^ 2 - 2.32820948E-09 * Temp ^ 3
End Function
Function corSG(SG As Double, Temp As Double, CalT As Double) As Double
corSG = SG * (sgRatio(Temp) / sgRatio(CalT))
End...