I have 2 spreadsheets with related data

spreadsheet1:
code data1
1 asd
2 qwe
3 zxc
etc (very long list... with several more columns...)

spreadsheet2:
code data2
1 poiu
3 lljh
etc (list can be short, with more columns, and updateable) all codes in
spreadsheet2 ARE included in spreadsheet 1

is there a way to append this data, so that it will show something like:

code data1 data2
1 asd poiu
2 qwe
3 zxc lljh

Assuming the entry 1 is in A2 of Sheet1 and the entries 1 and poiu are in
A2 and B2, respectively, of Sheet2:
In C2 of Sheet1 use =VLOOKUP(A2,Sheet2!$A$2:$B$999,2,FALSE) to get the data
needed in C2 of Sheet1.
best wishes & Merry Christmas
--
Bernard V Liengme
www.stfx.ca/people/bliengme
remove caps from email

"ed" wrote in message
...
I have 2 spreadsheets with related data

spreadsheet1:
code data1
1 asd
2 qwe
3 zxc
etc (very long list... with several more columns...)

spreadsheet2:
code data2
1 poiu
3 lljh
etc (list can be short, with more columns, and updateable) all codes in
spreadsheet2 ARE included in spreadsheet 1

is there a way to append this data, so that it will show something like:

code data1 data2
1 asd poiu
2 qwe
3 zxc lljh

Sub transferdata()
ds = "DestinationSheet"
With Sheets("Sourcesheet")
For Each c In .Range("a16:a" & .Cells(.Rows.Count, "a").End(xlUp).Row)
s = Sheets(ds).Columns(1).Find(c).Row
sc = Sheets(ds).Cells(s, "iv").End(xlToLeft).Column + 1
Sheets(ds).Cells(s, sc).Value = c.Offset(, 1)
Next
End With
End Sub

--
Don Guillett
SalesAid Software

"ed" wrote in message
...
I have 2 spreadsheets with related data

spreadsheet1:
code data1
1 asd
2 qwe
3 zxc
etc (very long list... with several more columns...)

spreadsheet2:
code data2
1 poiu
3 lljh
etc (list can be short, with more columns, and updateable) all codes in
spreadsheet2 ARE included in spreadsheet 1

is there a way to append this data, so that it will show something like:

code data1 data2
1 asd poiu
2 qwe
3 zxc lljh