Macro to hide rows based on value of 0

I have a spreadsheet that has about a thousand rows of data. Some of the rows are zero and other rows have data. How can I make a macro to hide only the rows that are zero and leave the rest of the rows with data visible?