Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Find cell with duplicates
Hi, I have a worksheet(1) with a lot of data in column B. In this dat duplicates exist. I have another worksheet(2) (a copy of worksheet(1) on which the user can add rows and data in column B. I have some cod (see below) to copy values from column P of worksheet(2) to column F o worksheet(1). The only problem is there are duplicates in column B of worksheet(1) So by using the code below it allways gets the first duplicate an that's not how it should go. Can someone help me change the code so it will find the righ duplicate? Thanks in advance! Code ------------------- For Each cell In Sheets("Begroting WVB Won").Range("B12:B242") myvalue = cell.Offset(0, 14).Value Set myCell = Worksheets("Totaaloverzicht Won").Range("B:B").Find _ (cell.Value) myCell(1, 5).Value = myvalue Next cel ------------------- -- leonida ----------------------------------------------------------------------- leonidas's Profile: http://www.excelforum.com/member.php...fo&userid=3537 View this thread: http://www.excelforum.com/showthread.php?threadid=56888 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Find cell with duplicates
Hello,
The easiest way to get something like this to work would be to have another reference that you can double check. It could be a simple incrementation (ie in one column you have 1, 2 ,3 ... till the end). You could then have it search for your cell and if the increment number is correct do whatever modifications you want. Or if there is some other data you can use that could also work. cheers, Scott "leonidas" wrote: Hi, I have a worksheet(1) with a lot of data in column B. In this data duplicates exist. I have another worksheet(2) (a copy of worksheet(1)) on which the user can add rows and data in column B. I have some code (see below) to copy values from column P of worksheet(2) to column F of worksheet(1). The only problem is there are duplicates in column B of worksheet(1). So by using the code below it allways gets the first duplicate and that's not how it should go. Can someone help me change the code so it will find the right duplicate? Thanks in advance! Code: -------------------- For Each cell In Sheets("Begroting WVB Won").Range("B12:B242") myvalue = cell.Offset(0, 14).Value Set myCell = Worksheets("Totaaloverzicht Won").Range("B:B").Find _ (cell.Value) myCell(1, 5).Value = myvalue Next cell -------------------- -- leonidas ------------------------------------------------------------------------ leonidas's Profile: http://www.excelforum.com/member.php...o&userid=35375 View this thread: http://www.excelforum.com/showthread...hreadid=568887 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
find duplicates | Excel Worksheet Functions | |||
Find duplicates | Excel Discussion (Misc queries) | |||
Find cell (with duplicates) | Excel Programming | |||
Find Duplicates | Excel Discussion (Misc queries) | |||
Find duplicates | Excel Discussion (Misc queries) |