Export Specific Columns from a Worksheet as csv

[Saarang84]

Hi,

I've a worksheet with columns of data. I would want to export specific columns into a csv file based on certain condition.

I've attached a sample workbook. As shown in the example in the Output sheet, I need to export columns D and K based on day of week (1 = Sunday, 2 = Monday, ... 7 = Saturday) into a csv file, prefixed with a certain column with fixed value as "Add" or "Remove". I want the csv file to be saved on the disk at a user-defined location.

How can this be done ? Can anyone help me code a vba Sub / function ?


Sarang

[Richard Buttrey]

Hi,

Are there just two weeks worth of data, i.e. columns B:O or do you have many more extending across from P:?? in a similar way and you would want to pick up every 7th (day) column for your csv?

[Richard Buttrey]

Hi,

See attached

Change the variables as necessary on the Variable Tab, i.e the day number, text to add and file path\name

[Saarang84]

The worksheet range would grow to a maximum of four Day7 weekdays in a month.
It would be nice to search for specific weekday columns, as I would need to pick all such columns named Day7.

[Saarang84]

This code doesn't work with my real data which is alphanumeric. Also, the day order (in the source sheet) from Day1 to Day7 is not arranged in order.

And I would need an option to get the data for specific week or the two weeks together i.e. 1st & 2nd week, or 2nd & 3rd week, or 3rd & 4th week, etc.

[Richard Buttrey]

Hi,

With the greatest of respect it behoves you to mention up front everything that is relevant or we all end up wasting our time.
Did you not think it important to mention that the data is not in order. That's a vital piece of information. As is the fact that you apparently don't necessarily want all weeks but sometimes different groups of weeks.

Not many of us are happy to spend time giving solutions to examples that don't represent the real world. If you study the code it will give you the general idea. You need to modify it to identify which days are relevant and build those columns into the range Union function.