#1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 25
Default Ascending

Dear All
I have sorted (ascending order)following numbers.
1
2
4
5
if i enter 3 below 5, is there any way to bring automatically 3 below 2
(ascending order)
thanks

  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 698
Default Ascending

Perhaps something like this in the sheet module will do what you want. From
the macro recorder with a small modification to relate it to column 1 only.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 1 Then Exit Sub
Columns("A:A").Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess,
_
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range("A1").Select
End Sub

HTH
Regards,
Howard

"Fareez" wrote in message
...
Dear All
I have sorted (ascending order)following numbers.
1
2
4
5
if i enter 3 below 5, is there any way to bring automatically 3 below 2
(ascending order)
thanks



  #3   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 506
Default Ascending

If you want to do it in the same cell then you have to go for a Macro
Solution, if you would like to use a helper column to do it, then use the
below method.

Assume that you are having the below Numbers in A Column

A Col
1
2
6
7
3
4
22
21

Paste this formula in B1 cell
=IF(ISERROR(SMALL(A:A,ROW(A1))),"END OF RESULT",SMALL(A:A,ROW(A1)))

Now copy the B1 cell formula and paste it to the remaining cells of B Column
Based on the A Column Data.

If you dont want to show the Cell as Blank instead of the End of Result
Message use the below one.
=IF(ISERROR(SMALL(A:A,ROW(A1))),"",SMALL(A:A,ROW(A 1)))

Remember to Click Yes, if this post helps!

--------------------
(Ms-Exl-Learner)
--------------------


"Fareez" wrote:

Dear All
I have sorted (ascending order)following numbers.
1
2
4
5
if i enter 3 below 5, is there any way to bring automatically 3 below 2
(ascending order)
thanks

  #4   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 22,906
Default Ascending

I do not recommend auto-sorting upon entry.

Once your list gets longer, it is very difficult to find and fix any data
entry mistakes.

I like to confirm first that correct data has been entered then do the sort.


Gord Dibben MS Excel MVP

On Mon, 7 Dec 2009 23:21:01 -0800, Fareez
wrote:

Dear All
I have sorted (ascending order)following numbers.
1
2
4
5
if i enter 3 below 5, is there any way to bring automatically 3 below 2
(ascending order)
thanks


Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Sort Ascending after filter. Kenny Excel Discussion (Misc queries) 3 October 11th 07 02:21 PM
Data ascending and decending Linda Excel Discussion (Misc queries) 3 March 16th 07 12:14 AM
ascending sorting fofomama Excel Worksheet Functions 4 August 14th 06 03:41 PM
Digits in ascending order ? toyota58 Excel Worksheet Functions 2 February 3rd 06 06:47 PM
sort ascending tab is not active. Why? jeremy corke Excel Worksheet Functions 2 July 10th 05 12:00 AM


All times are GMT +1. The time now is 03:41 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"