帖子: 248
主題: 55
精華: 0
積分: 314
點名: 83
作業系統: XP / WIN7
軟體版本: 2003 / 2007
閱讀權限: 20
性別: 男
來自: Tainan
註冊時間: 2013-10-18
最後登錄: 2024-4-23

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章論壇贊助勳章 2014馬年全勤獎章 2015羊年全勤獎章熱烈參與勳章

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2019-2-15 09:23 | 顯示全部帖子

[發問] 不同Sheet欄位資料同步移除

我有兩張工作表(Sheet1、Sheet2)

我想要在Sheet1刪除整欄的時候

Sheet2也把該欄刪除

目前是想到用Private Sub Worksheet_Change(ByVal Target As Range)來判斷Target.Row

可是USER如果在Sheet1一次刪除多欄(選ROW1~ROW3後刪除) Target.Row只會抓到ROW1

這樣我沒辦法告訴Sheet2也需要刪除ROW2~ROW3

註:
1. USER的刪除行為會是整欄刪除，不會只刪除某個CELL
2. Sheet1&Sheet2欄位對應，但資料不完全相同
3. Sheet1&Sheet2不須判斷資料內容，只要Sheet1刪除，Sheet2也跟著刪除對應的ROW即可

再請各位指教

謝謝 !

RemoveSheetData.zip (3.97 KB)

樓主熱帖

用功到世界末日那一天～～～

li_hsien

中學生 Rank: 2

帖子: 248
主題: 55
精華: 0
積分: 314
點名: 83
作業系統: XP / WIN7
軟體版本: 2003 / 2007
閱讀權限: 20
性別: 男
來自: Tainan
註冊時間: 2013-10-18
最後登錄: 2024-4-23

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章論壇贊助勳章 2014馬年全勤獎章 2015羊年全勤獎章熱烈參與勳章

2^#

發表於 2019-2-15 10:17 | 顯示全部帖子

回復 2# 准提部林

我用change想說Sheet1跟Sheet2的總欄位來比
(可能用=COUNTA(A:A)來算)

如果Sheet1比Sheet2的欄位少就是USER有刪除

那我就抓Target.row來刪Sheet2的欄位
(可是現在刪多欄Target.row抓不到)

目前希望讓USER直覺的方式來直接刪除

不用再點選按鈕來觸發條件

還是您有建議的按鈕操作方式

再請指教

謝謝

用功到世界末日那一天～～～

TOP

li_hsien

中學生 Rank: 2

帖子: 248
主題: 55
精華: 0
積分: 314
點名: 83
作業系統: XP / WIN7
軟體版本: 2003 / 2007
閱讀權限: 20
性別: 男
來自: Tainan
註冊時間: 2013-10-18
最後登錄: 2024-4-23

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章論壇贊助勳章 2014馬年全勤獎章 2015羊年全勤獎章熱烈參與勳章

3^#

發表於 2019-2-15 14:40 | 顯示全部帖子

回復 4# 准提部林

感謝准提部林提醒

筆誤... 應是刪除"列" !

方法可行

超神 !!!

註解詳盡

而且還有檢測機制

感謝版主協助 !

學習了 !

用功到世界末日那一天～～～

TOP