I need to make an array of font objects, I don't even seem to be able to
make even one. Why doesn't this code work:

Public Sub x()
Dim f as Font
Set f = New Font
f.Name = "Arial"
End Sub

I'm getting an error on the 2nd line, "Invalid use of New keyword". Any
thoughts?

- Rm