I am attempting to use the macro as written, from
http://www.rondebruin.nl/copy2.htm. I have tried using the "Copy a range of
each sheet" macro and also the "Copy from row 2 till the last row with data"
macro. Each time I try to run them I get " Compile error:sub or function not
defined" and visual basic is highlighting the following

For Each sh In ThisWorkbook.Worksheets
If sh.Name < DestSh.Name Then
Last = LastRow(DestSh) LastRow is highlighted
shLast = LastRow(sh)

Is there something I need to define?