I would like to transfer every value from my column 1 of my MSHFlexgrid1 in my text1 but in a specific format.
Collumn 1 of my grid
In my Text1, i would have the result:
Text1 = ('123456','321654','456789
How can i do that?
This is what i have for now:
Dim s As String
Dim i As Long, j As Long, n As Long
For n = 1 To MSHFlexGrid1.Rows - 1
If MSHFlexGrid1.TextMatrix(n, 1) <> "" Then
s = MSHFlexGrid1.TextMatrix(n, 1) & "/" & MSHFlexGrid1.TextMatrix(n, 1)
Text1 = s
Thanks again for your help