Я получаю сообщение об ошибке на линии gTempConvC =. Я думаю, что это ^, но не уверен, что заменить его, так как я не вижу, чтобы найти их использование в листе Excel. Эта формула была использована в листе, и теперь я конвертирую ее в VBA
Function gTempConvC(thermistorCnt As Integer, refRCnt As Integer) As Single
Dim CoA As Single
Dim CoB As Single
Dim CoC As Single
Dim CoD As Single
Dim Rth As Single
Dim Kth As Single
CoA = 0.0009180023
CoB = 0.0001964561
CoC = 0.0000007061775
CoD = 0.00000005283566
Kth = -273.15 'Constant Degrees Kelvin
'=((A12*(71500+1000)/B12)-1000) where A12 is thermistorCnt & B12 refRCnt
Rth = ((thermistorCnt * (71500 + 1000) / refRCnt) - 1000)
'=(-273.15)+(CoA+CoB*LN(C12)+CoC*LN(C12)^2+CoD*LN(C12)^3)^-1
gTempConvC = (Kth) + (CoA + CoB * Log(Kth) + CoC * Log(Kth) ^ 2 + CoD * Log(Kth) ^ 3) ^ -1