介绍两种方法：（假设：门牌号在A列）
第一种，手动， 点A列，点工具栏“数据……排序……确定”。这种方法，必须每次输入数据后都要操作一次。
第二种，自动（用VBA代码），右键下面的表格名（如：Sheet1……等），将以下代码复制粘贴到VBA代码编辑框中，关闭VBA编辑框。这种方法，只要次输入完数据后，双击任意单元格，就会自动排序。
代码如下：、
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Columns("A:A").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal
End Sub
温馨提示：答案为网友推荐，仅供参考