Actually, all your values are Doubles -- since you're picking them up from the
worksheet directly.

I think I'd check each cell's value to see if it's numeric.

My bet is that you have a non-numeric value in one of those cells.



Marcotte A wrote:

I have a macro that basically copies data from one worksheet to another
(within the same workbook). Below are two lines of code. The first
executes, but the second gives me a Run Time Error 13 - Type mismatch. I've
formatted all relevant cells the same, and all my variables are singles.

ReportSht.Cells(CurrRow, 4) = (MasterSht.Cells(i, 8) + _
MasterSht.Cells(i, 9)) * ReportSht.Cells(5, 3)

ReportSht.Cells(CurrRow, 6) = (MasterSht.Cells(i, 10) + _
MasterSht.Cells(i, 11)) * ReportSht.Cells(5, 3)

--

Dave Peterson