Cant find project or library

[Swift2003]

hi, havin alittle trouble if any1 can help. A command button on my use
form set headers & footers on worksheets according to textbox entries
On the footer it's required to use 2 lines so i added the comman
&Chr(10) to drop down a line. i know this must be right as did i
manually using Record Macro to get jist of code. When run now though
just get compile error, any ideas ??? copy of code below


Sub Machine_HeadFoot()

' Set Machine List Header\Footer

Worksheets("Machine List").Select
With ActiveSheet.PageSetup
.LeftHeader = "&""Arial,Bold Italic""&12&D"
.CenterHeader = "&""Arial,Bold Italic""&12Machine List"
.RightHeader = "&""Arial,Bold Italic""&12Site: "
Main.SiteBox.Value
.CenterFooter = "&""Arial,Bold Italic""&12Nobles Amusements,
& Main.AddressBox.Text & ", " & Main.TownBox.Text & ", "
Main.CountyBox.Text & ", " & Main.PostBox.Text & Chr(10) & "Tel:"
Main.TelBox.Text & " Fax:" & Main.FaxBox.Text

End With
Seals_HeadFoot
End Su

 

[Bob Phillips]

Are you sure it is the CHR(10) that is giving the compile error. It doesn't
throw one for me.

Break the code down, adding a bit at a time, until you get the error.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)