Thanks for your response. You're exactly right, there are underlying formulas that are in these cells. I changed the code as you suggested by replacing the line 'FaultLR = Sheets("ReportSummary").Range("AN" & Rows.Count).End(xlUp).Row' with the line you provided but am getting an error "Run-time error '448': Named argument not found. Any ideas?