[算表] 如何用VBA刪除指定條件
軟體:Office
版本:Excel 2010
在網路上有查詢到使用VBA刪除指定數字或文字整列的語法
但這只能用在當下使用SHEET的刪除
可假設我有50個SHEET，我就要重複做50次一樣的動作
所以想請教版上大大，該如何修改以下巨集？
然後可以變成只要按一次，所有框選的sheet都會做刪除指定行的動作呢？
(PS.要做刪除的EXCEL內的每個SHEET格式在未刪除行之前都會一樣)
謝謝!!
-------------------以下為網路搜詢到的VBA語法-----------------
Sub 刪除資料1()
Dim YY
ReKey:
YY = Application.InputBox("請輸入要刪除的準則文字或值！")
If CStr(YY) = "False" Then Exit Sub
If YY = "" Then MsgBox "〔準則文字或值〕未輸入！ ": GoTo ReKey
For i = [a65536].End(xlUp).Row To 1 Step -1
If WorksheetFunction.CountIf(Rows(i), YY) > 0 Then Rows(i).Delete
Next i
End Sub
---------------------------------------------------------------
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 180.218.148.64 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1579771784.A.1A4.html
→
01/23 17:33,
4年前
, 1F
01/23 17:33, 1F
→
01/23 17:34,
4年前
, 2F
01/23 17:34, 2F
→
01/23 17:35,
4年前
, 3F
01/23 17:35, 3F
→
01/23 17:39,
4年前
, 4F
01/23 17:39, 4F
→
01/28 09:38,
4年前
, 5F
01/28 09:38, 5F
→
01/28 09:38,
4年前
, 6F
01/28 09:38, 6F
→
01/28 09:43,
4年前
, 7F
01/28 09:43, 7F
→
01/28 09:43,
4年前
, 8F
01/28 09:43, 8F
→
01/28 09:45,
4年前
, 9F
01/28 09:45, 9F
→
01/28 09:45,
4年前
, 10F
01/28 09:45, 10F
→
01/28 09:45,
4年前
, 11F
01/28 09:45, 11F
→
01/28 09:45,
4年前
, 12F
01/28 09:45, 12F
→
01/28 09:45,
4年前
, 13F
01/28 09:45, 13F
→
02/01 22:49,
4年前
, 14F
02/01 22:49, 14F