Delete fixed Rows and Columns

I have a daily variance report I export to Excel and every day I have to delete certain rows and the certain columns before I can run a macros to delete all the zero value rows. I can not run this macros before the time as the the rows and columns that I delete contain zero values and thus I will lose most of my work if I run the Macros before hand.

The rows and columns are set, so the exact same rows and columns are deleted every day. So I need a macros to delete the set rows and then another macros to delete the columns. I'm not very good with programming so any help will help.


Thanks in advance...

I can give you the list off rows to be removed but it's a couple if pages (30) worth. I thought I would save you the hard word and add it if I knew where or how to include it in the code. The rows will be specific lines number and rows so it has no barring on the content of the cells.

If we can add it to once macros it will be great. Just please keep in mind that I'm not the smartest peanut in the packet when it comes to programming.

Sub HideRowsByZero()
'Update 20131107
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
If Rng.Value = "0" Then
Rng.EntireRow.Hidden = True
End If
Next
End Sub

Thank you very much for the info. Where do I insert this code in the existing macros I provided above...