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
 

jbeaucaire

Well-known Member
Joined
May 8, 2002
Messages
6,012
'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:

sdiggs

New Member
Joined
Jul 25, 2005
Messages
34
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
 

jbeaucaire

Well-known Member
Joined
May 8, 2002
Messages
6,012
When you DEBUG, which line of code is being highlighted?
 

sdiggs

New Member
Joined
Jul 25, 2005
Messages
34
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
 

jbeaucaire

Well-known Member
Joined
May 8, 2002
Messages
6,012
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
 

Forum statistics

Threads
1,085,719
Messages
5,385,434
Members
401,951
Latest member
cryptolock

Some videos you may like

This Week's Hot Topics

Top