Disaster Recovery as a Service is one go-to solution that revolutionizes DR planning. Implementing DRaaS could be an efficient process, easily accessible to non-DR experts. Learn about monitoring, testing, executing failovers and failbacks to ensure a "healthy" DR environment.
Solved
Remove Absolute Range
Posted on 2013-12-20
In code it references,
ActiveSheet.Range("$A$1:$A
How can I tell this to RemoveDups on whatever is in column A?
Please advise and thanks. -R-
ActiveSheet.Range("$A$1:$A
How can I tell this to RemoveDups on whatever is in column A?
Please advise and thanks. -R-
Sub ZSHORTV2Step3ReplaceMM17DupsFromNewZSHORTV2()
'
' ZSHORTV2Step3 Macro
'
'
Sheets("MM17NoDups").Select
Columns("A:A").Select
Selection.ClearContents
Sheets("ZSHORTV2DataPrevious").Select
Columns("C:C").Select
Selection.Copy
Sheets("MM17NoDups").Select
Columns("A:A").Select
ActiveSheet.Paste
Selection.ColumnWidth = 15
' Columns("A:A").Select
Application.CutCopyMode = False
Application.DisplayAlerts = False
ActiveSheet.Range("$A$1:$A$8569").RemoveDuplicates Columns:=1, Header:= _
xlYes
Application.DisplayAlerts = True
Sheets("ZSHORTV2DataCurrent").Select
MsgBox ("MM17NoDups Updated")
Range("A1").Select
End Sub
[X]
Welcome to Experts Exchange
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
- Help others & share knowledge
- Earn cash & points
- Learn & ask questions
3
3-
3
9 Comments
Active 1 day ago
Change Line 20 to 2 lines as below:
Rob H
i = ActiveSheet.UsedRange.Rows.Count
ActiveSheet.Range("$A$1:$A$" & i).RemoveDuplicates Columns:=1, Header:= _
xlYes
Rob H
Active today
Thanks it worked. Can I extend the question just a little? After the process runs it does not have the range of only dups selected on the MM17NoDups... Is there a way to have it finish by selecting the range after the dups are removed? instead of having the total cells looked at hightlighted? -R-
Active 1 day ago
On the particular sheet, is there data in column B as well?
If not:
Range("A1").Select
CurrentRegion.Select
Should select the data in column A
Thanks
Rob
If not:
Range("A1").Select
CurrentRegion.Select
Should select the data in column A
Thanks
Rob
Active 3 days ago
to select the range once done.
ActiveSheet.Range("A:A").RemoveDuplicates 1, xlYes
Range(Range("A2"), Range("A2").End(xlDown)).Select
Featured Post
We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Question has a verified solution.
If you are experiencing a similar issue, please ask a related question
You need to know the location of the Office templates folder, so that when you create new templates, they are saved to that location, and thus are available for selection when creating new documents. The steps to find the Templates folder path are …
This article describes how you can use Custom Document Properties to store settings and other information in your workbook so that they will be available the next time you open the workbook.
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…
Finds all prime numbers in a range requested and places them in a public primes() array. I've demostrated a template size of 30 (2 * 3 * 5) but larger templates can be built such 210 (2 * 3 * 5 * 7) or 2310 (2 * 3 * 5 * 7 * 11).
The larger templa…
Suggested Courses
Course of the Month9 days, 4 hours left to enroll
604 members asked questions and received personalized solutions in the past 7 days.
Join the community of 500,000 technology professionals and ask your questions.