※ 引述《ClubT (風)》之銘言：
: ※ 引述《kazumi6533 (patrick)》之銘言：
: : 請問一下
: : 如果我有一張worksheet,裡面某cell有類似
: : aaaBBBBccc之類的字串...因為是從網路上download data下來
: : 以BBBB為ID...其餘則是不變
: : 我想要寫一個程式判斷如果Cell中有BBBB則改為其他(從陣列中讀取的ID)
: : 這樣要怎麼寫呢?
: : 例如把所有的aaaBBBBccc改為aaaDDDDccc
: : 謝謝
: 若是要找字串有沒有BBBB
: 假設該自串是 str1
: InInStr(str1, "BBBB")若是等於0則沒有
: 大於0則為第幾個位置
: 取代字串
: Replace(str1, "BBBB", "DDDD")
: 這樣應該就OK了吧
謝謝...這樣ok了....不過我現在又遇到了一個問題
我現在寫了一支程式...主要流程大概是
1.覆製一個原始sheet到一個新檔案
2.修改sheet中每一個字串中包含AAAA的為BBBB...
3.關閉這個新檔案
4.重覆這個流程1000次...將每一個AAAA改為我取代的字串
做這個動作的原因是因為我要從網路上下載外部資料
每一個取代的字串其實是下載公式字串的一部份，下載的資料根據
這個字串為參數。可是問題是因為我每一個sheet要下載的資料很多
所以不是一改完就能更新完畢，通常必需等個五到十分鐘所有的cells才
能更新完。於是我異想天開的在關閉檔案前用timer等了一段固定的時間
，不過後來我發現在這一段等待的時間(即是VBA還再跑的時候)，似乎cells
裡面的公式都沒有在更新，是不是更新要等到VBA結束才會開始
請問有直接強制更新的方法嗎？可以讓我在改完字串後直接更新，在完成更
新（可以用程式判斷知道嗎？）後關掉這個檔案？我試過.calculate和
workbook.refreshall似乎都沒有這樣的結果？
另外當我開啟一個有讀取外部資料的excel檔，系統會出現是否要更新的對話
方塊，我要怎麼樣用VBA使他不出現但是選取要更新？
用displayalert=false似乎只是直接不出現而已？
這個問題困擾我好久，因為我有超過一千筆以上要改，似乎也不能為了不關掉檔案
而在同一個檔案內新增一千個活頁讓他慢慢更新...orz..
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.112.35.29