返回列表 上一主題 發帖

依日期大小自動排序

回復 8# cowww


With Sheets(2).Range("a5:j" & Cells(Rows.Count, "A").End(xlUp).Row)
        .Cells.Sort Key1:=.Cells(4), Order1:=xlAscending, Header:=xlYes
End With

因為你的資料都是公式,你可以整列反顏色去,執行F8就會知道問題在哪裡了

轉為值再執行看看,謝謝

TOP

回復 10# s3526369


   已寄出
MLD007的檔案過大
有針對我不需要的欄位做了刪除

TOP

回復 10# s3526369


    已寄出
MLD007的檔案過大
有針對我不需要的欄位做了刪除

TOP

        靜思自在 : 並非有錢魷是快樂,問心無愧心最安。
返回列表 上一主題