- 帖子
- 835
- 主題
- 6
- 精華
- 0
- 積分
- 915
- 點名
- 0
- 作業系統
- Win 10,7
- 軟體版本
- 2019,2013,2003
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2010-5-3
- 最後登錄
- 2024-11-14
|
本帖最後由 luhpro 於 2011-4-30 05:03 編輯
你看看底下這樣的方式符合你的需求嗎?
先設定兩個陣列(假設是 字串陣列 sC()包含 "中部", "借貸", "", "林二"... 與 數值陣列 iD() 包含 0, 0, 4, 11, ...)
或是使用 Dictionary 每個單位都兩個資料, 例如 "中部" 與 0, "借貸" 與 0, ...
with A
bFind = False
For iI = 1 To 7
If A.Offset(, iD(iI)) = sC(iI) Then bFind = True
Next iI
If bFind = True Then
....
End If
如果 Or 的條件有一大堆時, 程式會比較容易判讀又不容易打錯字. |
|
發表於 2011-4-30 05:01
| 