国产一区二区欧美精品免费-欧美国产日韩在线视频-欧美亚洲国语精品一区二区-欧美激情五月综合啪啪-国产69精品麻豆久久久久-亚洲人成精品久久久久桥网站-欧美刺激肥熟在线视频-十七岁日本免费完整版BD-黑夜在线拖拽不卡第一页

`
閱： 4749 | 回： 3
一鍵取消工作薄篩選 全部 , 編號:0703 快速回復(fù)
發(fā)表于2016/4/13 22:44:35 樓主 
頭像 等級:初學(xué)者
積分:8
財(cái)富值:2.20
身份:普通用戶
各位好：
             由于本人工作需要，平時要在多個工作薄中查找需要的內(nèi)容，但是工作薄都是同事傳給我的，他們慣于篩選出當(dāng)日內(nèi)容后保存，但我需要查找以往日期內(nèi)容，篩選后就未體現(xiàn)內(nèi)容就查找不到，請各位大神幫忙寫段代碼可以一鍵去除當(dāng)前工作薄或所有工作薄篩選
我的個性簽名
發(fā)表于 2016/4/20 11:00:21   
頭像 等級:學(xué)者
積分:99
財(cái)富值:250
身份:普通用戶

回復(fù)：樓主

用這個宏，放到收納箱里面 


Sub 取消全部工作簿的篩選()
    On Error Resume Next
     Dim wb As Workbook
     Dim ws As Worksheet
     
     For Each wb In Application.Workbooks
        For Each ws In wb.Worksheets
            ws.UsedRange.AutoFilter
        Next
     Next
     
End Sub
我只是一個打工仔..
發(fā)表于 2016/4/28 16:16:54   
頭像 等級:初學(xué)者
積分:8
財(cái)富值:2
身份:普通用戶

回復(fù)：2樓


謝謝
我的個性簽名
發(fā)表于 2016/5/17 22:15:56   
頭像 等級:學(xué)有小成
積分:22
財(cái)富值:5
身份:普通用戶
路過幫頂
我的個性簽名

快速回復(fù)

目前不允許游客發(fā)表，請 登錄 注冊 后再發(fā)貼。