lior03
11-26-2007, 05:45 AM
hello
i wanted to present a value of two cell in a footer .namely subtract one from the other and present it in a footer
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterFooter = Format((Range("A36").Value - Range("D34")), "#,##0")
End Sub
thanks
i wanted to present a value of two cell in a footer .namely subtract one from the other and present it in a footer
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterFooter = Format((Range("A36").Value - Range("D34")), "#,##0")
End Sub
thanks