Copying 'sliced' data

[ma0ffst08]

Hi guys,


I have a sheet set up with slicers.
The sliced data sits in a sheet called Impact, row 17 and 18 to row n.
Row 17 and 18 are header rows. Then data sits in row 19 downwards.


I want a macro which copies the 'sliced' data into a new workbook called Newbook, onto a sheet called analogue.


Currently my macro doesn't work, it copies all rows, whether included within the sliced data or not.


Any ideas greatly appreciated.


Thanks!