Filter a two sheets in a work book and delete visible rows

anil.ishaq

Board Regular
Joined
Aug 18, 2011
Messages
82
Hi All,

I have a workbook that as two sheets with master data. Each week I have to send only the relevant data to specific users. I need a macro that will select the criteria on the filter, on each sheet in 'Column B' with everying except the data that need to be sent to the user and delete those visible rows, then unfilter the column leaving the desired data only. Once this is done, then to copy these two sheets to a different work book and to save the file with a specific name. Then to undo the deletion on the master work book and then re-do but with different data. The below is the filter data needed and the file name needed to each. Hope this makes sense and I will be grateful if i can get any help.

Sheet names - Telemetry Results and Telemetry Perfomance
Column B Filter and select - Everything except 'Sheffield', 'Warrington' and 'Cumbernauld'
Copy to different work book and save as Regional Telemetry Report - Region 1
once saved, edit links and break link

Then Undo deletion on master workbook

Sheet names - Telemetry Results and Telemetry Perfomance
Column B Filter and select - Everything except 'Birmingham', 'Bristol', 'Milton Keynes' and'Dartford'
Copy to different work book and save as Regional Telemetry Report - Region 2

Then Undo deletion on master workbook

Sheet names - Telemetry Results and Telemetry Perfomance
Column B Filter and select - Everything except 'Birmingham' and 'Bristol'
Copy to different work book and save as Regional Telemetry Report - Region 2 West

Sheet names - Telemetry Results and Telemetry Perfomance
Column B Filter and select - Everything except 'Milton Keynes' and 'Dartford'
Copy to different work book and save as Regional Telemetry Report - Region 2 East
 

Forum statistics

Threads
1,078,437
Messages
5,340,270
Members
399,361
Latest member
Linford

Some videos you may like

This Week's Hot Topics

  • Problem with Radio Button's format control
    I am creating an employee evaluation template (a sample is below) Column A is the category Column B, C D, E and F will be ratings (unacceptable...
  • Last Display on userform to a Listbox
    [CODE=vba] lstdisplay.ColumnCount = 15 lstdisplay.RowSource = "A1:O600000" [/CODE] So when i do this it Displays everything on the sheet i am...
  • Rename and move files to a new location
    Dear all, I have an excel file with the following information. The actual file name is at column A but i want to rename it using the following...
  • Help with True/False Formula
    Hello! Am stumped how to fix this formula, in which my result returns 'True', but it should return False. =IF(AG2=True...
  • Clear extra characters from a provided range of cells
    Dear All, I have following code which gives me desired output to remove extra characters from a provided range. But it takes too much time when...
  • Help with Current and highest streaks
    Hi there, I've just joined the forum and this is my first post. I've already spent quite a bit of time searching the net and this forum for a...
Top