If you want to put Autofilter on all of the sheets on a workbook, you can't do it by select all of the sheets on the sheets tabs. Instead you can use this simple VBA code:
Sub Autofilterall()
Dim ws As Worksheet
Application.ScreenUpdating = False
For Each ws In ActiveWorkbook.Worksheets
ws.Activate
Range("A1").Activate
Selection.AutoFilter
Next ws
Application.ScreenUpdating = True
End Sub
2 comentários:
Hi, great tip you posted, however i was curious if i could only set the autofilter for certain sheets. I have 12 and only need it to apply to 4 of them. Than you!
Dịch vụ làm báo cáo tài chính tại Quận 1, 2,3,4,5,6,7,8,9,10,11,12 TPHCM
Dịch vụ làm báo cáo tài chính tại Quận Đống đa, ba đình, tây hồ, Hoàng mai, thanh trì, hoàn kiếm, Hai bà trưng, từ liêm
Dịch vụ làm báo cáo tài chính tại Hà Nội,Quận Thanh Xuân,Hà đông, Long Biên, Cầu Giấy
Dịch vụ kế toán thuế trọn gói tại Quận 1, 2,3,4,5,6,7,8,9,10,11,12 TPHCM
Dịch vụ kế toán thuế trọn gói tại Quận Đống đa, ba đình, tây hồ, Hoàng mai, thanh trì, hoàn kiếm, Hai bà trưng, từ liêm
Post a Comment