Hi Greg.
A small bug in SaveGridToWorkbook: it should ignore General fields to avoid an error (not a common thing, I realize):
FOR lnCol=1 TO toGrid.ColumnCount
lcField = toGrid.Columns(lnCol).ControlSource
*** 2016-06-20 DH: use blank for General fields
if type(lcField) = 'G'
this.SetCellValue(lnWB, lnSh, lnRow, lnCol, '')
else
*** 2016-06-20 DH: end of new code
this.SetCellValue(lnWB, lnSh, lnRow, lnCol, &lcField)
*** 2016-06-20 DH: added ENDIF
endif
ENDFOR
Doug
↧