Excel VBA and Macros with MrExcel livelessons

[sugrue]

I think there is an error in the code for Lesson 17 where the headings are being copied over. Instead of:
WSD.Range("A1:E5").Copy Destination:=WSR.Range("A3")
it would be:
WSD.Range("A1:E1").Copy Destination:=WSR.Range("A3") <-- change E5 to E1


The way it is (E5), you are wiping out the first few rows that were copied over.

Jack

 

[MrExcel]

Yes... that sounds right... Copy the headings from A1:E1 over to row 3 on the report. I wonder if that "5" was a leftover fragment of thinking "R1C1:R1C5"...

Thanks for this note.

Bill

 

[sugrue]

Thanks Bill. I found another "gotcha" in lesson 20. The calculation:
WhatsLeft = ThisAmt - ServiceAmt

needs to be outside the If...End If. Otherwise, the commission is zero for invoices without Service agreements.

Jack