[爆卦]VBA 搜尋特定 文字是什麼?優點缺點精華區懶人包

為什麼這篇VBA 搜尋特定 文字鄉民發文收入到精華區:因為在VBA 搜尋特定 文字這個討論話題中,有許多相關的文章在討論,這篇最有參考價值!作者hans50316 (漢斯)看板Office標題[問題] VBA尋找特定文字並刪除文字之前的ro...



(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體:

版本:excel 2016


在A column某一格會有文字寫start,每次都不一定

舉例:某一次是在A15出現了start,然後我想要找出A15後,將前面的1-14row全部刪掉

請問這個該怎麼寫?

-----
Sent from JPTT on my iPhone

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 42.3.202.124 (香港)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1562903766.A.A1D.html
soyoso: 看要以迴圈來判斷是否為"start",或是range.find搜尋 07/12 11:56
soyoso: 再以該迴圈變數或是儲存格range.row,減1,rows("1:"&變數 07/12 11:57
soyoso: 或列號減1).delete的方式刪掉 07/12 11:58
hans50316: 不好意思,搜尋的部分會了,請問刪除列的部分具體是怎 07/12 12:26
hans50316: 麼寫的呢? 07/12 12:26
hans50316: https://i.imgur.com/O40YEDx.jpg 07/12 12:26
soyoso: 以回文變數findrow來看,為 rows("1:" & findrow.row-1). 07/12 12:29
soyoso: delete 07/12 12:29
hans50316: 原來是這樣,感謝大師! 07/12 12:31
cutekid: 可能要注意 findrow 沒有搜尋 start 時的回傳值狀況 07/12 15:39
cutekid: ^到 07/12 15:40
soyoso: 其實也不只要考慮沒有搜尋到"start",還有當搜尋到是在第 07/12 18:32
soyoso: 1列時,減1為0,也是會產生錯誤 07/12 18:33
soyoso: 判斷為is nothing,接著range.row為1時exit sub 07/12 18:34
cutekid: 瞭解,findrow is nothing or findrow = 1 -> exit sub 07/12 18:38
soyoso: 不是 07/12 18:39
soyoso: 是以二個判斷先is nothing then exit sub,接著range.row 07/12 18:39
soyoso: =1 then exit sub 07/12 18:39
cutekid: 想問一下直接用 or 會有什麼問題 07/12 18:51
soyoso: 如寫在一個判斷以條件1 or 條件2,因變數nothing 07/12 18:54
soyoso: 變數.row上會產生錯誤,而出現 沒有設定物件變數或with區 07/12 18:54
soyoso: 塊變數 的錯誤訊息 07/12 18:55
cutekid: 謝謝 s 大說明,我以為vba針對 boolean 判斷也有「短路」 07/12 19:01
cutekid: https://bit.ly/2LQHvh5 07/12 19:08

你可能也想看看

搜尋相關網站