Solved

# Compare two arrays

Posted on 2006-07-06
177 Views
I have two arrays filled with inventory part numbers and pricing information.

Dim existing400(2000, 4)  ~600 items
Dim New400(2000, 3)      ~1200 items

existing400(1,1) 'part number
existing400(1,2) 'Item description
existing400(1,3) 'unit price
existing400(1,4) 'unit price from "New400" array

new400(1,1) 'part number
new400(1,2) 'Item description
new400(1,3) 'unit price

What I am looking to accomplish is to fill the first array(existing400(1,4)) with the current pricing from the second array(new400).

I need ideas on how to set this up.
Thanks,
Bob

0
Question by:RobertStamm
• 2
• 2

LVL 13

Accepted Solution

rettiseert earned 250 total points
Try this:

Dim I As Long, J As Long

For I = LBound(existing400) To UBound(existing400)
For J = LBound(New400) To UBound(New400)
If existing400(I, 1) = New400(J, 1) Then
existing400(1, 4) = New400(1, 3)
End If
Next
Next
0

Author Comment

rettiseert,
Found a opps but I was able to fix it.

existing400(1, 4) = New400(1, 3)
Should have been.
existing400(I, 4) = New400(J, 3)

Works great.
Thank you.
Bob
0

LVL 13

Expert Comment

yes, a little mistake : )

also, you would like to add a
exit for
after the existing400(I, 4) = New400(J, 3) line
0

Author Comment

thanks
Bob
0

## Featured Post

Introduction While answering a recent question (http://www.experts-exchange.com/Q_27402310.html) in the VB classic zone, I wrote some VB code in the (Office) VBA environment, rather than fire up my older PC.  I didn't post completely correct code o…
This article describes some techniques which will make your VBA or Visual Basic Classic code easier to understand and maintain, whether by you, your replacement, or another Experts-Exchange expert.
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…