Dear Bé Trần Văn

Thanks very much for this & noe it open in excel 2003 version also work it.

But small issue that VBA code would be copy & paste in sheet module
for each column & change column numbers in code & attached button that
code every time.IF there are more than 30 cloumn then 30 times VBA
code copy & paste in sheet module for each column change Column
numbers.Thats issue only

Regards
Amar



On Wed, Jul 2, 2014 at 11:49 PM, Bé Trần Văn <betnmtdongna...@gmail.com> wrote:
> File Revisions
>
>
> 2014-07-02 17:51 GMT+07:00 amar takale <amartak...@gmail.com>:
>
>> Dear Latiji
>>
>> PFA Sheet which not working in excel 2003  version & it working excel
>> 2007 but data sort asc & dec show  wrong.
>> Pls see it
>> Regards
>> Amar
>>
>> On Wed, Jul 2, 2014 at 8:12 AM, Lalit Mohan Pandey
>> <mohan.pande...@gmail.com> wrote:
>> > Share your workbook in which you are applying this method and let me
>> > check
>> > why it is not working.
>> >
>> >
>> > On Tuesday, 1 July 2014 11:05:27 UTC+5:30, amar takale wrote:
>> >>
>> >> Dear lalitji
>> >> code not working
>> >>
>> >> On Tue, Jul 1, 2014 at 8:00 AM, Lalit Mohan Pandey
>> >> <mohan.p...@gmail.com> wrote:
>> >> > I have checked it and it is working fine but give a try to this code:
>> >> >
>> >> > Sub SECEPSDES()
>> >> >
>> >> >     With ThisWorkbook.Worksheets("Sector Valn")
>> >> >         .Sort.SortFields.Clear
>> >> >         .Range("A6:U21").Sort Key1:=.Range("E7:E21"),
>> >> > Order1:=xlDescending,
>> >> > Header:=xlYes
>> >> >     End With
>> >> >
>> >> > End Sub
>> >> >
>> >> > Sub SECEPSASC()
>> >> >
>> >> >     With ThisWorkbook.Worksheets("Sector Valn")
>> >> >         .Sort.SortFields.Clear
>> >> >         .Range("A6:U21").Sort Key1:=.Range("E7:E21"),
>> >> > Order1:=xlAscending,
>> >> > Header:=xlYes
>> >> >     End With
>> >> >
>> >> > End Sub
>> >> >
>> >> > On Monday, 30 June 2014 10:19:08 UTC+5:30, amar takale wrote:
>> >> >>
>> >> >> Dear latit mohan,
>> >> >> when i use above code which you provide show error "object does not
>> >> >> support this property or method" in excel.Pls give me proper
>> >> >> guidance
>> >> >> Regards
>> >> >> Amar
>> >> >>
>> >> >> On Mon, Jun 30, 2014 at 10:17 AM, amar takale <amart...@gmail.com>
>> >> >> wrote:
>> >> >> > Dear Bé Trần Văn
>> >> >> >
>> >> >> > Thanks very much sir......... but i ask you small issue can we use
>> >> >> > one
>> >> >> > code to all filed like lalit mohanji code.I use this code but
>> >> >> > erroe
>> >> >> > show "object does not support this property or method"
>> >> >> >
>> >> >> > Thanks once again
>> >> >> >
>> >> >> > Regards
>> >> >> > Amar
>> >> >> >
>> >> >> >
>> >> >> >
>> >> >> > On Sat, Jun 28, 2014 at 3:34 PM, Bé Trần Văn
>> >> >> > <betnmtd...@gmail.com>
>> >> >> > wrote:
>> >> >> >> Sort data, row 7:2000
>> >> >> >>
>> >> >> >>
>> >> >> >> 2014-06-28 2:55 GMT+07:00 Lalit Mohan Pandey
>> >> >> >> <mohan.p...@gmail.com>:
>> >> >> >>>
>> >> >> >>> Yes it will work in excel 2003 and above
>> >> >> >>>
>> >> >> >>>
>> >> >> >>> On Friday, 27 June 2014 15:31:54 UTC+5:30, amar takale wrote:
>> >> >> >>>>
>> >> >> >>>> Dear Lalit Mohan
>> >> >> >>>>
>> >> >> >>>> Then it code not work in excel 2003?
>> >> >> >>>>
>> >> >> >>>> On Fri, Jun 27, 2014 at 3:24 PM, Lalit Mohan Pandey
>> >> >> >>>> <mohan.p...@gmail.com> wrote:
>> >> >> >>>> > change your code as i have changed it:
>> >> >> >>>> >
>> >> >> >>>> > Sub SECEPSDES()
>> >> >> >>>> >
>> >> >> >>>> >     With ActiveWorkbook.Worksheets("Sector Valn")
>> >> >> >>>> >         .Sort.SortFields.Clear
>> >> >> >>>> >         .Range("A6:U21").Sort Key1:=.Range("E7:E21"),
>> >> >> >>>> > Order1:=xlDescending,
>> >> >> >>>> > Header:=xlYes
>> >> >> >>>> >     End With
>> >> >> >>>> >
>> >> >> >>>> > End Sub
>> >> >> >>>> >
>> >> >> >>>> > Sub SECEPSASC()
>> >> >> >>>> >
>> >> >> >>>> >     With ActiveWorkbook.Worksheets("Sector Valn")
>> >> >> >>>> >         .Sort.SortFields.Clear
>> >> >> >>>> >         .Range("A6:U21").Sort Key1:=.Range("E7:E21"),
>> >> >> >>>> > Order1:=xlAscending,
>> >> >> >>>> > Header:=xlYes
>> >> >> >>>> >     End With
>> >> >> >>>> >
>> >> >> >>>> > End Sub
>> >> >> >>>> >
>> >> >> >>>> > Do changes for other procedure this is excel 2003 sorting
>> >> >> >>>> > method
>> >> >> >>>> > which
>> >> >> >>>> > is
>> >> >> >>>> > supported by any version above 2003 but what you are using in
>> >> >> >>>> > your
>> >> >> >>>> > code
>> >> >> >>>> > is
>> >> >> >>>> > 2007 data sorting method which is not supported by 2003 :)
>> >> >> >>>> >
>> >> >> >>>> > Hope you understand
>> >> >> >>>> >
>> >> >> >>>> > On Friday, 27 June 2014 10:56:51 UTC+5:30, amar takale wrote:
>> >> >> >>>> >>
>> >> >> >>>> >> Dear all
>> >> >> >>>> >>
>> >> >> >>>> >> pls help me on this topic.
>> >> >> >>>> >>
>> >> >> >>>> >> regards
>> >> >> >>>> >> amar
>> >> >> >>>> >>
>> >> >> >>>> >> On Thu, Jun 26, 2014 at 1:21 PM, amar takale
>> >> >> >>>> >> <amart...@gmail.com>
>> >> >> >>>> >> wrote:
>> >> >> >>>> >> > Dear Experts
>> >> >> >>>> >> >
>> >> >> >>>> >> > I have below attached excel which open in excel 2007 then
>> >> >> >>>> >> > sort
>> >> >> >>>> >> > VBA
>> >> >> >>>> >> > code work perfect but when it open in excel 2003 then show
>> >> >> >>>> >> > error.So
>> >> >> >>>> >> > pls guide me about it error & work also open it in excel
>> >> >> >>>> >> > 2003.
>> >> >> >>>> >> > I use Excel 2003 So I want this file work in excel 2003 So
>> >> >> >>>> >> > I
>> >> >> >>>> >> > continue
>> >> >> >>>> >> > use it with range change only in code
>> >> >> >>>> >> >
>> >> >> >>>> >> > Thanks
>> >> >> >>>> >> >
>> >> >> >>>> >> > Regards
>> >> >> >>>> >> > Amar
>> >> >> >>>> >> >
>> >> >> >>>> >> > --
>> >> >> >>>> >> > 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...@googlegroups.com.
>> >> >> >>>> >> > To post to this group, send email to
>> >> >> >>>> >> > excel-...@googlegroups.com.
>> >> >> >>>> >> > Visit this group at
>> >> >> >>>> >> > http://groups.google.com/group/excel-macros.
>> >> >> >>>> >> > For more options, visit
>> >> >> >>>> >> > https://groups.google.com/d/optout.
>> >> >> >>>> >
>> >> >> >>>> > --
>> >> >> >>>> > 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...@googlegroups.com.
>> >> >> >>>> > To post to this group, send email to
>> >> >> >>>> > excel-...@googlegroups.com.
>> >> >> >>>> > Visit this group at
>> >> >> >>>> > http://groups.google.com/group/excel-macros.
>> >> >> >>>> > For more options, visit https://groups.google.com/d/optout.
>> >> >> >>>
>> >> >> >>> --
>> >> >> >>> 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...@googlegroups.com.
>> >> >> >>> To post to this group, send email to excel-...@googlegroups.com.
>> >> >> >>> Visit this group at http://groups.google.com/group/excel-macros.
>> >> >> >>> For more options, visit https://groups.google.com/d/optout.
>> >> >> >>
>> >> >> >>
>> >> >> >> --
>> >> >> >> 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...@googlegroups.com.
>> >> >> >> To post to this group, send email to excel-...@googlegroups.com.
>> >> >> >> Visit this group at http://groups.google.com/group/excel-macros.
>> >> >> >> For more options, visit https://groups.google.com/d/optout.
>> >> >
>> >> > --
>> >> > 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...@googlegroups.com.
>> >> > To post to this group, send email to excel-...@googlegroups.com.
>> >> > Visit this group at http://groups.google.com/group/excel-macros.
>> >> > For more options, visit https://groups.google.com/d/optout.
>> >
>> > --
>> > 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/d/optout.
>>
>> --
>> 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/d/optout.
>
>
> --
> 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/d/optout.

-- 
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/d/optout.

Reply via email to