Copy, paste, loop

dblack64

New Member
Joined
Oct 21, 2011
Messages
3
<TABLE style="WIDTH: 748pt; BORDER-COLLAPSE: collapse" border=0 cellSpacing=0 cellPadding=0 width=995><COLGROUP><COL style="WIDTH: 27pt; mso-width-source: userset; mso-width-alt: 1316" width=36><COL style="WIDTH: 218pt; mso-width-source: userset; mso-width-alt: 10605" width=290><COL style="WIDTH: 87pt; mso-width-source: userset; mso-width-alt: 4242" width=116><COL style="WIDTH: 55pt; mso-width-source: userset; mso-width-alt: 2669" width=73><COL style="WIDTH: 82pt; mso-width-source: userset; mso-width-alt: 3986" width=109><COL style="WIDTH: 91pt; mso-width-source: userset; mso-width-alt: 4425" width=121><COL style="WIDTH: 106pt; mso-width-source: userset; mso-width-alt: 5156" width=141><COL style="WIDTH: 82pt; mso-width-source: userset; mso-width-alt: 3986" width=109><TBODY><TR style="HEIGHT: 30pt" height=40><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; WIDTH: 27pt; HEIGHT: 30pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl63 height=40 width=36>ID</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; WIDTH: 218pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl63 width=290>Contract Name</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; WIDTH: 87pt; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl72 width=116>Date Started</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; WIDTH: 55pt; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl64 width=73>Team</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; WIDTH: 82pt; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl69 width=109>Date Ready for Audit</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; WIDTH: 91pt; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl79 width=121>Date Opened</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; WIDTH: 106pt; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl72 width=141>Date Completed</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; WIDTH: 82pt; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl78 width=109>Status Date</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>Q84</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>Hormel, Americrown_20100601_</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/11/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/11/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl80>5/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD></TR><TR style="HEIGHT: 46.5pt; mso-height-source: userset" height=62><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 46.5pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=62>IAJ</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>IHOP__Rich_201</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/17/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/17/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl80>5/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/24/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/20/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>SC6</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>Tropicana_IHOP_2010</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/17/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/17/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl80>5/20/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/20/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/20/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>QAT</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>Bunge Oils_ESPN/Disn</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/12/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/12/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl80>5/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70> </TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/19/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>QAZ</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>Bunge Oils_ESPN-Disn</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/12/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl65>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/12/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl82>5/20/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/26/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/26/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>o69</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>Hopes Cookies, Penn Nat'l Gaming_2010.6.1_</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/14/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/14/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl80>5/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70> </TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/19/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>SC6</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>Cudahy_ESPN-Dis</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/13/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl76>5/17/2010</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl85>5/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl86>05/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl86>05/19/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>SC6</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>LambWeston_ESPN-Dis</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl73>05/12/10</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl71>Casual</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl73>05/18/10</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl81>5/19/10</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl77>05/19/10</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl77>05/19/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>SC6</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>Kraft_Fuddruck</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/14/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl82>5/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/27/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray 0.5pt solid; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/27/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>SC6</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>Hormell_Pizzeria</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/17/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl82>5/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/19/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>SC6</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>DiamondCrystal_Pizzeria</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/14/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl82>5/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/19/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>o69</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>Heinz_Pizzeria</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/17/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl82>5/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74> </TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/19/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>SC6</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>Disneyland_WNA_2010.</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl82>5/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/19/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>QAZ</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>harrahs_saraleeco</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl82>5/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74> </TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/20/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>SC6</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>IHOP_GeorgiaPa</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl82>5/20/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/21/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/21/10</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>QAN</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>Ledos_Solo_2010</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl82>5/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl84>5/19/2010</TD></TR><TR style="HEIGHT: 15pt" height=20><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; HEIGHT: 15pt; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68 height=20>QAN</TD><TD style="BORDER-BOTTOM: #ece9d8; BORDER-LEFT: #ece9d8; BACKGROUND-COLOR: transparent; BORDER-TOP: #ece9d8; BORDER-RIGHT: #ece9d8" class=xl68>POS_Kerry_201</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray 0.5pt solid; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl67>Casual</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl70>05/18/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl82>5/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl74>05/19/10</TD><TD style="BORDER-BOTTOM: gray 0.5pt solid; BORDER-LEFT: gray; BACKGROUND-COLOR: transparent; BORDER-TOP: gray; BORDER-RIGHT: gray 0.5pt solid" class=xl84>5/19/2010</TD></TR></TBODY></TABLE>

I have posted some data from my spreadsheet. I need to have a macro that will select an ID in column a, copy and paste it to a new workbook, save it as ID&Contract Name and then go to the next id and repeat the process. I have used the macro recorder to record part of the macro but am stuck. I have been looking at various message boards for a week but am more confused now than I was a week ago. Any help is appreciated.

