<!--[if gte mso 9]><xml> <o:OfficeDocumentSettings> <o:AllowPNG/> </o:OfficeDocumentSettings> </xml><![endif]--><!--[if gte mso 9]><xml> <w:WordDocument> <w:View>Normal</w:View> <w:Zoom>0</w:Zoom> <w:TrackMoves/> <w:TrackFormatting/> <w:PunctuationKerning/> <w:ValidateAgainstSchemas/> <w:SaveIfXMLInvalid>false</w:SaveIfXMLInvalid> <w:IgnoreMixedContent>false</w:IgnoreMixedContent> <w:AlwaysShowPlaceholderText>false</w:AlwaysShowPlaceholderText> <w:DoNotPromoteQF/> <w:LidThemeOther>EN-GB</w:LidThemeOther> <w:LidThemeAsian>X-NONE</w:LidThemeAsian> <w:LidThemeComplexScript>X-NONE</w:LidThemeComplexScript> <w:Compatibility> <w:BreakWrappedTables/> <w:SnapToGridInCell/> <w:WrapTextWithPunct/> <w:UseAsianBreakRules/> <w:DontGrowAutofit/> <w:SplitPgBreakAndParaMark/> <w:EnableOpenTypeKerning/> <w:DontFlipMirrorIndents/> <w:OverrideTableStyleHps/> </w:Compatibility> <m:mathPr> <m:mathFont m:val="Cambria Math"/> <m:brkBin m:val="before"/> <m:brkBinSub m:val="--"/> <m:smallFrac m:val="off"/> <m:dispDef/> <m:lMargin m:val="0"/> <m:rMargin m:val="0"/> <m:defJc m:val="centerGroup"/> <m:wrapIndent m:val="1440"/> <m:intLim m:val="subSup"/> <m:naryLim m:val="undOvr"/> </m:mathPr></w:WordDocument> </xml><![endif]--><!--[if gte mso 9]><xml> <w:LatentStyles DefLockedState="false" DefUnhideWhenUsed="true" DefSemiHidden="true" DefQFormat="false" DefPriority="99" LatentStyleCount="267"> <w:LsdException Locked="false" Priority="0" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Normal"/> <w:LsdException Locked="false" Priority="9" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="heading 1"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 2"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 3"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 4"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 5"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 6"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 7"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 8"/> <w:LsdException Locked="false" Priority="9" QFormat="true" Name="heading 9"/> <w:LsdException Locked="false" Priority="39" Name="toc 1"/> <w:LsdException Locked="false" Priority="39" Name="toc 2"/> <w:LsdException Locked="false" Priority="39" Name="toc 3"/> <w:LsdException Locked="false" Priority="39" Name="toc 4"/> <w:LsdException Locked="false" Priority="39" Name="toc 5"/> <w:LsdException Locked="false" Priority="39" Name="toc 6"/> <w:LsdException Locked="false" Priority="39" Name="toc 7"/> <w:LsdException Locked="false" Priority="39" Name="toc 8"/> <w:LsdException Locked="false" Priority="39" Name="toc 9"/> <w:LsdException Locked="false" Priority="35" QFormat="true" Name="caption"/> <w:LsdException Locked="false" Priority="10" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Title"/> <w:LsdException Locked="false" Priority="1" Name="Default Paragraph Font"/> <w:LsdException Locked="false" Priority="11" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Subtitle"/> <w:LsdException Locked="false" Priority="22" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Strong"/> <w:LsdException Locked="false" Priority="20" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Emphasis"/> <w:LsdException Locked="false" Priority="59" SemiHidden="false" UnhideWhenUsed="false" Name="Table Grid"/> <w:LsdException Locked="false" UnhideWhenUsed="false" Name="Placeholder Text"/> <w:LsdException Locked="false" Priority="1" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="No Spacing"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 1"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 1"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 1"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 1"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 1"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 1"/> <w:LsdException Locked="false" UnhideWhenUsed="false" Name="Revision"/> <w:LsdException Locked="false" Priority="34" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="List Paragraph"/> <w:LsdException Locked="false" Priority="29" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Quote"/> <w:LsdException Locked="false" Priority="30" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Intense Quote"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 1"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 1"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 1"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 1"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 1"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 1"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 1"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 1"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 2"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 2"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 2"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 2"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 2"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 2"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 2"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 2"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 2"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 2"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 2"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 2"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 2"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 2"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 3"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 3"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 3"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 3"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 3"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 3"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 3"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 3"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 3"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 3"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 3"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 3"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 3"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 3"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 4"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 4"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 4"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 4"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 4"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 4"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 4"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 4"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 4"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 4"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 4"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 4"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 4"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 4"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 5"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 5"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 5"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 5"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 5"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 5"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 5"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 5"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 5"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 5"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 5"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 5"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 5"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 5"/> <w:LsdException Locked="false" Priority="60" SemiHidden="false" UnhideWhenUsed="false" Name="Light Shading Accent 6"/> <w:LsdException Locked="false" Priority="61" SemiHidden="false" UnhideWhenUsed="false" Name="Light List Accent 6"/> <w:LsdException Locked="false" Priority="62" SemiHidden="false" UnhideWhenUsed="false" Name="Light Grid Accent 6"/> <w:LsdException Locked="false" Priority="63" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 1 Accent 6"/> <w:LsdException Locked="false" Priority="64" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Shading 2 Accent 6"/> <w:LsdException Locked="false" Priority="65" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 1 Accent 6"/> <w:LsdException Locked="false" Priority="66" SemiHidden="false" UnhideWhenUsed="false" Name="Medium List 2 Accent 6"/> <w:LsdException Locked="false" Priority="67" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 1 Accent 6"/> <w:LsdException Locked="false" Priority="68" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 2 Accent 6"/> <w:LsdException Locked="false" Priority="69" SemiHidden="false" UnhideWhenUsed="false" Name="Medium Grid 3 Accent 6"/> <w:LsdException Locked="false" Priority="70" SemiHidden="false" UnhideWhenUsed="false" Name="Dark List Accent 6"/> <w:LsdException Locked="false" Priority="71" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Shading Accent 6"/> <w:LsdException Locked="false" Priority="72" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful List Accent 6"/> <w:LsdException Locked="false" Priority="73" SemiHidden="false" UnhideWhenUsed="false" Name="Colorful Grid Accent 6"/> <w:LsdException Locked="false" Priority="19" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Subtle Emphasis"/> <w:LsdException Locked="false" Priority="21" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Intense Emphasis"/> <w:LsdException Locked="false" Priority="31" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Subtle Reference"/> <w:LsdException Locked="false" Priority="32" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Intense Reference"/> <w:LsdException Locked="false" Priority="33" SemiHidden="false" UnhideWhenUsed="false" QFormat="true" Name="Book Title"/> <w:LsdException Locked="false" Priority="37" Name="Bibliography"/> <w:LsdException Locked="false" Priority="39" QFormat="true" Name="TOC Heading"/> </w:LatentStyles> </xml><![endif]--><!--[if gte mso 10]> <style> /* Style Definitions */ table.MsoNormalTable {mso-style-name:"Table Normal"; mso-tstyle-rowband-size:0; mso-tstyle-colband-size:0; mso-style-noshow:yes; mso-style-priority:99; mso-style-parent:""; mso-padding-alt:0cm 5.4pt 0cm 5.4pt; mso-para-margin-top:0cm; mso-para-margin-right:0cm; mso-para-margin-bottom:10.0pt; mso-para-margin-left:0cm; line-height:115%; mso-pagination:widow-orphan; font-size:11.0pt; font-family:"Calibri","sans-serif"; mso-ascii-font-family:Calibri; mso-ascii-theme-font:minor-latin; mso-hansi-font-family:Calibri; mso-hansi-theme-font:minor-latin; mso-bidi-font-family:"Times New Roman"; mso-bidi-theme-font:minor-bidi; mso-fareast-language:EN-US;} table.MsoTableGrid {mso-style-name:"Table Grid"; mso-tstyle-rowband-size:0; mso-tstyle-colband-size:0; mso-style-priority:59; mso-style-unhide:no; border:solid windowtext 1.0pt; mso-border-alt:solid windowtext .5pt; mso-padding-alt:0cm 5.4pt 0cm 5.4pt; mso-border-insideh:.5pt solid windowtext; mso-border-insidev:.5pt solid windowtext; mso-para-margin:0cm; mso-para-margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:11.0pt; font-family:"Calibri","sans-serif"; mso-ascii-font-family:Calibri; mso-ascii-theme-font:minor-latin; mso-hansi-font-family:Calibri; mso-hansi-theme-font:minor-latin; mso-bidi-font-family:"Times New Roman"; mso-bidi-theme-font:minor-bidi; mso-fareast-language:EN-US;} </style> <![endif]--> [FONT="]Dear all,[/FONT]
[FONT="] [/FONT]
[FONT="]I need some help in writing a code for the following:[/FONT]
[FONT="]I have a workbook with 11 worksheets in it. Each worksheet has a unique name (such as 167L, 167S, 170S, 170L, 173S, 173L, 175A, 183S, 183L and etc.). Each of the worksheet is updated daily and I need to extract data from specific columns and according to specific time.[/FONT]
[FONT="] [/FONT]
[TABLE="class: MsoTableGrid"]
<tbody>[TR]
[TD="width: 66"] [FONT="]A[/FONT]
[/TD]
[TD="width: 64"] [FONT="]B[/FONT]
[/TD]
[TD="width: 64"] [FONT="]C[/FONT]
[/TD]
[TD="width: 62"] [FONT="]D[/FONT]
[/TD]
[TD="width: 63"] [FONT="]E[/FONT]
[/TD]
[TD="width: 63"] [FONT="]F[/FONT]
[/TD]
[TD="width: 64"] [FONT="]G[/FONT]
[/TD]
[TD="width: 68"] [FONT="]H[/FONT]
[/TD]
[TD="width: 64"] [FONT="]I[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 578, colspan: 9"] [FONT="]173L[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]DATE[/FONT]
[/TD]
[TD="width: 64"] [FONT="]TIME[/FONT]
[/TD]
[TD="width: 64"] [FONT="]W[/FONT]
[/TD]
[TD="width: 62"] [FONT="]DS[/FONT]
[/TD]
[TD="width: 63"] [FONT="]WH[/FONT]
[/TD]
[TD="width: 63"] [FONT="]S[/FONT]
[/TD]
[TD="width: 64"] [FONT="]WC[/FONT]
[/TD]
[TD="width: 68"] [FONT="]E[/FONT]
[/TD]
[TD="width: 64"] [FONT="]C[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 64"] [FONT="]bars[/FONT]
[/TD]
[TD="width: 62"] [FONT="]bars[/FONT]
[/TD]
[TD="width: 63"] [FONT="]C0[/FONT]
[/TD]
[TD="width: 63"] [FONT="]%[/FONT]
[/TD]
[TD="width: 64"] [FONT="]%[/FONT]
[/TD]
[TD="width: 68"] [FONT="]%[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]27.10.13[/FONT]
[/TD]
[TD="width: 64"] [FONT="]00:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]95[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]18[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]02:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]91[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]18[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]2[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]04:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]89[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]17[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]06:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]93[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]16[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]1[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]08:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]95[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]16[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]3[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]10:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]90[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]16[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]12[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]12:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]89[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]16[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]14:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]92[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]5[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]16:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]95[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]15[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]7[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]18:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]92[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]8[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]20:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]93[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]12[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]22:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]90[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]6[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]28.10.13[/FONT]
[/TD]
[TD="width: 64"] [FONT="]00:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]98[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
</tbody>[/TABLE]
[FONT="] [/FONT]
[FONT="]Basically, the code I have used before I was assisted by the www.mrexcel.com/forum before, however, I need to have it devised in a bit different way (pls visit the www….. for details). The code I need should (a) select values at column “B” (the corresponding values are 04:00, 08:00, 12:00, 16:00, 20:00 and 00:00), copy value in column “G” (0, 0, 0, 0, 0, 0) and sum up with values from column “H”, which before being added should be divided by a factor of “2” (0/2=0, 3/2=1.5, 16/2=8, 7/2=3.5, 12/2=6, 0/2=0). The summed values should be copied and pasted into a separate worksheet and it needs to look like this:[/FONT]
[FONT="] [/FONT]
[TABLE="class: MsoTableGrid"]
<tbody>[TR]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="]04:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]08:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]12:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]16:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]20:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]00:00[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="]173L[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[TD="width: 55"] [FONT="]1.5[/FONT]
[/TD]
[TD="width: 55"] [FONT="]8[/FONT]
[/TD]
[TD="width: 55"] [FONT="]3.5[/FONT]
[/TD]
[TD="width: 55"] [FONT="]6[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[/TR]
</tbody>[/TABLE]
[FONT="]The things get a bit complicated as different worksheet in a workbook have slightly different table compare with the one in above. [/FONT]
[TABLE="class: MsoTableGrid"]
<tbody>[TR]
[TD="width: 66"] [FONT="]A[/FONT]
[/TD]
[TD="width: 64"] [FONT="]B[/FONT]
[/TD]
[TD="width: 64"] [FONT="]C[/FONT]
[/TD]
[TD="width: 62"] [FONT="]D[/FONT]
[/TD]
[TD="width: 63, colspan: 2"] [FONT="]E[/FONT]
[/TD]
[TD="width: 63, colspan: 2"] [FONT="]F[/FONT]
[/TD]
[TD="width: 82, colspan: 2"] [FONT="]G[/FONT]
[/TD]
[TD="width: 64"] [FONT="]H[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 527, colspan: 11"] [FONT="]183L[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]DATE[/FONT]
[/TD]
[TD="width: 64"] [FONT="]TIME[/FONT]
[/TD]
[TD="width: 64"] [FONT="]W[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]DS[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]WH[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]S[/FONT]
[/TD]
[TD="width: 78"] [FONT="]WC[/FONT]
[/TD]
[TD="width: 64"] [FONT="]C[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 64"] [FONT="]bars[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]bars[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]C0[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]%[/FONT]
[/TD]
[TD="width: 78"] [FONT="]%[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]27.10.13[/FONT]
[/TD]
[TD="width: 64"] [FONT="]00:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]30[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]3[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]02:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]34[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]1[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]04:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]38[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]1[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]06:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]38[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]2[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]08:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]37[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]15[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]10:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]36[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]15[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]12:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]31[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]15[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0.5[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]14:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]28[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]15[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]16:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]25[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]15[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]18:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]21[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]4[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]20:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]33[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]2[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]22:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]35[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]18[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]1[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]28.10.13[/FONT]
[/TD]
[TD="width: 64"] [FONT="]00:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]35[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]18[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 70"][/TD]
[TD="width: 64"][/TD]
[TD="width: 64"][/TD]
[TD="width: 62"][/TD]
[TD="width: 2"][/TD]
[TD="width: 61"][/TD]
[TD="width: 3"][/TD]
[TD="width: 60"][/TD]
[TD="width: 4"][/TD]
[TD="width: 78"][/TD]
[TD="width: 64"][/TD]
[/TR]
</tbody>[/TABLE]
[FONT="] [/FONT]
[FONT="]So, the final output from two worksheets should look like:[/FONT]
[FONT="] [/FONT]
[TABLE="class: MsoTableGrid"]
<tbody>[TR]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="]04:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]08:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]12:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]16:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]20:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]00:00[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="]173L[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[TD="width: 55"] [FONT="]1.5[/FONT]
[/TD]
[TD="width: 55"] [FONT="]8[/FONT]
[/TD]
[TD="width: 55"] [FONT="]3.5[/FONT]
[/TD]
[TD="width: 55"] [FONT="]6[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="]183L[/FONT]
[/TD]
[TD="width: 55"] [FONT="]1[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0.5[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[TD="width: 55"] [FONT="]2[/FONT]
[/TD]
[TD="width: 55"] [FONT="]1[/FONT]
[/TD]
[/TR]
</tbody>[/TABLE]
[FONT="] [/FONT]
[FONT="]And finally, to make things more complicated, the monitoring hours vary, like in the table below:[/FONT]
[FONT="] [/FONT]
[TABLE="class: MsoNormalTable, width: 432"]
<tbody>[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 576, colspan: 9"] [FONT="]175A[/FONT][FONT="][/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [FONT="]W[/FONT]
[/TD]
[TD="width: 64"] [FONT="]DS[/FONT]
[/TD]
[TD="width: 64"] [FONT="]WH[/FONT]
[/TD]
[TD="width: 64"] [FONT="]S[/FONT]
[/TD]
[TD="width: 64"] [FONT="]WC[/FONT]
[/TD]
[TD="width: 64"] [FONT="]E[/FONT]
[/TD]
[TD="width: 64"] [FONT="]C[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[TD="width: 64"] [/TD]
[/TR]
</tbody>[/TABLE]
[FONT="] [/FONT]
[FONT="]With this worksheet (175A), my final output should look like this:[/FONT]
[TABLE="class: MsoTableGrid"]
<tbody>[TR]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="]04:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]08:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]12:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]16:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]20:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]00:00[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="]173L[/FONT]
[/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="]183L[/FONT]
[/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="]175A[/FONT]
[/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[TD="width: 55"] [/TD]
[/TR]
</tbody>[/TABLE]
[FONT="] [/FONT]
[FONT="]Since there are no value at column “H”, divided by a factor of “2” is skipped.[/FONT]
[FONT="] [/FONT]
[FONT="]Here is a code I used before, and it executes part of the required job:[/FONT]
[FONT="] [/FONT]
[FONT="]Dim myrow As Long[/FONT]
[FONT="]Dim wksTo As Worksheet[/FONT]
[FONT="]Dim j, s As Long[/FONT]
[FONT="]Dim lastRow, lastsheet As Long[/FONT]
[FONT="]Dim wks As Worksheet[/FONT]
[FONT="]Dim sn As String[/FONT]
[FONT="] [/FONT]
[FONT="] Sheets(1).Select[/FONT]
[FONT="] Sheets.Add.Name = "wksTo"[/FONT]
[FONT="] lastRow = 2 ' set the first row to use, set to 2 so you can add labels in row 1[/FONT]
[FONT="] lastsheet = Sheets.Count[/FONT]
[FONT="] For s = 2 To lastsheet ' Loop thru sheets[/FONT]
[FONT="] Worksheets(s).Activate[/FONT]
[FONT="] With Worksheets(s) ' sheet(s) changes sheets[/FONT]
[FONT="] On Error Resume Next[/FONT]
[FONT="] myrow = .Columns("A").Find(Date).Row[/FONT]
[FONT="] Application.Goto .Range("A" & myrow), True[/FONT]
[FONT="] End With[/FONT]
[FONT="] [/FONT]
[FONT="] With Worksheets(s)[/FONT]
[FONT="] ActiveCell.Offset(rowoffset:=0, columnoffset:=1).Activate[/FONT]
[FONT="] End With[/FONT]
[FONT="] [/FONT]
[FONT="] With Application.ActiveWindow.ActiveCell[/FONT]
[FONT="] dc = 0[/FONT]
[FONT="] sn = Sheets(s).Name[/FONT]
[FONT="] Worksheets("wksTo").Range("G" & lastRow).Formula = sn[/FONT]
[FONT="] For j = 1 To -10 Step -2[/FONT]
[FONT="] Range(.Cells(j, 6), .Cells(j, 6)).Copy Sheets("wksTo").Cells(lastRow, 8 - dc)[/FONT]
[FONT="] dc = dc + 1[/FONT]
[FONT="] Next j[/FONT]
[FONT="] lastRow = lastRow + 1[/FONT]
[FONT="] End With[/FONT]
[FONT="] Next s[/FONT]
[FONT="] [/FONT]
[FONT="] Dim x As Integer[/FONT]
[FONT="] Worksheets("wksTo").Activate[/FONT]
[FONT="] For x = 1 To Worksheets.Count[/FONT]
[FONT="] Cells(x, 1).Value = Worksheets(x).Name[/FONT]
[FONT="] Next x[/FONT]
Dear all,
I need some help in writing a code for the following:
I have a workbook with 11 worksheets in it. Each worksheet has a unique name (such as 167L, 167S, 170S, 170L, 173S, 173L, 175A, 183S, 183L and etc.). Each of the worksheet is updated daily and I need to extract data from specific columns and according to specific time.
<tbody>
[TD="colspan: 9"] 173L
[/TD]
</tbody>
Basically, the code I have used before I was assisted by the www.mrexcel.com/forum before, however, I need to have it devised in a bit different way (pls visit the www….. for details). The code I need should (a) select values at column “B” (the corresponding values are 04:00, 08:00, 12:00, 16:00, 20:00 and 00:00), copy value in column “G” (0, 0, 0, 0, 0, 0) and sum up with values from column “H”, which before being added should be divided by a factor of “2” (0/2=0, 3/2=1.5, 16/2=8, 7/2=3.5, 12/2=6, 0/2=0). The summed values should be copied and pasted into a separate worksheet and it needs to look like this:
<tbody>
</tbody>The things get a bit complicated as different worksheet in a workbook have slightly different table compare with the one in above.
<tbody>
[TD="colspan: 2"] E
[/TD]
[TD="colspan: 2"] F
[/TD]
[TD="colspan: 2"] G
[/TD]
[TD="colspan: 11"] 183L
[/TD]
[TD="colspan: 2"]DS
[/TD]
[TD="colspan: 2"]WH
[/TD]
[TD="colspan: 2"]S
[/TD]
[TD="colspan: 2"] bars
[/TD]
[TD="colspan: 2"] C0
[/TD]
[TD="colspan: 2"] %
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 15
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 15
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 15
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 15
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 15
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 18
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 18
[/TD]
[TD="colspan: 2"] 0
[/TD]
</tbody>
So, the final output from two worksheets should look like:
<tbody>
</tbody>
And finally, to make things more complicated, the monitoring hours vary, like in the table below:
[TABLE="width: 576"]
<tbody>[TR]
[TD]A
[/TD]
[TD]B
[/TD]
[TD]C
[/TD]
[TD]D
[/TD]
[TD]E
[/TD]
[TD]F
[/TD]
[TD]G
[/TD]
[TD]H
[/TD]
[TD]I
[/TD]
[/TR]
[TR]
[TD="colspan: 9"]175A
[/TD]
[/TR]
[TR]
[TD]DATE
[/TD]
[TD]TIME
[/TD]
[TD]W
[/TD]
[TD]DS
[/TD]
[TD]WH
[/TD]
[TD]S
[/TD]
[TD]WC
[/TD]
[TD]E
[/TD]
[TD]C
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]
[/TD]
[TD]bar
[/TD]
[TD]bar
[/TD]
[TD]Co
[/TD]
[TD]22/64"
[/TD]
[TD]%
[/TD]
[TD]%
[/TD]
[TD]%
[/TD]
[/TR]
[TR]
[TD]27.10.13
[/TD]
[TD]00:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]31
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]00:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]32
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]01:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]37
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]01:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]40
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]02:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]39
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]02:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]41
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]03:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]36
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]03:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]33
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]04:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]35
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]04:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]38
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]05:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]40
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]05:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]37
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]06:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]33
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]06:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]36
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]07:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]27
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]08:00
[/TD]
[TD]40.5
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]29
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]09:00
[/TD]
[TD]40.5
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]35
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]10:00
[/TD]
[TD]40.5
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]26
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]11:00
[/TD]
[TD]40.5
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]29
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]12:00
[/TD]
[TD]40.5
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]32
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]13:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]31
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]14:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]28
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]15:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]42
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]16:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]36
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]17:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]27
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]18:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]32
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]19:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]36
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]20:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]31
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]21:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]34
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]22:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]29
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]23:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]33
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]28.10.13
[/TD]
[TD]00:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]31
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
</tbody>[/TABLE]
With this worksheet (175A), my final output should look like this:
<tbody>
</tbody>
Since there are no value at column “H”, divided by a factor of “2” is skipped.
Here is a code I used before, and it executes part of the required job:
Dim myrow As Long
Dim wksTo As Worksheet
Dim j, s As Long
Dim lastRow, lastsheet As Long
Dim wks As Worksheet
Dim sn As String
Sheets(1).Select
Sheets.Add.Name = "wksTo"
lastRow = 2 ' set the first row to use, set to 2 so you can add labels in row 1
lastsheet = Sheets.Count
For s = 2 To lastsheet ' Loop thru sheets
Worksheets(s).Activate
With Worksheets(s) ' sheet(s) changes sheets
On Error Resume Next
myrow = .Columns("A").Find(Date).Row
Application.Goto .Range("A" & myrow), True
End With
With Worksheets(s)
ActiveCell.Offset(rowoffset:=0, columnoffset:=1).Activate
End With
With Application.ActiveWindow.ActiveCell
dc = 0
sn = Sheets(s).Name
Worksheets("wksTo").Range("G" & lastRow).Formula = sn
For j = 1 To -10 Step -2
Range(.Cells(j, 6), .Cells(j, 6)).Copy Sheets("wksTo").Cells(lastRow, 8 - dc)
dc = dc + 1
Next j
lastRow = lastRow + 1
End With
Next s
Dim x As Integer
Worksheets("wksTo").Activate
For x = 1 To Worksheets.Count
Cells(x, 1).Value = Worksheets(x).Name
Next x
[FONT="] [/FONT]
[FONT="]I need some help in writing a code for the following:[/FONT]
[FONT="]I have a workbook with 11 worksheets in it. Each worksheet has a unique name (such as 167L, 167S, 170S, 170L, 173S, 173L, 175A, 183S, 183L and etc.). Each of the worksheet is updated daily and I need to extract data from specific columns and according to specific time.[/FONT]
[FONT="] [/FONT]
[TABLE="class: MsoTableGrid"]
<tbody>[TR]
[TD="width: 66"] [FONT="]A[/FONT]
[/TD]
[TD="width: 64"] [FONT="]B[/FONT]
[/TD]
[TD="width: 64"] [FONT="]C[/FONT]
[/TD]
[TD="width: 62"] [FONT="]D[/FONT]
[/TD]
[TD="width: 63"] [FONT="]E[/FONT]
[/TD]
[TD="width: 63"] [FONT="]F[/FONT]
[/TD]
[TD="width: 64"] [FONT="]G[/FONT]
[/TD]
[TD="width: 68"] [FONT="]H[/FONT]
[/TD]
[TD="width: 64"] [FONT="]I[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 578, colspan: 9"] [FONT="]173L[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]DATE[/FONT]
[/TD]
[TD="width: 64"] [FONT="]TIME[/FONT]
[/TD]
[TD="width: 64"] [FONT="]W[/FONT]
[/TD]
[TD="width: 62"] [FONT="]DS[/FONT]
[/TD]
[TD="width: 63"] [FONT="]WH[/FONT]
[/TD]
[TD="width: 63"] [FONT="]S[/FONT]
[/TD]
[TD="width: 64"] [FONT="]WC[/FONT]
[/TD]
[TD="width: 68"] [FONT="]E[/FONT]
[/TD]
[TD="width: 64"] [FONT="]C[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 64"] [FONT="]bars[/FONT]
[/TD]
[TD="width: 62"] [FONT="]bars[/FONT]
[/TD]
[TD="width: 63"] [FONT="]C0[/FONT]
[/TD]
[TD="width: 63"] [FONT="]%[/FONT]
[/TD]
[TD="width: 64"] [FONT="]%[/FONT]
[/TD]
[TD="width: 68"] [FONT="]%[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]27.10.13[/FONT]
[/TD]
[TD="width: 64"] [FONT="]00:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]95[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]18[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]02:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]91[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]18[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]2[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]04:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]89[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]17[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]06:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]93[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]16[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]1[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]08:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]95[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]16[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]3[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]10:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]90[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]16[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]12[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]12:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]89[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]16[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]14:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]92[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]5[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]16:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]95[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]15[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]7[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]18:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]92[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]8[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]20:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]93[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]12[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]22:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]90[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT]
[/TD]
[TD="width: 68"] [FONT="]6[/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]28.10.13[/FONT]
[/TD]
[TD="width: 64"] [FONT="]00:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]98[/FONT]
[/TD]
[TD="width: 62"] [FONT="]28[/FONT]
[/TD]
[TD="width: 63"] [FONT="]14[/FONT]
[/TD]
[TD="width: 63"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 68"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]24/64"[/FONT]
[/TD]
[/TR]
</tbody>[/TABLE]
[FONT="] [/FONT]
[FONT="]Basically, the code I have used before I was assisted by the www.mrexcel.com/forum before, however, I need to have it devised in a bit different way (pls visit the www….. for details). The code I need should (a) select values at column “B” (the corresponding values are 04:00, 08:00, 12:00, 16:00, 20:00 and 00:00), copy value in column “G” (0, 0, 0, 0, 0, 0) and sum up with values from column “H”, which before being added should be divided by a factor of “2” (0/2=0, 3/2=1.5, 16/2=8, 7/2=3.5, 12/2=6, 0/2=0). The summed values should be copied and pasted into a separate worksheet and it needs to look like this:[/FONT]
[FONT="] [/FONT]
[TABLE="class: MsoTableGrid"]
<tbody>[TR]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="]04:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]08:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]12:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]16:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]20:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]00:00[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="]173L[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[TD="width: 55"] [FONT="]1.5[/FONT]
[/TD]
[TD="width: 55"] [FONT="]8[/FONT]
[/TD]
[TD="width: 55"] [FONT="]3.5[/FONT]
[/TD]
[TD="width: 55"] [FONT="]6[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[/TR]
</tbody>[/TABLE]
[FONT="]The things get a bit complicated as different worksheet in a workbook have slightly different table compare with the one in above. [/FONT]
[TABLE="class: MsoTableGrid"]
<tbody>[TR]
[TD="width: 66"] [FONT="]A[/FONT]
[/TD]
[TD="width: 64"] [FONT="]B[/FONT]
[/TD]
[TD="width: 64"] [FONT="]C[/FONT]
[/TD]
[TD="width: 62"] [FONT="]D[/FONT]
[/TD]
[TD="width: 63, colspan: 2"] [FONT="]E[/FONT]
[/TD]
[TD="width: 63, colspan: 2"] [FONT="]F[/FONT]
[/TD]
[TD="width: 82, colspan: 2"] [FONT="]G[/FONT]
[/TD]
[TD="width: 64"] [FONT="]H[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 527, colspan: 11"] [FONT="]183L[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]DATE[/FONT]
[/TD]
[TD="width: 64"] [FONT="]TIME[/FONT]
[/TD]
[TD="width: 64"] [FONT="]W[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]DS[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]WH[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]S[/FONT]
[/TD]
[TD="width: 78"] [FONT="]WC[/FONT]
[/TD]
[TD="width: 64"] [FONT="]C[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 64"] [FONT="]bars[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]bars[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]C0[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]%[/FONT]
[/TD]
[TD="width: 78"] [FONT="]%[/FONT]
[/TD]
[TD="width: 64"] [FONT="]0/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]27.10.13[/FONT]
[/TD]
[TD="width: 64"] [FONT="]00:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]30[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]3[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]02:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]34[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]1[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]04:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]38[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]1[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]06:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]38[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]2[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]08:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]37[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]15[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]10:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]36[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]15[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]12:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]31[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]15[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0.5[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]14:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]28[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]15[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]16:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]25[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]15[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]18:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]21[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]4[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]20:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]33[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]17[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]2[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="] [/FONT]
[/TD]
[TD="width: 64"] [FONT="]22:00[/FONT]
[/TD]
[TD="width: 64"] [FONT="]35[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]18[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]1[/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 66"] [FONT="]28.10.13[/FONT]
[/TD]
[TD="width: 64"] [FONT="]00:00[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]35[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]11.5[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]18[/FONT]
[/TD]
[TD="width: 64, colspan: 2"] [FONT="]0[/FONT]
[/TD]
[TD="width: 78"] [FONT="]0[/FONT][FONT="][/FONT]
[/TD]
[TD="width: 64"] [FONT="]20/64"[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 70"][/TD]
[TD="width: 64"][/TD]
[TD="width: 64"][/TD]
[TD="width: 62"][/TD]
[TD="width: 2"][/TD]
[TD="width: 61"][/TD]
[TD="width: 3"][/TD]
[TD="width: 60"][/TD]
[TD="width: 4"][/TD]
[TD="width: 78"][/TD]
[TD="width: 64"][/TD]
[/TR]
</tbody>[/TABLE]
[FONT="] [/FONT]
[FONT="]So, the final output from two worksheets should look like:[/FONT]
[FONT="] [/FONT]
[TABLE="class: MsoTableGrid"]
<tbody>[TR]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="]04:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]08:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]12:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]16:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]20:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]00:00[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="]173L[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[TD="width: 55"] [FONT="]1.5[/FONT]
[/TD]
[TD="width: 55"] [FONT="]8[/FONT]
[/TD]
[TD="width: 55"] [FONT="]3.5[/FONT]
[/TD]
[TD="width: 55"] [FONT="]6[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="]183L[/FONT]
[/TD]
[TD="width: 55"] [FONT="]1[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0.5[/FONT]
[/TD]
[TD="width: 55"] [FONT="]0[/FONT]
[/TD]
[TD="width: 55"] [FONT="]2[/FONT]
[/TD]
[TD="width: 55"] [FONT="]1[/FONT]
[/TD]
[/TR]
</tbody>[/TABLE]
[FONT="] [/FONT]
[FONT="]And finally, to make things more complicated, the monitoring hours vary, like in the table below:[/FONT]
[FONT="] [/FONT]
[TABLE="class: MsoNormalTable, width: 432"]
<tbody>[TR]
[TD="width: 64"]
[FONT="]A[/FONT]
[TD="width: 64"]
[FONT="]B[/FONT]
[TD="width: 64"]
[FONT="]C[/FONT]
[TD="width: 64"]
[FONT="]D[/FONT]
[TD="width: 64"]
[FONT="]E[/FONT]
[TD="width: 64"]
[FONT="]F[/FONT]
[TD="width: 64"]
[FONT="]G[/FONT]
[TD="width: 64"]
[FONT="]H[/FONT]
[TD="width: 64"]
[FONT="]I[/FONT]
[/TR]
[TR]
[TD="width: 576, colspan: 9"] [FONT="]175A[/FONT][FONT="][/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 64"]
[FONT="]DATE[/FONT]
[TD="width: 64"]
[FONT="]TIME[/FONT]
[TD="width: 64"] [FONT="]W[/FONT]
[/TD]
[TD="width: 64"] [FONT="]DS[/FONT]
[/TD]
[TD="width: 64"] [FONT="]WH[/FONT]
[/TD]
[TD="width: 64"] [FONT="]S[/FONT]
[/TD]
[TD="width: 64"] [FONT="]WC[/FONT]
[/TD]
[TD="width: 64"] [FONT="]E[/FONT]
[/TD]
[TD="width: 64"] [FONT="]C[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]bar[/FONT]
[TD="width: 64"]
[FONT="]bar[/FONT]
[TD="width: 64"]
[FONT="]Co[/FONT]
[TD="width: 64"]
[FONT="]22/64"[/FONT]
[TD="width: 64"]
[FONT="]%[/FONT]
[TD="width: 64"]
[FONT="]%[/FONT]
[TD="width: 64"]
[FONT="]%[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="]27.10.13[/FONT]
[TD="width: 64"]
[FONT="]00:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]31[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]00:30[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]32[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]01:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]37[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]01:30[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]02:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]39[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]02:30[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]41[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]03:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]36[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]03:30[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]33[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]04:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]35[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]04:30[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]38[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]05:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]05:30[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]37[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]06:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]33[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]06:30[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]20[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]36[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]07:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]27[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]08:00[/FONT]
[TD="width: 64"]
[FONT="]40.5[/FONT]
[TD="width: 64"]
[FONT="]10[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]29[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]09:00[/FONT]
[TD="width: 64"]
[FONT="]40.5[/FONT]
[TD="width: 64"]
[FONT="]10[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]35[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]10:00[/FONT]
[TD="width: 64"]
[FONT="]40.5[/FONT]
[TD="width: 64"]
[FONT="]10[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]26[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]11:00[/FONT]
[TD="width: 64"]
[FONT="]40.5[/FONT]
[TD="width: 64"]
[FONT="]10[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]29[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]12:00[/FONT]
[TD="width: 64"]
[FONT="]40.5[/FONT]
[TD="width: 64"]
[FONT="]10[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]32[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]13:00[/FONT]
[TD="width: 64"]
[FONT="]41[/FONT]
[TD="width: 64"]
[FONT="]10[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]31[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]14:00[/FONT]
[TD="width: 64"]
[FONT="]41[/FONT]
[TD="width: 64"]
[FONT="]10[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]28[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]15:00[/FONT]
[TD="width: 64"]
[FONT="]41[/FONT]
[TD="width: 64"]
[FONT="]10[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]42[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]16:00[/FONT]
[TD="width: 64"]
[FONT="]41[/FONT]
[TD="width: 64"]
[FONT="]10[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]36[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]17:00[/FONT]
[TD="width: 64"]
[FONT="]41[/FONT]
[TD="width: 64"]
[FONT="]10[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]27[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]18:00[/FONT]
[TD="width: 64"]
[FONT="]41[/FONT]
[TD="width: 64"]
[FONT="]10[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]32[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]19:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9.5[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]36[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]20:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9.5[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]31[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]21:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9.5[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]34[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]22:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9.5[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]29[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]23:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9.5[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]33[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
[TR]
[TD="width: 64"]
[FONT="]28.10.13[/FONT]
[TD="width: 64"]
[FONT="]00:00[/FONT]
[TD="width: 64"]
[FONT="]40[/FONT]
[TD="width: 64"]
[FONT="]9.5[/FONT]
[TD="width: 64"]
[FONT="]18[/FONT]
[TD="width: 64"]
[FONT="]16/64"[/FONT]
[TD="width: 64"]
[FONT="]31[/FONT]
[TD="width: 64"]
[FONT="] [/FONT]
[TD="width: 64"]
[FONT="]trace[/FONT]
[/TR]
</tbody>[/TABLE]
[FONT="] [/FONT]
[FONT="]With this worksheet (175A), my final output should look like this:[/FONT]
[TABLE="class: MsoTableGrid"]
<tbody>[TR]
[TD="width: 55"] [FONT="] [/FONT]
[/TD]
[TD="width: 55"] [FONT="]04:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]08:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]12:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]16:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]20:00[/FONT]
[/TD]
[TD="width: 55"] [FONT="]00:00[/FONT]
[/TD]
[/TR]
[TR]
[TD="width: 55"] [FONT="]173L[/FONT]
[/TD]
[TD="width: 55"]
[FONT="]0[/FONT]
[TD="width: 55"]
[FONT="]1.5[/FONT]
[TD="width: 55"]
[FONT="]8[/FONT]
[TD="width: 55"]
[FONT="]3.5[/FONT]
[TD="width: 55"]
[FONT="]6[/FONT]
[TD="width: 55"]
[FONT="]0[/FONT]
[/TR]
[TR]
[TD="width: 55"] [FONT="]183L[/FONT]
[/TD]
[TD="width: 55"]
[FONT="]1[/FONT]
[TD="width: 55"]
[FONT="]0[/FONT]
[TD="width: 55"]
[FONT="]0.5[/FONT]
[TD="width: 55"]
[FONT="]0[/FONT]
[TD="width: 55"]
[FONT="]2[/FONT]
[TD="width: 55"]
[FONT="]1[/FONT]
[/TR]
[TR]
[TD="width: 55"] [FONT="]175A[/FONT]
[/TD]
[TD="width: 55"]
[FONT="]35[/FONT]
[TD="width: 55"]
[FONT="]29[/FONT]
[TD="width: 55"]
[FONT="]32[/FONT]
[TD="width: 55"]
[FONT="]36[/FONT]
[TD="width: 55"]
[FONT="]31[/FONT]
[TD="width: 55"]
[FONT="]31[/FONT]
[/TR]
</tbody>[/TABLE]
[FONT="] [/FONT]
[FONT="]Since there are no value at column “H”, divided by a factor of “2” is skipped.[/FONT]
[FONT="] [/FONT]
[FONT="]Here is a code I used before, and it executes part of the required job:[/FONT]
[FONT="] [/FONT]
[FONT="]Dim myrow As Long[/FONT]
[FONT="]Dim wksTo As Worksheet[/FONT]
[FONT="]Dim j, s As Long[/FONT]
[FONT="]Dim lastRow, lastsheet As Long[/FONT]
[FONT="]Dim wks As Worksheet[/FONT]
[FONT="]Dim sn As String[/FONT]
[FONT="] [/FONT]
[FONT="] Sheets(1).Select[/FONT]
[FONT="] Sheets.Add.Name = "wksTo"[/FONT]
[FONT="] lastRow = 2 ' set the first row to use, set to 2 so you can add labels in row 1[/FONT]
[FONT="] lastsheet = Sheets.Count[/FONT]
[FONT="] For s = 2 To lastsheet ' Loop thru sheets[/FONT]
[FONT="] Worksheets(s).Activate[/FONT]
[FONT="] With Worksheets(s) ' sheet(s) changes sheets[/FONT]
[FONT="] On Error Resume Next[/FONT]
[FONT="] myrow = .Columns("A").Find(Date).Row[/FONT]
[FONT="] Application.Goto .Range("A" & myrow), True[/FONT]
[FONT="] End With[/FONT]
[FONT="] [/FONT]
[FONT="] With Worksheets(s)[/FONT]
[FONT="] ActiveCell.Offset(rowoffset:=0, columnoffset:=1).Activate[/FONT]
[FONT="] End With[/FONT]
[FONT="] [/FONT]
[FONT="] With Application.ActiveWindow.ActiveCell[/FONT]
[FONT="] dc = 0[/FONT]
[FONT="] sn = Sheets(s).Name[/FONT]
[FONT="] Worksheets("wksTo").Range("G" & lastRow).Formula = sn[/FONT]
[FONT="] For j = 1 To -10 Step -2[/FONT]
[FONT="] Range(.Cells(j, 6), .Cells(j, 6)).Copy Sheets("wksTo").Cells(lastRow, 8 - dc)[/FONT]
[FONT="] dc = dc + 1[/FONT]
[FONT="] Next j[/FONT]
[FONT="] lastRow = lastRow + 1[/FONT]
[FONT="] End With[/FONT]
[FONT="] Next s[/FONT]
[FONT="] [/FONT]
[FONT="] Dim x As Integer[/FONT]
[FONT="] Worksheets("wksTo").Activate[/FONT]
[FONT="] For x = 1 To Worksheets.Count[/FONT]
[FONT="] Cells(x, 1).Value = Worksheets(x).Name[/FONT]
[FONT="] Next x[/FONT]
Dear all,
I need some help in writing a code for the following:
I have a workbook with 11 worksheets in it. Each worksheet has a unique name (such as 167L, 167S, 170S, 170L, 173S, 173L, 175A, 183S, 183L and etc.). Each of the worksheet is updated daily and I need to extract data from specific columns and according to specific time.
A | B | C | D | E | F | G | H | I |
DATE | TIME | W | DS | WH | S | WC | E | C |
bars | bars | C0 | % | % | % | 0/64" | ||
27.10.13 | 00:00 | 95 | 28 | 18 | 0 | 0 | 0 | 24/64" |
| 02:00 | 91 | 28 | 18 | 0 | 0 | 2 | 24/64" |
| 04:00 | 89 | 28 | 17 | 0 | 0 | 0 | 24/64" |
| 06:00 | 93 | 28 | 16 | 0 | 0 | 1 | 24/64" |
| 08:00 | 95 | 28 | 16 | 0 | 0 | 3 | 24/64" |
| 10:00 | 90 | 28 | 16 | 0 | 0 | 12 | 24/64" |
| 12:00 | 89 | 28 | 14 | 0 | 0 | 16 | 24/64" |
| 14:00 | 92 | 28 | 14 | 0 | 0 | 5 | 24/64" |
| 16:00 | 95 | 28 | 15 | 0 | 0 | 7 | 24/64" |
| 18:00 | 92 | 28 | 14 | 0 | 0 | 8 | 24/64" |
| 20:00 | 93 | 28 | 14 | 0 | 0 | 12 | 24/64" |
| 22:00 | 90 | 28 | 14 | 0 | 0 | 6 | 24/64" |
28.10.13 | 00:00 | 98 | 28 | 14 | 0 | 0 | 0 | 24/64" |
<tbody>
[TD="colspan: 9"] 173L
[/TD]
</tbody>
Basically, the code I have used before I was assisted by the www.mrexcel.com/forum before, however, I need to have it devised in a bit different way (pls visit the www….. for details). The code I need should (a) select values at column “B” (the corresponding values are 04:00, 08:00, 12:00, 16:00, 20:00 and 00:00), copy value in column “G” (0, 0, 0, 0, 0, 0) and sum up with values from column “H”, which before being added should be divided by a factor of “2” (0/2=0, 3/2=1.5, 16/2=8, 7/2=3.5, 12/2=6, 0/2=0). The summed values should be copied and pasted into a separate worksheet and it needs to look like this:
| 04:00 | 08:00 | 12:00 | 16:00 | 20:00 | 00:00 |
173L | 0 | 1.5 | 8 | 3.5 | 6 | 0 |
| | | | | | |
<tbody>
</tbody>
A | B | C | D | H | ||||||
DATE | TIME | W | WC | C | ||||||
bars | % | 0/64" | ||||||||
27.10.13 | 00:00 | 30 | 3 | 20/64" | ||||||
| 02:00 | 34 | 1 | 20/64" | ||||||
| 04:00 | 38 | 1 | 20/64" | ||||||
| 06:00 | 38 | 2 | 20/64" | ||||||
| 08:00 | 37 | 0 | 20/64" | ||||||
| 10:00 | 36 | 0 | 20/64" | ||||||
| 12:00 | 31 | 0.5 | 20/64" | ||||||
| 14:00 | 28 | 0 | 20/64" | ||||||
| 16:00 | 25 | 0 | 20/64" | ||||||
| 18:00 | 21 | 4 | 20/64" | ||||||
| 20:00 | 33 | 2 | 20/64" | ||||||
| 22:00 | 35 | 1 | 20/64" | ||||||
28.10.13 | 00:00 | 35 | 0 | 20/64" | ||||||
<tbody>
[TD="colspan: 2"] E
[/TD]
[TD="colspan: 2"] F
[/TD]
[TD="colspan: 2"] G
[/TD]
[TD="colspan: 11"] 183L
[/TD]
[TD="colspan: 2"]DS
[/TD]
[TD="colspan: 2"]WH
[/TD]
[TD="colspan: 2"]S
[/TD]
[TD="colspan: 2"] bars
[/TD]
[TD="colspan: 2"] C0
[/TD]
[TD="colspan: 2"] %
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 15
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 15
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 15
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 15
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 15
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 17
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 18
[/TD]
[TD="colspan: 2"] 0
[/TD]
[TD="colspan: 2"] 11.5
[/TD]
[TD="colspan: 2"] 18
[/TD]
[TD="colspan: 2"] 0
[/TD]
</tbody>
So, the final output from two worksheets should look like:
| 04:00 | 08:00 | 12:00 | 16:00 | 20:00 | 00:00 |
173L | 0 | 1.5 | 8 | 3.5 | 6 | 0 |
183L | 1 | 0 | 0.5 | 0 | 2 | 1 |
<tbody>
</tbody>
And finally, to make things more complicated, the monitoring hours vary, like in the table below:
[TABLE="width: 576"]
<tbody>[TR]
[TD]A
[/TD]
[TD]B
[/TD]
[TD]C
[/TD]
[TD]D
[/TD]
[TD]E
[/TD]
[TD]F
[/TD]
[TD]G
[/TD]
[TD]H
[/TD]
[TD]I
[/TD]
[/TR]
[TR]
[TD="colspan: 9"]175A
[/TD]
[/TR]
[TR]
[TD]DATE
[/TD]
[TD]TIME
[/TD]
[TD]W
[/TD]
[TD]DS
[/TD]
[TD]WH
[/TD]
[TD]S
[/TD]
[TD]WC
[/TD]
[TD]E
[/TD]
[TD]C
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]
[/TD]
[TD]bar
[/TD]
[TD]bar
[/TD]
[TD]Co
[/TD]
[TD]22/64"
[/TD]
[TD]%
[/TD]
[TD]%
[/TD]
[TD]%
[/TD]
[/TR]
[TR]
[TD]27.10.13
[/TD]
[TD]00:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]31
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]00:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]32
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]01:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]37
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]01:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]40
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]02:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]39
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]02:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]41
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]03:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]36
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]03:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]33
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]04:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]35
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]04:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]38
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]05:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]40
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]05:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]37
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]06:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]33
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]06:30
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]20
[/TD]
[TD]16/64"
[/TD]
[TD]36
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]07:00
[/TD]
[TD]40
[/TD]
[TD]9
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]27
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]08:00
[/TD]
[TD]40.5
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]29
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]09:00
[/TD]
[TD]40.5
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]35
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]10:00
[/TD]
[TD]40.5
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]26
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]11:00
[/TD]
[TD]40.5
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]29
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]12:00
[/TD]
[TD]40.5
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]32
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]13:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]31
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]14:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]28
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]15:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]42
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]16:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]36
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]17:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]27
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]18:00
[/TD]
[TD]41
[/TD]
[TD]10
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]32
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]19:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]36
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]20:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]31
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]21:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]34
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]22:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]29
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]
[/TD]
[TD]23:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]33
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
[TR]
[TD]28.10.13
[/TD]
[TD]00:00
[/TD]
[TD]40
[/TD]
[TD]9.5
[/TD]
[TD]18
[/TD]
[TD]16/64"
[/TD]
[TD]31
[/TD]
[TD]
[/TD]
[TD]trace
[/TD]
[/TR]
</tbody>[/TABLE]
With this worksheet (175A), my final output should look like this:
| 04:00 | 08:00 | 12:00 | 16:00 | 20:00 | 00:00 |
173L | 0 | 1.5 | 8 | 3.5 | 6 | 0 |
183L | 1 | 0 | 0.5 | 0 | 2 | 1 |
175A | 35 | 29 | 32 | 36 | 31 | 31 |
<tbody>
</tbody>
Since there are no value at column “H”, divided by a factor of “2” is skipped.
Here is a code I used before, and it executes part of the required job:
Dim myrow As Long
Dim wksTo As Worksheet
Dim j, s As Long
Dim lastRow, lastsheet As Long
Dim wks As Worksheet
Dim sn As String
Sheets(1).Select
Sheets.Add.Name = "wksTo"
lastRow = 2 ' set the first row to use, set to 2 so you can add labels in row 1
lastsheet = Sheets.Count
For s = 2 To lastsheet ' Loop thru sheets
Worksheets(s).Activate
With Worksheets(s) ' sheet(s) changes sheets
On Error Resume Next
myrow = .Columns("A").Find(Date).Row
Application.Goto .Range("A" & myrow), True
End With
With Worksheets(s)
ActiveCell.Offset(rowoffset:=0, columnoffset:=1).Activate
End With
With Application.ActiveWindow.ActiveCell
dc = 0
sn = Sheets(s).Name
Worksheets("wksTo").Range("G" & lastRow).Formula = sn
For j = 1 To -10 Step -2
Range(.Cells(j, 6), .Cells(j, 6)).Copy Sheets("wksTo").Cells(lastRow, 8 - dc)
dc = dc + 1
Next j
lastRow = lastRow + 1
End With
Next s
Dim x As Integer
Worksheets("wksTo").Activate
For x = 1 To Worksheets.Count
Cells(x, 1).Value = Worksheets(x).Name
Next x