is there a way to unhide my rows when the spreadsheet is sent to email? this
is the macro that i'm using. the macro works and an email is generated but i
want to send the entire spreadsheet (unhide my rows) as an attachement.

thanks

Private Sub CommandButton1_Click()

Dim OutApp As Object
Dim OutMail As Object
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
With OutMail
..To = ""
..CC = ""
..BCC = ""
..Subject = "Revenue Enhancement Escalation"
..Body = ""
..Attachments.Add ActiveWorkbook.FullName
..display
End With
Set OutMail = Nothing
Set OutApp = Nothing


End Sub

--
problem