VBA Code Help

[stacey52891]

I need help writing VBA Code that will work for a spreadsheet I am working on. I have tried the record macro process but I cannot get a date column I am working with the format correctly. This data is coming from a program and needs to be scrubbed so formulas can be written for it.

In column A: I have statuses. I need any lines of data that have a status of "DENI" or "PEND".

In column B: I need these cells to be formatted to: MM/DD/YYYY

I need this to be done on multiple sheets, could you show me how this could be nested together so that these actions are done on "Sheet1", "Sheet2", and "Sheet3". However, this does not need to be done to ALL sheets. Thank you so much for your help with this.

[TABLE="width: 384"]
<tbody>[TR]
[TD]App Status[/TD]
[TD]last_update_time[/TD]
[/TR]
[TR]
[TD]COMPL[/TD]
[TD]2017-Jan-04 10:03:14[/TD]
[/TR]
[TR]
[TD]COMPL[/TD]
[TD]2017-Jan-05 16:49:47[/TD]
[/TR]
[TR]
[TD]COMPLETED[/TD]
[TD]2017-Jan-04 16:59:50[/TD]
[/TR]
[TR]
[TD]COMPLETED[/TD]
[TD]2017-Jan-05 12:28:00[/TD]
[/TR]
[TR]
[TD]DENI[/TD]
[TD]2017-Jan-05 00:15:16[/TD]
[/TR]
[TR]
[TD]DENI[/TD]
[TD]2017-Jan-05 00:15:16[/TD]
[/TR]
[TR]
[TD]N/A[/TD]
[TD]2017-Jan-04 10:47:45[/TD]
[/TR]
[TR]
[TD]N/A[/TD]
[TD]2017-Jan-05 16:08:31[/TD]
[/TR]
[TR]
[TD]PEND[/TD]
[TD]2017-Jan-05 16:49:47[/TD]
[/TR]
[TR]
[TD]PEND[/TD]
[TD]2017-Jan-04 10:03:14[/TD]
[/TR]
[TR]
[TD]START[/TD]
[TD]2017-Jan-05 16:08:31[/TD]
[/TR]
[TR]
[TD]START[/TD]
[TD]2017-Jan-04 10:47:45[/TD]
[/TR]
[TR]
[TD]STARTED[/TD]
[TD]2017-Jan-05 12:28:00[/TD]
[/TR]
[TR]
[TD]STARTED[/TD]
[TD]2017-Jan-04 16:59:50[/TD]
[/TR]
</tbody><colgroup><col><col></colgroup>[/TABLE]

[TABLE="width: 384"]
<tbody>[TR]
[TD][/TD]
[/TR]
</tbody><colgroup><col><col></colgroup>[/TABLE]

 

[oldbrewer]

do you only want to change the date format in certain rows ?

 

[stacey52891]

do you only want to change the date format in certain rows ?

Yes, It will be column B

 

[oldbrewer]

[TABLE="width: 1165"]
<colgroup><col><col><col><col span="2"><col><col span="2"><col><col></colgroup><tbody>[TR]
[TD]App Status[/TD]
[TD]last_update_time[/TD]
[TD]newdateformat[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]COMPL[/TD]
[TD]2017-Jan-04 10:03:14[/TD]
[TD]01/04/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]COMPL[/TD]
[TD]2017-Jan-05 16:49:47[/TD]
[TD]01/05/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD]Count of newdateformat[/TD]
[TD]App Status[/TD]
[TD] [/TD]
[TD] [/TD]
[TD][/TD]
[/TR]
[TR]
[TD]COMPLETED[/TD]
[TD]2017-Jan-04 16:59:50[/TD]
[TD]01/04/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD]newdateformat[/TD]
[TD]DENI[/TD]
[TD]PEND[/TD]
[TD]Grand Total[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]COMPLETED[/TD]
[TD]2017-Jan-05 12:28:00[/TD]
[TD]01/05/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD]01/04/2017[/TD]
[TD] [/TD]
[TD="align: right"]1[/TD]
[TD="align: right"]1[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]DENI[/TD]
[TD]2017-Jan-05 00:15:16[/TD]
[TD]01/05/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD]01/05/2017[/TD]
[TD="align: right"]2[/TD]
[TD="align: right"]1[/TD]
[TD="align: right"]3[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]DENI[/TD]
[TD]2017-Jan-05 00:15:16[/TD]
[TD]01/05/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD]Grand Total[/TD]
[TD="align: right"]2[/TD]
[TD="align: right"]2[/TD]
[TD="align: right"]4[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]N/A[/TD]
[TD]2017-Jan-04 10:47:45[/TD]
[TD]01/04/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]N/A[/TD]
[TD]2017-Jan-05 16:08:31[/TD]
[TD]01/05/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]PEND[/TD]
[TD]2017-Jan-05 16:49:47[/TD]
[TD]01/05/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]PEND[/TD]
[TD]2017-Jan-04 10:03:14[/TD]
[TD]01/04/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]START[/TD]
[TD]2017-Jan-05 16:08:31[/TD]
[TD]01/05/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]START[/TD]
[TD]2017-Jan-04 10:47:45[/TD]
[TD]01/04/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]STARTED[/TD]
[TD]2017-Jan-05 12:28:00[/TD]
[TD]01/05/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD]STARTED[/TD]
[TD]2017-Jan-04 16:59:50[/TD]
[TD]01/04/2017[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]Apr[/TD]
[TD]04[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]Aug[/TD]
[TD]08[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]Dec[/TD]
[TD]12[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]Feb[/TD]
[TD]02[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]Jan[/TD]
[TD]01[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD="colspan: 2"]note the new column of dates to your format[/TD]
[TD][/TD]
[TD][/TD]
[TD]July[/TD]
[TD]07[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD]are NOT dates - they are text[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]Jun[/TD]
[TD]06[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]Mar[/TD]
[TD]03[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]May[/TD]
[TD]05[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD="colspan: 2"]the pivot table has found the 1/4/17 PEND[/TD]
[TD][/TD]
[TD][/TD]
[TD]Nov[/TD]
[TD]11[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD="colspan: 2"]and the duplicate entries on rows 6 and 7[/TD]
[TD][/TD]
[TD][/TD]
[TD]Oct[/TD]
[TD]10[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD]and the pending on 1/5/17[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD]Sep[/TD]
[TD]09[/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]