Dim oTable As Word.Table Set oTable = monDoc.Tables.Add( ...puis de sélectionner la première cellule de cette table
oTable.Cell(1, 1).Selectet enfin de faire deux boucles For-Next imbriquées pour passer en revue chaque ligne (1ère boucle) et chaque colonne (2ème boucle) de ta FlexGrid et insérer les données texte avec un simple TypeText.