Hello.
In my daily work as a material controller I everyday check an error
list that a system provides for me. This error list generates all part
numbers that will be out of stock in 5 days. This to make me order new
parts.
Today I manually copy the values from the error list into an excel
file.
This file contains these columns,
Supplier, Partnumber, Which date the part is out of stock, How many we
are short on (Depending on the order stock), Which date we have the
next planned shipment, How many, Transit time, Which day the part
actually are out of stock(For special parts), A simple note field
Because of the fact that I every day see five days ahead I see the same
rows for five days although I already the first day have written
delivery info in the note field.
I would like to have a loop that checks the first row and puts
quot;Supplier, Partnumber, Which date the part is out of stock, How many we
are short on (Depending on the order stock), Which date we have the next
planned shipment, How manyquot; in a array and then loops through all rows
and looks after a completely simmilar row and then clears it. After the
loop has finnished for the first rows partnumber then the loop should
continue with row two and so on.
Is this understandable?
Are someone able to give me a complete sollution for this or some hints
about how to make it work than I'll be glad.
Thanks in advance.
/Anders--
a94andwi
------------------------------------------------------------------------
a94andwi's Profile: www.excelforum.com/member.php...oamp;userid=21077
View this thread: www.excelforum.com/showthread...hreadid=519334We are not sure how you see the five rows.
If you manually copy them every day, we assume the daily entries are grouped
in blocks in descending order.
If you can sort them to line up the 8 fields with the note field as the
first row
then try this.
You have to complete the AND statement to capture all the 6 field you
mentioned if they are important please.
Sub t()
lastrow = Range(quot;Aquot; amp; Rows.Count).End(xlUp).Row
For i = lastrow To 1 Step -1
If Range(quot;Aquot; amp; i) = Range(quot;Aquot; amp; i - 1) And Range(quot;Bquot; amp; i) = Range(quot;Bquot; amp; i -
1) Then
Row(i).Delete
End If
Next i
End Sub
quot;a94andwiquot; wrote:
gt;
gt; Hello.
gt;
gt; In my daily work as a material controller I everyday check an error
gt; list that a system provides for me. This error list generates all part
gt; numbers that will be out of stock in 5 days. This to make me order new
gt; parts.
gt;
gt; Today I manually copy the values from the error list into an excel
gt; file.
gt; This file contains these columns,
gt;
gt; Supplier, Partnumber, Which date the part is out of stock, How many we
gt; are short on (Depending on the order stock), Which date we have the
gt; next planned shipment, How many, Transit time, Which day the part
gt; actually are out of stock(For special parts), A simple note field
gt;
gt; Because of the fact that I every day see five days ahead I see the same
gt; rows for five days although I already the first day have written
gt; delivery info in the note field.
gt;
gt; I would like to have a loop that checks the first row and puts
gt; quot;Supplier, Partnumber, Which date the part is out of stock, How many we
gt; are short on (Depending on the order stock), Which date we have the next
gt; planned shipment, How manyquot; in a array and then loops through all rows
gt; and looks after a completely simmilar row and then clears it. After the
gt; loop has finnished for the first rows partnumber then the loop should
gt; continue with row two and so on.
gt;
gt; Is this understandable?
gt;
gt; Are someone able to give me a complete sollution for this or some hints
gt; about how to make it work than I'll be glad.
gt;
gt; Thanks in advance.
gt;
gt; /Anders
gt;
gt;
gt; --
gt; a94andwi
gt; ------------------------------------------------------------------------
gt; a94andwi's Profile: www.excelforum.com/member.php...oamp;userid=21077
gt; View this thread: www.excelforum.com/showthread...hreadid=519334
gt;
gt;
Hello.
Thanks for your input. Will in be any easier if I could attach an
example?
I have attached an example.
The fields that comes from the system are the first four columns. Every
day I open the excelfile from yesterday and add todays new rows. This is
when I want to delete those rows that were there yesterday as well. If I
am able to do that with a simple macro I do not need to write the same
info as yesterday in the notefield. I will only keep the new rows from
todays list.
Thanks
Anders -------------------------------------------------------------------
|Filename: Errorfile.txt |
|Download: www.excelforum.com/attachment.php?postid=4424 |
-------------------------------------------------------------------
--
a94andwi
------------------------------------------------------------------------
a94andwi's Profile: www.excelforum.com/member.php...oamp;userid=21077
View this thread: www.excelforum.com/showthread...hreadid=519334Download failed.
Send to pynasocas at yahoo com sg please
GMT 8
quot;a94andwiquot; wrote:
gt;
gt; Hello.
gt;
gt; Thanks for your input. Will in be any easier if I could attach an
gt; example?
gt; I have attached an example.
gt;
gt; The fields that comes from the system are the first four columns. Every
gt; day I open the excelfile from yesterday and add todays new rows. This is
gt; when I want to delete those rows that were there yesterday as well. If I
gt; am able to do that with a simple macro I do not need to write the same
gt; info as yesterday in the notefield. I will only keep the new rows from
gt; todays list.
gt;
gt; Thanks
gt; Anders
gt;
gt;
gt; -------------------------------------------------------------------
gt; |Filename: Errorfile.txt |
gt; |Download: www.excelforum.com/attachment.php?postid=4424 |
gt; -------------------------------------------------------------------
gt;
gt; --
gt; a94andwi
gt; ------------------------------------------------------------------------
gt; a94andwi's Profile: www.excelforum.com/member.php...oamp;userid=21077
gt; View this thread: www.excelforum.com/showthread...hreadid=519334
gt;
gt;
