I am using a macro that asks for the date to put in a footer, as follows:
datestring = InputBox("Enter date to be printed in footers." & Chr(13) & _
"Leave blank if current date is to be used.", _
"Set Up Footer Date")
If Not datestring = "" Then
ActiveSheet.PageSetup.RightFooter = datestring
How do I also specify the font (Arial) and font size (10) to use for this text?