[算表] 請教一個篩選的問題

[yyingx (bless)]

軟體:office

版本:2007

A列
2000
1000
2000A
1000A

當處于篩選模式,輸入2000,2000和2000A都被篩選出來,請問該如何操作?
我自己試了一下把A列全部轉換成文本格式,但是沒有成功.
如何把A列變成文本,如何給單元格是數字,左上角會帶綠標那種

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 27.38.52.136
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1433056047.A.9FC.html
※ 編輯: yyingx (27.38.52.136), 05/31/2015 16:41:19
→ soyoso: https://goo.gl/zunVJS 開始於2000 或 等於2000
→ yyingx: 篩選不了,我想把數字變成左上角帶綠標那種文本格式
→ yyingx: 請問如何寫個代碼呢,就是A列所用單元格加上"'"
→ soyoso: 代碼是指？巨集嗎？
→ soyoso: 另外原po提到篩選不了，如連結內的圖片，就是用開始於2000
→ soyoso: 或 等於2000，而篩選出2000和2000A
→ yyingx: 是的,寫一個轉換巨集,簡單的講我在A列單元格都加上"'"
→ soyoso: 迴圈for..next,for each...next配合連結符號&來合併
So大請看回圈,感覺太慢了,有啥好的方法和建議嗎?
Sub 轉換文本()
Dim i As Integer
a = [e65536].End(3).Row
Range("e4", Range("e" & a)).NumberFormat = "@"
For i = 4 To a
Range("e" & i) = Format(Range("e" & i), "0")
Next
End Sub
※ 編輯: yyingx (27.38.52.136), 05/31/2015 17:35:36
→ yyingx: 我想縮小范圍,就是當El列是數字就這樣轉換,非數字就不用了
→ yyingx: 因為E列數字畢竟占小部分,這樣巨集運行起來會不會快些
→ soyoso: range.specialcells有常數(數字)，可以縮小範圍