Excel.Range.Find使用長度超過255個字符的字符串

Question

我在Excel中存儲每個字符數爲1023的字符。稍後，我需要能夠搜索excel文件並查找值所在的行。我可以保證，我正在查找的字符串中只有一處出現在工作簿中的某處。

目前我得到每次我嘗試搜索（由於255的查找功能長度限制）時間類型不匹配錯誤。當我用像「teststring」這樣簡短的東西替換我的搜索字符串時，它工作正常。我如何在Excel中搜索1023個字符的字符串？

Answer 1

http://www.vbaexpress.com/forum/archive/index.php/t-9179.html

總之，如果您的所有字符串都爲前255個字符獨一無二的，你不必擔心休息。

你只需要你在其上執行前發現截斷字串：

missingItem = Left(missingItem,255) 

或者：

missingItem = Right (missingItem,255) 

否則，如果有前255個字符的很多重複，你可以將字符串除以255 - 然後舍入 - 然後將原始字符串拆分爲單獨的字符串，單獨搜索它們 - 對您有幫助嗎？

編輯：

Otherise，這裏是你如何檢查字符串等價於一個範圍內的每個單元格： http://www.vbaexpress.com/kb/getarticle.php?kb_id=167

Sub FindIt() 
    Dim Cell As Range 
    Dim SearchString As String 
    For Each Cell In Range("A1:D500") 
     If Cell.Value = "dqwlokjdowqijowqijdoinowiqhdoiwqiophiruegnqpiunrgpiuqgnrgkjffndskfiougpiodghiudhfgtothisansdfldkjflsdffjlksdjflksjfdoiejwfoiwjeoinfoinewoifjwoiejfoiwejfoiwejfoijjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjwerkjwelkfjwelkjflkwejlfkjwelkjflwkjeflknweoifnoweinfoinewfoinoifwnwoienfoinweoddddddddddddddddddddddddddddddddddddddddfinwoioiefldkjsfoijoneiojfoijfewwefweeeeeeeeeeeefwef" Then '<< use "Like" for wildcards in If-Then statements 
      MsgBox "An ''it'' was found at " & Cell.Address & " (" & Cell & ")" 
     End If 
    Next Cell 
End Sub 

是的，我也假裝類型作爲我老闆走過的重要事情。我不認爲他被愚弄 - 因爲我只是把它弄糊塗在我的鍵盤上。