Ich hab' das komplett mit einem Auswahldialog für Schriftart, Farbe, Attribute und Stil gemacht. Da kann dann der Kunde selbst seine Ansichten anpassen.
Hier ein Ausschnitt aus der Funktion:
Set color = session.CreateColorObject
c = Mid(doc.sFontColor(0), 3)
Call color.SetRGB(CInt("&h" & Left(c, 2)), CInt("&h" & Mid(c, 3, 2)), CInt("&h" & Right(c, 2)))
Forall view In db.Views
Print "Bearbeite Ansicht " & view.Name
Forall col In view.Columns
col.FontFace = doc.sFontName(0)
col.FontPointSize = doc.nFontSize(0)
col.FontStyle = doc.nFontStyle(0)
col.FontColor = color.NotesColor
End Forall
End Forall
Für die doc.sFontName usw. musst Du dann Deine Werte einsetzen.
Übrigens gibt es alle NotesViewColumn-Attribute auch für den Header, also col.HeaderFontFace, col.HeaderFontColor, usw.