bueno aunq es lo mismo, yo uso un procedimiento para poner los titulos a los msh, por ejemplo en un modulo:
Public Sub Grilla_Filtros(ByVal Grilla As MSHFlexGrid)
With Grilla
.Cols = 5
.ColWidth(0) = 250
.ColWidth(1) = 800
.ColWidth(2) = 2600
.ColWidth(3) = 1800
.ColWidth(4) = 1100
.TextMatrix(0, 1) = "Código"
.TextMatrix(0, 2) = "Nombres y Apellidos"
.TextMatrix(0, 3) = "Categoría"
.TextMatrix(0, 4) = "Domicilio"
End With
para llamarlo desde cualquier formulario solo pongo:
call Grilla_Filtros(nombre del mshflexgrid)
End Sub |