Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]() I've tried searching for a solution without success (probably using th wrong key phrases) I have a numbers in column A (4434) And I have numbers in column C (389) I wish for any number in column C that is duplicated in column A to b deleted from column A. I've tried messing around with: Sub rem_dup_test() ' ' rem_dup_test Macro ' Macro recorded 15/12/2005 by PreeceJ ' ' Application.ScreenUpdating = False Dim lastrow As Long, i As Long, l As Long Dim DupNum As Range, MainColumn As Range lastrow = Cells(Rows.Count, 1).End(xlUp).Row For i = 1 To lastrow For l = 1 To lastrow Set DupNum = Cells(i, "C") Set MainColumn = Cells(i, "A") If MainColumn = DupNum Then Selection.Delete Shift:=xlUp Next l Next i End Sub but it doesn't even come close :( Any advice please -- Damin ----------------------------------------------------------------------- Daminc's Profile: http://www.excelforum.com/member.php...fo&userid=2707 View this thread: http://www.excelforum.com/showthread.php?threadid=49382 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Formatting Cells and then deleting the reference column | Excel Worksheet Functions | |||
deleting rows with blank cells after a specified column? | Excel Discussion (Misc queries) | |||
Deleting Duplicate Cells in one Column. | Excel Discussion (Misc queries) | |||
Deleting partial information from all cells in a column | Excel Worksheet Functions | |||
Deleting blank cells in a column | Excel Discussion (Misc queries) |