oExcel = CreateObject("Excel.Application")
With oExcel.ActiveSheet.Range("A1").Font
.Name = "Times New Roman"
.Size = 20
.Bold = .T.
EndWith
HTH
What is Wisdom? Wisdom - The ability to respond to any situation according to God's Plan. Therefore: USE Wisdom IN Everything ORDER priority AS Knowledge SELECT Knowledge BROWSEFOR Understanding WHERE Wisdom=Guide