Sub Macro1()
'
' Macro1 Macro
'
'
Range("A1").Select
Selection.AutoFilter
ActiveSheet.Range("$A$1:$J$149").AutoFilter Field:=1, Criteria1:="IAJ"
Range("A1").Select
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
ActiveWindow.LargeScroll ToRight:=-1
Selection.End(xlUp).Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.SpecialCells(xlCellTypeVisible).Select
Selection.Copy
Workbooks.Add
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Darren Black\Desktop\IAJ_IHOP.xls", FileFormat:= _
xlExcel8, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
Windows("Phoenix WARS 2010 Casual QSR Mockup.xlsm").Activate
End Sub
 

Excel Facts

Excel Joke
Why can't spreadsheets drive cars? They crash too often!
'ONE SHEET to WORKBOOKS (1)
Here's a macro for taking a sheet with data and creating individual wbs from each unique value in a chosen column. The date is added to the workbook names to give a reference as to when the wbs were created.
SHEET to WORKBOOKS(1)[/INDENT

The only things you need to edit are:
Rich (BB code):
'Sheet with data in it
   Set ws = Sheets("Original Data")

You could put in the exact correct name of the data worksheet if it never changes, or change that to:
Rich (BB code):
Set ws = ActiveSheet

Then for your save path:
Rich (BB code):
'Path to save files into, remember the final \
    SvPath = "C:\Documents and Settings\Darren Black\Desktop\"


...and for the naming:
Rich (BB code):
ActiveWorkbook.SaveAs SvPath & MyArr(Itm) & "_" & Range("B2") & Format(Date, " MM-DD-YY"), xlNormal



That should do it. Run that, let me know how it works for you.​
 
Last edited:
Upvote 0
I'm trying to use this macro and keep getting error 400. My titles do not start until A7 and end at N7 but there is data in I1:K4 and some calculations in h6:n6. I assumed that was the issue but them I remove those fields and change the title range to be a1:n1 I still get an error and when I close out of it the screen is sorted on one value in column A and a copy was made but not pasted. I am at a loss

Option Explicit
Sub ParseItems()
Dim LR As Long, Itm As Long, MyCount As Long, vCol As Long
Dim ws As Worksheet, MyArr As Variant, vTitles As String, SvPath As String
Set ws = Sheets("East Region Contest Tracking")

SvPath = "C:\2010\"

vTitles = "A1:n7"
vCol = Application.InputBox("What column to split data by? " & vbLf _
& vbLf & "(A=1, B=2, C=3, etc)", "Which column?", 1, Type:=1)
If vCol = 0 Then Exit Sub

LR = ws.Cells(ws.Rows.Count, vCol).End(xlUp).Row

Application.ScreenUpdating = False

ws.Columns(vCol).AdvancedFilter Action:=xlFilterCopy, CopyToRange:=ws.Range("EE1"), Unique:=True

ws.Columns("EE:EE").Sort Key1:=ws.Range("EE2"), Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal

MyArr = Application.WorksheetFunction.Transpose(ws.Range("EE2:EE" & Rows.Count).SpecialCells(xlCellTypeConstants))

ws.Range("EE:EE").Clear


ws.Range(vTitles).AutoFilter

For Itm = 1 To UBound(MyArr)
ws.Range(vTitles).AutoFilter Field:=vCol, Criteria1:=MyArr(Itm)

ws.Range("A1:A" & LR).EntireRow.Copy
Workbooks.Add
Range("A1").PasteSpecial xlPasteAll
Cells.Columns.AutoFit
MyCount = MyCount + Range("A" & Rows.Count).End(xlUp).Row - 1

ActiveWorkbook.SaveAs SvPath & MyArr(Itm) & Format(Date, " MM-DD-YY"), xlNormal
ActiveWorkbook.Close False

ws.Range(vTitles).AutoFilter Field:=vCol
Next Itm


ws.AutoFilterMode = False
MsgBox "Rows with data: " & (LR - 1) & vbLf & "Rows copied to other sheets: " & MyCount & vbLf & "Hope they match!!"
Application.ScreenUpdating = True
End Sub
 
Upvote 0
When I debug nothing is highlighted. When i go into the code and run it again I receive an error Paste Special method of range class failed.

Thank you so much for your help, it is greatly appreciated
 
Upvote 0
In the VBEditor, click inside the macro, then use F8 to step through the code one line at a time.

The only "paste" line of code is this (in red):

Rich (BB code):
ws.Range("A1:A" & LR).EntireRow.Copy
Workbooks.Add
Range("A1").PasteSpecial xlPasteAll
Cells.Columns.AutoFit

You could stop after the line in blue and check the sheet to make sure there are rows of data copied... else it should work.

You could realign those lines of code like so:
Rich (BB code):
Workbooks.Add
ws.Range("A1:A" & LR).EntireRow.Copy Range("A1")
Cells.Columns.AutoFit
 
Upvote 0

Forum statistics

Threads
1,213,484
Messages
6,113,927
Members
448,533
Latest member
thietbibeboiwasaco

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top