need help with stock control

123456890

New Member
Joined
May 23, 2012
Messages
2
hi
can any one help me i need a way of taking a col of bar codes deleting duplicates and all so adding them up like this

<table border="1" cellpadding="0" cellspacing="0" width="368"><colgroup><col style="mso-width-source:userset;mso-width-alt:6436;width:132pt" width="176"> <col style="width:48pt" span="3" width="64"> </colgroup><tbody><tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;width:132pt" height="20" width="176">barcode</td> <td class="xl67" style="border-left:none;width:48pt" width="64">
</td> <td class="xl67" style="border-left:none;width:48pt" width="64">
</td> <td class="xl67" style="border-left:none;width:48pt" width="64">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">6521439870123</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">5421547812451</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">5421547812451</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">4123456123453</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">5421547812451</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">4123456123453</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">5421547812451</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> </tbody></table>
into this

<table border="1" cellpadding="0" cellspacing="0" width="368"><colgroup><col style="mso-width-source:userset;mso-width-alt:6436;width:132pt" width="176"> <col style="width:48pt" width="64"> <col style="width:48pt" span="2" width="64"> </colgroup><tbody><tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;width:132pt" height="20" width="176">barcode</td> <td class="xl68" style="border-left:none;width:48pt" width="64">QT</td> <td class="xl67" style="border-left:none;width:48pt" width="64">
</td> <td class="xl67" style="border-left:none;width:48pt" width="64">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">6521439870123</td> <td class="xl68" style="border-top:none;border-left:none">1</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">5421547812451</td> <td class="xl68" style="border-top:none;border-left:none">4</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">4123456123453</td> <td class="xl68" style="border-top:none;border-left:none">2</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">
</td> <td class="xl68" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">
</td> <td class="xl68" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">
</td> <td class="xl68" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> <tr style="height:15.0pt" height="20"> <td class="xl66" style="height:15.0pt;border-top:none" height="20">
</td> <td class="xl68" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> <td class="xl67" style="border-top:none;border-left:none">
</td> </tr> </tbody></table>
 

Excel Facts

VLOOKUP to Left?
Use =VLOOKUP(A2,CHOOSE({1,2},$Z$1:$Z$99,$Y$1:$Y$99),2,False) to lookup Y values to left of Z values.
this does not do what i was looking for i would like some sort of macro to do this there is one on here but it put the number in the same cell can any one help change it to put it in the next cell thanks ian
Code:
Sub test() Dim a(), e, i As Long, x, y With Range("a1").CurrentRegion.Resize(,1)     a = .Value     With CreateObject("Scripting.Dictionary")         .CompareMode = vbTextCompare         For Each e In a             If Not IsEmpty(e) Then                 If Not .exists(e) Then .add e, 0                 .item(e) = .item(e) + 1             End If         Next         Erase a : x = .keys : y = .items : Redim a(1 To .count, 1 To 1)     End With     For i = 0 To UBound(x)         a(i + 1, 1) = Format$(y(i), "00000") & "-" & x(i)     Next     .Value = a End With End Sub</pre>
 
Upvote 0

Forum statistics

Threads
1,224,454
Messages
6,178,762
Members
452,874
Latest member
dasbach

We've detected that you are using an adblocker.

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

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

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

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

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

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

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

Disable uBlock

Follow these easy steps to disable uBlock

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