Se puede hacer que me salga en negrita solo la primera fila fija con los titulos y el resto en letra normal en un MSflexgrid?

pone esta funcion

Código:

Private Sub Negrita(col As Integer)
Dim i As Integer
MSFlexGrid1.Row = 1: MSFlexGrid1.col = col
For i = 1 To MSFlexGrid1.Rows - 1
MSFlexGrid1.Row = i
MSFlexGrid1.CellFontBold = True
Next
End Sub

y para llamarla para la primer fila......

Código:

Call Negrita(0)

espero que te sirva,
saludos

perdon y para la columna seria

For i = 0 To MSFlexGrid1.Cols - 1
MSFlexGrid1.col = i
MSFlexGrid1.CellFontBold = True
Next

saludos

gracias por tu ayuda neno... eres un genio

perdon quise decir Nano

Nano, por alguna razon esto no funciona, quizas porque no pongo la llamda en el sitio clave, o no se porque... algo falla, no da error pero no sale negrita

Hola, ponlo en el evento Activate del Form:

Código:

Private Sub Form_Activate()
Dim i As Integer
With MSFlexGrid1
 .Row = 0
 For i = .FixedCols To .Cols - 1
 .Col = i
 .CellFontBold = True
 Next i
 .Row = 1
 .Col = 0
End With
End Sub

Saludos

o lo podes poner despues del cargar el flexgrid no se como cargas el flexgrid....

saludos

hola

Si no usás un Fixed para los rows, podés hacerlo con la propiedad fontheader

MSHFlexGrid1.FontHeader(0).Bold = True

A pero esa propiedad está solo en el Hierarchical Flex

..saludos

GRACIAS PÀRECE QUE FUINCIONA GRACIAS DE NUEVO A TODOS