We are new users of iGrid ActiveX which is a great control.

The only glitch that we have encountered is how to set the Fonts for the entire control, the header and the cells.
Does anyone have a code snippet that handles the fonts?

We have tried:

Dim Fnt As StdFont
Dim vRow As Variant

Set Fnt = New StdFont

With Fnt
.Name = "Arial"
.Size = 10
.Bold = True
End With

and

With iGrid1.Font
.Name = "Arial"
.Size = 10
.Bold = True
End With


There are no error messages, but no change in the fonts.

Thank you very much.

Robert Robinson

I am not certain what I was doing wrong, but the following code works perfectly so all is well with the fonts.

With iGrid1.Font
.Name = "Lucida Sans Typewriter"
.Size = 10
.Bold = True
End With

With iGrid1.Header
.Font.Name = "Lucida Sans Typewriter"
.Font.Size = 10
.Font.Bold = True
'.Font.Italic = True
.height = 25
End With