Macro To Delete File Duplicates?
Feb 5, 2013
I have a macro at work that shows which files are duplicates (same name plus file size) it then produces a list of this with 3 fields file path(excluding file), file name and ext, and size. it produces a duplicate of the file for example:
file a
file a
file b
file b
i would like a macro to delete just 1 of theese (as deleteing both would be bad!! haha) and have no idea how to start this. other than going through all 1679 files that have a duplicate.
View 9 Replies
ADVERTISEMENT
Dec 29, 2011
I have a macro that delete empty cells in a column, what i wanted to do is while deleting the empty cells is that the macro will also delete duplicates in ENTIRE WORKSHEETS. My file has so many sheets so i need a macro that run or loop on my entire worksheets.
This is my code. that only runs in a single sheet.
Code:
Sub deleteblanks()
Columns("H").SpecialCells(xlBlanks).Delete (xlUp)
End Sub
[Code] ..............
View 9 Replies
View Related
Sep 22, 2009
Looking for a macro to find and delete all duplicates and keep only unique values from a column. For example column AS has
ACLU0403598
ACLU0403598
ACLU0403598
ACLU0406600
ACLU5165518
ACLU0406581
ACLU0406581
All red items need to be removed and keep only green items. Would also like the entire row the duplicates are in to be deleted.
View 6 Replies
View Related
Feb 14, 2011
I have a spreedsheet with 17,000 rows in it. In column D I have ID numbers and in column B I have the dates. There are multiple entries for each ID in column D which gives multiples dates each entry was given in column B. I need a VBA Macro that will identify duplicate entries in Column D and keep only the most recent entry by date in column B.
View 9 Replies
View Related
May 29, 2013
I need it to clear the contents from the cells, then copy a number of sets of cells from selector, paste them in to AM call plan and then delete the duplicates. My code is getting stuck very early in the whole thing. The copy, paste sequences, were originally recorded as a macro, then added to trying to get it to work.
Here is the code, and the red line of code is where it is stopping:
Sub Call_Plan_Targets()
'
' Call_Plan_Targets Macro
'
Dim LR As Long
Application.ScreenUpdating = False
LR = ActiveSheet.UsedRange.Rows.Count
[code].....
View 1 Replies
View Related
Sep 19, 2007
I have created a macro that saves a file then emails it out through lotus notes..
The problem is that how to i kill/delete the file that i have just made without it prompting me whether i want to or not? Or is there a way of only saving the file temporarily untill the macro has finishing running then it deletes the temporary file?
View 6 Replies
View Related
Dec 27, 2006
I have a CSV file with the following columns:
column1, Column2, Column3
A, B, "C,D"
I need to write a macro to :
1. Delete column2
2. Save the CSV file. At the time of saving I need to supress all default messages.
View 9 Replies
View Related
Apr 10, 2014
I've attached a test excel to this post. Column C contains several identical email addresses. I need ALL the rows containing the duplicate data removed, not leaving one remaining as Remove Duplicate Values normally does.
I'm going to be doing this with many Excels all with differing amounts of data surrounding column C. I need a reliable way to achieve this, regardless of how many extra data columns exist. If there is a duplicate of data in column C, all rows containing that data need to go, regardless of what other data may also be present in those rows.
View 10 Replies
View Related
Jun 15, 2006
I'm new to this and trying to write my own code (quit satisfying actually), I realise there's a lot of threads on duplicates but I couldn't really solve my problem. My code looks like the following
Private Sub Dubletter_Click()
Dim i As Long, lastrow As Long
Dim cell As range
For Each cell In Sheets("LR").range(Cells(3, 2), Cells(Rows.Count, 2))
lastrow = Cells(Rows.Count, 2).End(x1Up).Row
For i = lastrow To 3 Step -1
If Cells(r, 2).Value = cell Then
cell.EntireRow.Delete .....................
View 9 Replies
View Related
Feb 26, 2007
I want to create a macro that will look at different account numbers and delete those rows that have a sum of zero for that same account number. In other words, I am working with an accounting spreadsheet which shows both accounts payable and receivable. When payment is received for an account, I would like the macro to delete it, leaving only outstanding accounts. For instance: ....
View 7 Replies
View Related
Jun 19, 2013
I have a column with text values, I would like to remove all the duplicates. How can I do that??
View 4 Replies
View Related
Oct 24, 2013
I have two columns with emails. I would like to delete the emails that have duplicates. I want to delete them from both columns.
View 3 Replies
View Related
Jun 3, 2014
how to Delete Duplicates in Column D with a macro. It would search all of Column D and look for Duplicates and if it finds an exact value match it will delete one of the rows containing the duplicates. This is running in between a much longer macro which is the reason why I can't do it with conditional formatting.
View 12 Replies
View Related
Jun 4, 2014
I'm trying to create a macro that will Delete Rows of Duplicates found in Column D. It will start with the first row it finds that is yellow and check to see if that Column D matches any other yellow Column D's. If it does then the row the match is in gets deleted. Right now it searches in between the yellow rows, but for this portion I'm looking for it to use the yellow rows only. I included a file that has the examples on sheet1 and the expected outcome on sheet2.
View 6 Replies
View Related
Mar 12, 2014
I have an excel sheet which has product list according to each site. I want to count any duplicate products and delete the duplicates.
I have attached an excel worksheet with example template to show what i want it to look like.
View 1 Replies
View Related
May 7, 2009
i'm trying to do sounds simple enough. I have 2 Columns of data, example;
1-Apr 1423
1-Apr 1426
24-Apr1430
8-May1454
8-May1460
15-May1500
15-Jun1525
15-Jun1555
15-Jun1556
I want to clear (not delete) the cells with a duplicate date in them while keeping the cell with the number next to it. So in this case they would be A2, A5, A8, A9. I've come up with a code that looks pretty logical but it doesn't work. Here's what it looks like.
View 3 Replies
View Related
Jul 2, 2009
Hi, the code in the codebox under here, which I wrote, is supposed to delete all duplicate records in the column. Which column to uniquify is stated in cell Skin!B17. I searched the internet round, and there are different solutions everywhere. I have been unable though to find the right one - so I thought, why not ask here. If you have a solution, I'd be happy to hear it ...
View 14 Replies
View Related
Dec 24, 2009
I have a list of 18k rows, and about 7.5k are known duplicates. The delete duplicates button will not delete the duplicates (except it keeps returning 41 duplicates for an unknown reason, but there definitely thousands more it is missing). I tried the remove duplicates button, advance sort, coloring cells, and some macros. The list is the combination of two lists, one older one just compiled, I was able to seamlessly delete dups in another list.
View 9 Replies
View Related
May 23, 2007
2500 or so rows
based on these 3 columns:
[A], [B], [C]
company [A] , Account # [b], Fund # [c]
need to delete duplicates but keep lowest Fund # one.
basically if company and account # are the same then delete but keep the one with the lowest fund #
View 10 Replies
View Related
Jun 6, 2006
I have a macro that Deletes duplicates in a column. But it deletes all but the last cell. Does anyone know how to change it so It keeps the first cell and deletes the subsequent duplicates Instead?
View 9 Replies
View Related
Jul 10, 2006
I am writing a spreadsheet to do the following. I have clients that submit lists of words (3 columns of data) that need to be normalised (ie - certain punctuation removing, casing to lower etc) and then all duplicates to be removed. It then pastes everything into a new sheet. Now, it all works perfectly but, runs a little too slow.
Sub NormaliseDedupe()
Application.Calculation = xlCalculationManual
Application. ScreenUpdating = False
Dim my_advertiser
Set my_advertiser = Range("G1")
Dim my_client
Set my_client = Range("J1")
Sheets("Normalised Keywords").Select
If my_advertiser = "" Or my_client = "" Then
MsgBox "Enter the Advertiser & Client at the top of the sheet."
Exit Sub
End If
Dim my_date As String
my_date = Trim(VBA.Format(Now(), "DD.MM.YY"))........................
View 3 Replies
View Related
May 9, 2007
Here in the excel sheet i have columns upto K with rows upto 3295 In these columns the F column has Duplicates in that columns
My question is how we can delete the duplicates in that F column so that i can see my excel sheet without any duplicates in that F column.
View 3 Replies
View Related
Jun 20, 2008
I have a random set of numbers located in one column. This is the only data located on the entire worksheet. I need an Excel macro that will delete all duplicates except for any specified values. For example, I have a set of random numbers in one column and I need to delete all duplicates except for the number 12. All duplicates of the number 12 must remain. The numbers must remain in their original order and not be sorted.
The numbers will always be located in column A, but will not always be the same quantity. One time I may have 10 numbers, and the next I may have 20. The number for which duplicates must remain will also vary. I have written small Excel macros that delete rows, blanks, and duplicates but this is way beyond my capabilities.
View 2 Replies
View Related
Mar 29, 2013
I have two columns of data, one with an ID # and the other one with a date. Some ID# + date combinations are repeated and I need to delete the duplicates. Here is a visual:
ID# date
54 19720211
54 19720211
54 19810512
67 19590312
89 19931104
89 19931104
I need to keep only unique ID/date combinations. I would need the final list to look like this:
ID# Date
54 19720211
54 19810512
67 19590312
89 19931104
View 2 Replies
View Related
May 30, 2014
I have scroll a column and clear (not delete) the content of those cells that they are repeated. not delete the row
I tried with this code but doesn't work, why?
[Code] ......
View 1 Replies
View Related
Feb 20, 2009
I am using the following code to grab installed software on a remote computer through a macro in Excel 2007. I don't have the entire code I'm using as the majority of it works, this section here though is where I'm having problems.
View 4 Replies
View Related
Apr 1, 2009
I have an excel 2007 spreadsheet that lists
items on multiple rows for the same customer.
Each sheet will list anywhere from 25 to 100 individual customers.
I need to identify the duplicates, concatenate
the "Items" to a single cell on the first row, and
delete the duplicate rows. eg:
Cust #| Item
1 | A
1 | B
1 | C
2 | B
2 | E
3 | A
3 | C
3 | E
The result should look like:
Cust# | New Item
1 | A, B, C
2 | B, E
3 | A, C, E
View 14 Replies
View Related
Sep 28, 2009
I found the following code to delete duplicates. I want the code to work on close and only on a specific sheet....
View 3 Replies
View Related
Oct 15, 2009
I have 2 columns of data with 7,000 rows that I am trying to manipulate in the following way. The first column contains a list of car manufacturers (not really my example, but involves the same concept). The second column contains a list of different models of cars. For instance,
Ford | Taurus
Chevrolet | Avalanche
Saturn | Sky
Ford | Explorer
Honda | Accord
Ford | Taurus
What I want is a list of 2 columns with UNIQUE car manufacturers in first column with a list of UNIQUE car models (comma delimited) in second column. So for this example, the first row could read " Ford | Taurus,Explorer". I don't want Taurus to appear twice. I got a lot of help from JBeaucaire from this post. I just can't add the ability to remove car models from the list also. Thanks in advance for all the help!
View 7 Replies
View Related
Jul 20, 2005
I have a sheet of Data containing 3705 rows. It has plenty of duplicates. Column A is where is located the identification. I need to delete the rows that are duplicated, in order to have only one row for each identification number. I tried to create my own VBA macro to do so, but it seems it doesn't delete all the duplicated rows and it seems to even delete unique rows.
Sub Duplicates()
Dim lstRw As Long
Dim i As Long
Dim j As Long
Dim m As Long
m = 1
Dim Compteur As Long
Compteur = 0
Application. ScreenUpdating = False
Let lstRw = Sheets("UE"). Range("A65536").End(xlUp).Row
For i = 2 To lstRw
'With Worksheets("UE")
SumNumber = Range("A" & i).Value.....................
View 5 Replies
View Related
