Advance Filter in sheet2 to move few column from sheet1 in difference order

[Jagdev Singh]

Hi Luke

Find the error. The line should be with the loop

For Each c In rngNames
    'Setup the AdvFilter
  Worksheets("RAW_Data").Range("DR2").Value = c.Value
    'For each name, get the records, and send the email
  Call FilterData
    Call Preview
c.Delete xlShiftUp
Next c

Thanks for the code.

Regards,
JD

 

[Luke M]

Yep, either way will work. Just glad you got it working.