sammen fletning af 2 celler i msflexgrid

Du skal sætte property MergeCells til en passende værdi, fx flexMergeRestrictRows. Herefter vil naboceller med samme tekstindhold blive flettet sammen.

har du et eksembel

Nåja, jeg glemte lige at man også skal bruge MergeCol og/eller MergeRow.
Her er et eksempel der bare kræver en MSFlexGrid på en form:

Private Sub Form_Load()
  Dim row, col As Integer
 
  With MSFlexGrid1
    .Rows = 5
    .Cols = 4
    .MergeCells = flexMergeRestrictColumns
   
    For row = 1 To .Rows - 1
      For col = 1 To .Cols - 1
        .MergeCol(col) = True
        .TextMatrix(row, col) = Chr(Asc("A") + col - 1) & CStr(row)
      Next col
    Next row

    .TextMatrix(2, 2) = "Flet 2"
    .TextMatrix(3, 2) = "Flet 2"
    .TextMatrix(2, 3) = "Flet 3"
    .TextMatrix(3, 3) = "Flet 3"
    .TextMatrix(4, 3) = "Flet 3"
  End With
End Sub

Takker