pues podrías obtener el ancho y largo del texto con el objeto printer y luego usar las propiedades colwidth y rowHeight del MSFlexgrid
un ejemplo:
Dim x As String
Dim Largo As Long
Dim Ancho As Long
x = "bla bla bla bla bla bla bla bla bla bla!"
Ancho = Printer.TextWidth(x)
Largo = Printer.TextHeight(x)
MSFlexGrid1.Col = 0
MSFlexGrid1.Row = 0
MSFlexGrid1.Text = x
MSFlexGrid1.ColWidth(0) = Ancho + 50
MSFlexGrid1.RowHeight(0) = Largo + 50
Autor
En línea
