麻辣家族討論版版 » Excel程式區 » ＩＦ　多條件判斷如何改為陣列執行｜

返回列表下一主題上一主題發帖

[發問] ＩＦ　多條件判斷如何改為陣列執行｜

　暱稱: 豪

高中生 Rank: 3 Rank: 3

帖子: 471
主題: 121
精華: 0
積分: 579
點名: 0
作業系統: WIN10
軟體版本: OFFICE2019
閱讀權限: 50
性別: 男
註冊時間: 2015-4-16
最後登錄: 2023-1-17

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2015-10-12 09:19 | 顯示全部帖子

[發問] ＩＦ　多條件判斷如何改為陣列執行｜

本帖最後由 starry1314 於 2015-10-12 09:33 編輯

功能：Ｄ欄內　不為【Ｌ。Ｐ。Ｔ。Ｑ。Ｉ】一律取代為Ａ
請問如何改為以陣列模式執行呢？　因就算關閉螢幕刷新與自動計算，還是有點慢

Sub 代號替換()
For I = 2 To 50000
Ν = Range("d" & I)
If Ν <> "L" And Ν <> "P" And Ν <> "T" And Ν <> "Q" And Ν <> "I" Then
Range("D" & I) = "A"
End If
Next
End Sub

複製代碼

樓主熱帖

收藏

　暱稱: 豪

高中生 Rank: 3 Rank: 3

帖子: 471
主題: 121
精華: 0
積分: 579
點名: 0
作業系統: WIN10
軟體版本: OFFICE2019
閱讀權限: 50
性別: 男
註冊時間: 2015-4-16
最後登錄: 2023-1-17

2^#

發表於 2015-10-13 13:09 | 顯示全部帖子

回復 4# 准提部林

謝謝版大來詳細了解下 InStr

　暱稱: 豪

高中生 Rank: 3 Rank: 3

帖子: 471
主題: 121
精華: 0
積分: 579
點名: 0
作業系統: WIN10
軟體版本: OFFICE2019
閱讀權限: 50
性別: 男
註冊時間: 2015-4-16
最後登錄: 2023-1-17

3^#

發表於 2015-10-13 13:10 | 顯示全部帖子

回復 3# lpk187
謝謝~是的來試試看

靜思自在 : 【時間如鑽石】時間對一個有智慧的人而言，就如鑽石般珍貴；但對愚人來說，卻像是一把泥土，一點價值也沒有。

返回列表下一主題上一主題