[發問] 比對不同工作表的儲存格以及刪除內容

請問各位前輩，如果有十六張工作表，

工作表1 總共有15行的值
A B C
1 13 9 YY
2 CC 44 XX
3 77 99 33
4 2A PP 89
....................................
我想在工作表2 到16都設定一個按鈕來執行VBA，
假設工作表2 儲存格A1的值是 CC，在工作表2按下按鈕則搜尋工作表1 A欄儲存格CC這個值在第二行，然後刪除工作表1第二行 A1到A3的內容
假設工作表3 儲存格A1的值是 2A，在工作表3按下按鈕則搜尋工作表1 A欄儲存格CC這個值在第四行，然後刪除工作表1第四行 A1到A3的內容
其餘工作表按鈕功能都以此類推
請問能否讓這十五個工作表的按鈕共用同一個VBA?懇請指教，感謝

樓主熱帖

netfish777

中學生 Rank: 2

帖子: 22
主題: 4
精華: 0
積分: 68
點名: 0
作業系統: win7
軟體版本: 2013
閱讀權限: 20
註冊時間: 2018-2-12
最後登錄: 2021-10-8

2^#

發表於 2018-10-4 17:10 | 顯示全部帖子

回復 2# n7822123

啊是的說明我打錯了，很抱歉
就是您所修改的內容才對，感謝

TOP

netfish777

中學生 Rank: 2

帖子: 22
主題: 4
精華: 0
積分: 68
點名: 0
作業系統: win7
軟體版本: 2013
閱讀權限: 20
註冊時間: 2018-2-12
最後登錄: 2021-10-8

3^#

發表於 2018-10-5 19:21 | 顯示全部帖子

回復 4# n7822123
因為我剛學VBA，想寫個紀錄股票股利的EXCEL，寫了一半但是還沒寫完全出來@@
工作表1是定存股總明細，A欄十五格記錄著十五種股票代碼
工作表2到16則一個工作表紀錄一種股票的買賣以及股利明細
工作表2的A1股票代碼就是工作表1的A1，工作表3的A1股票代碼就是工作表1的A2，以此類推
假設我把工作表2的股票全部出清，只要按個按鈕就可自動清除工作表2該股票的買賣資料以及工作表1 A1 B1 C1三格股價資訊

您的問題

1.如果第一工作表D欄以後還有資料，D欄以後的資料都保留，只刪除A,B,C 三欄的資料
還是一併刪除?

只需刪除ABC三蘭的資料，D蘭以後只有版框圖案不可刪除

2.你舉的兩個例子都在工作表1的A欄，是不是B欄與C欄不再比對範圍?

只有比對A欄，也就是股票代碼，其他欄都不用比對

TOP

netfish777

中學生 Rank: 2

帖子: 22
主題: 4
精華: 0
積分: 68
點名: 0
作業系統: win7
軟體版本: 2013
閱讀權限: 20
註冊時間: 2018-2-12
最後登錄: 2021-10-8

4^#

發表於 2018-10-5 21:40 | 顯示全部帖子

本帖最後由 netfish777 於 2018-10-5 21:43 編輯

回復 4# n7822123

我剛剛把檔案大致完成了，這是我利用網路高手分享的加以拼裝修改，麻煩請前輩看一下
工作表1 的 C1 是股票代碼是自動抓取 "一覽表" 的 C5 ，工作表2 的 C1 則是抓取一覽表的 C6 ，以此類推
每個工作表都有個情除按鈕，假設我按工作表1 的清除紐，
希望能用 C1 的股票代碼去找出 "一覽表" 這支股票是在哪一行，然後把該行 C5到N5 的內容清除而不移動任何儲存格
請問能不能十五個工作表的清除紐都能共用一個VBA程式
懇請指教，感謝