DataGrid Column Headers

[PopTrain]

I have a datagrid that is populated from a StoredProc no problem here. What I am trying to do is record all changes in my datagrid. What I need is to capture the Column Header value so I can record this change in a table.

Does anyone know how I can obtain the Column heading value or text?

Thanks

 

[CCLINT]

Public Function GetColHeaders(grd As MSDataGridLib.DataGrid) As Variant
Dim col As MSDataGridLib.Column
Dim ary() As String
Dim I As Integer
ReDim ary(grd.Columns.Count - 1)

For Each col In grd.Columns
ary(I) = col.Caption
I = I + 1
Next col
GetColHeaders = ary
End Function
[/b][/i][/u]_{*******************************************************
General remarks:
If this post contains any suggestions for the use or distribution of code, components or files of any sort, it is still your responsibility to assure that you have the proper license and distribution rights to do so!}