Hello everybody, I have some problems with the program CAPCOST 2008 because it give me a runtime error. After I chose an heat exchanger and fill in every request, debug underlines the red part:
iTemp = roundAmount(lCp)
Range("userAddedExchangers").Select
ActiveCell.Offset(iSelection, 7).Value = "=ROUND(" & _
(lCp / Range("CEPCI")) & "*CEPCI, " & iTemp & ")"
ActiveCell.Offset(iSelection, 7).Style = "Currency"
ActiveCell.Offset(iSelection, 7).NumberFormat = _
"_($* #,##0_);_($* (#,##0);_($* ""-""??_);_(@_)"
Can anyone help me, please?
iTemp = roundAmount(lCp)
Range("userAddedExchangers").Select
ActiveCell.Offset(iSelection, 7).Value = "=ROUND(" & _
(lCp / Range("CEPCI")) & "*CEPCI, " & iTemp & ")"
ActiveCell.Offset(iSelection, 7).Style = "Currency"
ActiveCell.Offset(iSelection, 7).NumberFormat = _
"_($* #,##0_);_($* (#,##0);_($* ""-""??_);_(@_)"
Can anyone help me, please?