フォームにMSFlexGridを2つ置いて1行目に"","No.","Pos","選手氏名"
,"Cp","St"を中央揃えで配置して、選手氏名の2行目（実際に選手氏名
を入力するセル）からは選手氏名を左詰めにしたいんですが、うまく
いきません・・・。
コードは以下のようにしていますが駄目です。
どうかよろいクお願いします。

Private Sub grdPlayers_Design(ByVal Target As MSFlexGrid)
    'ローカル変数を宣言'
    Dim ixPlayer As Long
    Dim i As Long
    
    With Target
        .TextMatrix(0, eGridNoCol) = "":            .ColWidth(eGridNoCol) =300:            .ColAlignment(eGridNoCol) = flexAlignCenterCenter

        .TextMatrix(0, eGridUniformNumber) = "No":  .ColWidth(eGridUniformNumber) = 300:    .ColAlignment(eGridUniformNumber) = flexAlignCenterCenter

        .TextMatrix(0, eGridPosition) = "Pos":       .ColWidth(eGridPosition) = 450:        .ColAlignment(eGridName) = flexAlignCenterCenter

        .TextMatrix(0, eGridName) = "選手名":       .ColWidth(eGridName) = 1200:            .ColAlignment(eGridPosition) = flexAlignCenterCenter

        .TextMatrix(0, eGridCaption) = "Cp":        .ColWidth(eGridCaption) = 300:          .ColAlignment(eGridCaption) = flexAlignCenterCenter

        .TextMatrix(0, eGridSM) = "St":             .ColWidth(eGridSM) = 300:               .ColAlignment(eGridSM) = flexAlignCenterCenter
                
        For i = 1 To 18
            .TextMatrix(i, eGridName) = "":  .ColWidth(eGridName) = 1200:   .ColAlignment(eGridPosition) = flexAlignLeftTop
                
        For ixPlayer = 1 To bbPlayerMax
            .TextMatrix(ixPlayer, 0) = CStr(ixPlayer)
        Next
    End With
    
End Sub

ヘルプの使用例やここの[MSFlexGrid関係]はご覧になりましたか？

> ヘルプの使用例やここの[MSFlexGrid関係]はご覧になりましたか？

花ちゃんさん、回答ありがとうございます。
[MSFlexGrid関係]は既に閲覧させていただきました。花ちゃんさんの
コードはわかりやすいんですが、自分が書いたコードに付け加えるこ
とでどうにかならないかと考えて投稿しました。
やはり[MSFlexGrid関係]のように書き変えた方がいいんでしょうか？

> やはり[MSFlexGrid関係]のように書き変えた方がいいんでしょうか？
それでは、できなかったのでしょう。

同じ列内で、1行目と2行目の配置を変更したいのじゃないのですか？
ColAlignment プロパティ  と
CellAlignment プロパティ の違いをヘルプで調べ見比べて見て下さい。

花ちゃんさん、回答ありがとうございます。
解決しました。今後はよく見てから質問します。