Dear All, Please Help..
I have just recorded a Macro & wants to do repeated steps in each columns
starting from C to BZ. I have done pasting of few raws 2 more times.. but that
will take long time to reach to last column.. do we have any shortcut or
formula or Loop command...
Range("C4").Select
Selection.Delete Shift:=xlUp
Range("C4").Select
Range(Selection, Selection.End(xlDown)).Select
ActiveSheet.Range("$D$3:$D$2028").RemoveDuplicates Columns:=1, Header:= _
xlYes"
=======================================================================
Sub ToGetCabListwithDefects()
'
' ToGetCabListwithDefects Macro
' Removes Dupplicate
'
' Keyboard Shortcut: Ctrl+Shift+R
'
Range("C4").Select
Range(Selection, Selection.End(xlDown)).Select
ActiveSheet.Range("$C$3:$C$2028").RemoveDuplicates Columns:=1, Header:= _
xlYes
Range("C4").Select
Selection.Delete Shift:=xlUp
Range("C4").Select
Range(Selection, Selection.End(xlDown)).Select
ActiveSheet.Range("$D$3:$D$2028").RemoveDuplicates Columns:=1, Header:= _
xlYes
Range("D4").Select
Selection.Delete Shift:=xlUp
Range("C4").Select
Range(Selection, Selection.End(xlDown)).Select
ActiveSheet.Range("$E$3:$E$2028").RemoveDuplicates Columns:=1, Header:= _
xlYes
Range("E4").Select
Selection.Delete Shift:=xlUp
End Sub
======================================================================
Regards,
Amit Desai - MIS Manager
M: +91 9867232534
[cid:image001.jpg@01CEE473.FE526DF0]<http://www.merucabs.com/mobile/>
[cid:image002.jpg@01CEE473.FE526DF0]<goo.gl/gHTB5E>[cid:image003.jpg@01CEE473.FE526DF0]<goo.gl/QNQP51>
________________________________
Disclaimer: This message and its attachments contain confidential information
and may also contain legally privileged information. This message is intended
solely for the named addressee. If you are not the addressee indicated in this
message (or authorized to receive for addressee), you may not copy or deliver
any part of this message or its attachments to anyone or use any part of this
message or its attachments. Rather, you should permanently delete this message
and its attachments (and all copies) from your system and kindly notify the
sender by reply e-mail. Any content of this message and its attachments that
does not relate to the official business of Meru Cab Company Pvt. Ltd. must be
taken not to have been sent or endorsed by any of them. Email communications
are not private and no warranty is made that e-mail communications are timely,
secure or free from computer virus or other defect.
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
https://www.facebook.com/discussexcel
FORUM RULES
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
NOTE : Don't ever post confidential data in a workbook. Forum owners and
members are not responsible for any loss.
---
You received this message because you are subscribed to the Google Groups "MS
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.
<<image001.jpg>>
<<image002.jpg>>
<<image003.jpg>>
