[RESOLVED] FlexGrid Format Cell's

[jamal464]

Hi


I want to format the ComboBox text which placing over the FlexGrid

The result will show in FG2 cell in .Col 18 like that

dataincellxdataincellxdataincellxdataincellxdataincell

Where x is separates the cell data

If there is no data in any cell's then we want to make sure there is'nt tow xx behaind each other

Private Sub Command1_Click()
 
With FG2
 
.Col = 18
.Text = Combo6.Text & "x" & Combo7.Text & "x" & Combo9.Text & "x" & Combo10.Text & "x" & _
Combo14.Text & "x" & Combo15.Text & "x" & Combo17.Text & "x" & Combo18.Text & "x" & _
Combo23.Text & "x" & Combo24.Text & "x" & Combo26.Text & "x" & Combo27.Text & "x" & _
Combo31.Text & "x" & Combo32.Text & "x" & Combo34.Text & "x" & Combo35.Text
FG2.Text = Replace(FG2.Text, "xx", "x") ' If there is more then 2 xx it want work
 
' Also if i enter the data in any combo then i press the command 
' then i clear the data and press the command it want work
End With
 
End Sub

What i miss