Format("ALL LOWERCASE ", "<")
Sub callLower() Cells(2, "A").Value = Format("ALL LOWERCASE ", "<") End Sub