返回列表 上一主題 發帖

[發問] 如何正確宣告,避免強制轉型時降低速度

PKKO
　暱稱: PKKO

高中生Rank: 3Rank: 3

帖子
549 
主題
152 
精華
0 
積分
691 
點名
0  
作業系統
WIN7 
軟體版本
OFFICE 2010 
閱讀權限
50 
性別
男 
註冊時間
2013-8-10 
最後登錄
2022-9-7 

論壇榮譽勳章論壇贊助勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2015-5-29 10:01 | 顯示全部帖子

[發問] 如何正確宣告,避免強制轉型時降低速度

本帖最後由 PKKO 於 2015-5-29 10:02 編輯

EX :
  1. For j = 1 To UBound(Rng4, 2)
  2.     '找出陣列的C
  3.      If CStr(RNG(1, i)) = CStr(RNG2(1, j)) Then
  4.          c = j
  5.          Exit For
  6.      End If
  7. Next
複製代碼
這是原本的作法
比較的時候要兩邊同時轉型成字串,筆免因型別不同而沒有正確比對
但這樣似乎比較慢

有甚麼方式可以在一開始就讓rng這個陣列的內容都限制為字串呢?
可是陣列來源是來自於 Rng=[a1].currentregion
收藏 分享
PKKO

PKKO
　暱稱: PKKO

高中生Rank: 3Rank: 3

帖子
549 
主題
152 
精華
0 
積分
691 
點名
0  
作業系統
WIN7 
軟體版本
OFFICE 2010 
閱讀權限
50 
性別
男 
註冊時間
2013-8-10 
最後登錄
2022-9-7 

論壇榮譽勳章論壇贊助勳章
2#
發表於 2015-5-29 14:12 | 顯示全部帖子
回復 2# GBKEE

感謝超版大大的回覆

但我想問的是這個部分,要如何能這樣宣告?
    Dim Ar() As String, Ar1() As String, i, ii
    Ar1() = [a1].CurrentRegion'這行會錯誤
PKKO

TOP

PKKO
　暱稱: PKKO

高中生Rank: 3Rank: 3

帖子
549 
主題
152 
精華
0 
積分
691 
點名
0  
作業系統
WIN7 
軟體版本
OFFICE 2010 
閱讀權限
50 
性別
男 
註冊時間
2013-8-10 
最後登錄
2022-9-7 

論壇榮譽勳章論壇贊助勳章
3#
發表於 2015-5-29 16:11 | 顯示全部帖子
回復 4# bobomi


    感謝!
PKKO

TOP

        靜思自在 : 受人點水之恩，須當湧泉以報。
返回列表 上一主題