I have a Hierarchical FlexGrid the

[ii128]

I have a Hierarchical FlexGrid the layout as follow:


Company ID Company Name Department Employee Name
1 BB. Inc HR Lucy
Danny
IS Candy
Daicy
2 ABC. Inc HR Steve
Fanny
IS Nancy


Any one can help me That?

when I click on cell of "BB. Inc.", how can I get the value of that cell(BB. Inc.) and the Company ID(1). When I click on one of the employee Name cell like "Lucy", How can I get the value of that cell("Lucy&quot and the Company ID(1)?

 

[ii128]

Anyhelp????

 

[75cl]

value = flexgrid.textmatrix(flexrid.row,flexgrid.col)

 

[ii128]

75cl,

When I click on Danny, your code can find the value of Company_ID("1&quot

 

[ii128]

Any help???

 

[JustinEzequiel]

Assuming the "Company ID" is in column 1 and
your grid is named grdData:

Private Sub grdData_Click()
Dim nRow As Long
Dim nCol As Long
Dim sCellValue As String
Dim sCompanyId As String
Dim i As Long

With grdData
nRow = .Row
nCol = .Col

sCellValue = .TextMatrix(nRow, nCol)
sCompanyId = .TextMatrix(nRow, 1)

If sCompanyId = "" Then
For i = nRow - 1 To 1
sCompanyId = .TextMatrix(i, 1)
If sCompanyId <> &quot;&quot; Then Exit For
Next i
End If
End With
End Sub