[算表] VBA 選取一列中含特定字元最末資料

[joshjetly ( )]

軟體: Excel VBA

版本: 2010


各位先進大家好

在下是 VBA  新手

有批好幾頁

每頁接近萬列的資料要整理

每列約有 50~100 個儲存格

資料大致如下


    A   B   C  |   D   E   F   G   H   I   J   K   L   M
               |
1  [7] (5)  1  |  [3] (4) 13  [2] (2)  7  40  [7] (5)  1
               |
2  [2] (4)  9  |  [9] (6)  4  [2] (4)  8   5  16   9
               |
3  [6] (3) 20  |  [6] (5)  1  (8)  3   2   1  (3) 29  20
               |

在下希望可以在

A 欄：找出同列中最後筆包含 "["  的文字

B 欄：找出同列中最後筆包含 "("  的文字

C 欄：找出同列中最後筆數字

請問該如何用 VBA Function 處理呢？

麻煩各為先進了

感激不盡！

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 42.67.5.101
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1504430247.A.5A6.html
→ soyoso: 迴圈於範圍，instr判斷儲存格內包含"["或"("，大於0時回傳
→ soyoso: 該儲存格文字，後離開迴圈exit
→ soyoso: 數字方面如該欄都為數字，而要找出最後一筆有值的話，可以
→ soyoso: range.end或range.end.row
→ soyoso: 如該欄不一定都為數字，可以isnumeric，但因()有可能也會
→ soyoso: 被判斷為數字，可配合instr為0排除；另也可以vartype或
→ soyoso: typename(range.value)
→ soyoso: 迴圈部分則是以反序step負值的方式
→ joshjetly: 感謝so大，在下先依法試試，有問題再請教