- 帖子
- 8
- 主題
- 3
- 精華
- 0
- 積分
- 50
- 點名
- 0
- 作業系統
- Windows 7
- 軟體版本
- Office 2013
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2017-6-6
- 最後登錄
- 2018-8-27
|
2#
發表於 2017-8-11 20:52
| 只看該作者
研究很久, 用regular expresion似乎無法達到全面的功能(應是自己太弱了), 最後用以下方法達成。
1. 把要處理的欄位設定為字串格式 .Column("A").NumberFormatLocal = "@"
2. 清句子的頭尾空白後, 再用空白拆字 Split(Trim(sSentence(i)), " ")
3. 對所有的字組用 Replace(sTempWord(j), "特殊字元", "") 疊代清掉
這樣終於能定位出像a-doting, advis’d, all-the-world, aren’t
但還是有個無解的問題
以 ' 開頭的字會被視為字串的前引符號.....(Excel的宿命嗎?) |
|