作者wugo (想不出來...)
看板WuGu-BaLi
標題Fw: [問題] 關於EXCEL VBA找到特定字串
時間Mon Oct 17 11:32:04 2016
※ [本文轉錄自 Office 看板 #1N_nT4i8 ]
作者: hotblood999 (衝啊LUCKYBALL) 看板: Office
標題: [問題] 關於EXCEL VBA找到特定字串
時間: Thu Oct 13 13:10:25 2016
(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體:
OFFICE EXCEL
版本:
2013
各位版上先進前輩們好，
由於是VBA初學者，
希望能請教以下問題，
也希望能用比較詳細粗淺的方式講解，
先在此和各位強者說聲感謝！！
如果現在是如下表格：
A B C D
1 小明 56 57 小明58 59曉華46 47曉君35 36
2 曉華 44 45
3 小君 31 32
當她偵測到D1，
於是將B1 C1修改為58 59
將B2 C2修改為46 47以此類推，
改完以後自動回到D2，
也就是說如果B、C欄位出現變動則會跑到D欄位最後一列的下一列，
當D2出現小明54 55時則更改B1 C1然後跑到D3，以此類推。
請問有什麼比較理想的方式呢?
謝謝!！
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 180.177.35.66
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Office/M.1476335428.A.B08.html
1F：→ soyoso: 如為儲存格資料變更觸發事件，可用worksheet_change 10/13 13:50
2F：→ soyoso: 上述請以intersect或target.column、target.row來限縮觸發 10/13 13:53
3F：→ soyoso: 範圍；要到d欄最後一列可用range.end，偏移下一列用offset 10/13 13:53
4F：→ soyoso: 要以D欄所鍵入資料來尋找儲存格或列號，可用range.find 10/13 13:55
5F：→ soyoso: 或用worksheetfunction.match 10/13 13:56
6F：→ soyoso: 上述有可能搜尋不到的話，請加上判斷(if)，排除 10/13 13:56
7F：→ waiter337: 推so大0,0, range.find 搭配if 真的超好用 10/13 14:08
8F：→ waiter337: 如果要找最後一行 z 10/13 14:51
9F：→ waiter337: z > 2 > 16 > 8 10/13 14:51
※ 發信站: 批踢踢實業坊(ptt.cc)
※ 轉錄者: wugo (40.128.15.162), 10/17/2016 11:32:04