- 帖子
- 163
- 主題
- 1
- 精華
- 0
- 積分
- 170
- 點名
- 0
- 作業系統
- Window 7
- 軟體版本
- Office 2007
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-9-5
- 最後登錄
- 2022-7-20
|
回復 1# v03586
將
If .Cells(i, "A") Like "*AAA*" Then
改為
If InStr(.Cells(i, "A").Value, "AAA") = 0 Then
用InStr函數,可做為字串比對的判斷:
若判斷式等於0表示沒有符合資料,反之(<>0)則表示有符合的資料
InStr函數的使用法請參照VBA的官方說明 |
|