Macro to Split Separate Worksheets with User Input for Range Select (so close to working)

[vcs1161]

This macro is close to working but still running into error after the first run. I am trying to let the user select the column that contains the values that are to be split out into their own worksheet. First I am trying to identify the unique values in that column and copying them to a temporary location. Then each unique value from that column will take the entire rows for them and put them in a separate worksheet. This works great up until I come to a part where I am trying to clear the copied data and it errors out after the first run in the If WksExists(c.Value) Then Sheets(c.Value).Cells.Clear part. My intent is to also replace the piece of code where the data is copied to based on where the last empty column and first cell in that column is available as this will vary for each workbook this macro will be used for.

Here is what I have for my code so far that I am testing with:

Please Login or Register  to view this content.

[vcs1161]

This seems to be working well for me so far.

Please Login or Register  to view this content.