Add 2 columns to VB6 flexgrid and fix Error 30009

WHAT I NEED DONE A set of radio buttons in my VB6 project’s “Filter” flexgrid has developed an “Invalid Row Value: Error 30009”. 1. I need this error fixed. 2. I need two new columns (Age and Sign) inserted into to the Filter grid. (See attached Insert2columns pic.) 2a. The Age column cells need to calculate the age (as of today’s date) of someone born at the corresponding TIME column’s date and time. 2b. The Sign column cells need to calculate the astrological sign (Aries, Taurus, etc.) of someone born at the corresponding TIME column’s date and time. 2c. The new columns cells background tint needs to be coded to use HEX color codes. 2d. Your code needs to be commented where applicable. NOTE1: The TIME column contains various dates and times. (See attached spreadsheet and FilterGrid pic.) NOTE2: A spreadsheet is attached with the Lookup formulas required to do the age and astrological sign calculations. NOTE3: The programs uses Access database to store/retrieve the flexgrid’s information. All buttons and features in the Filter grid must still work properly after the 30009 error is fixed and the two columns are inserted. Especially important are: -- Clicking any Time column cell calls another form (frmSummaryRpt). -- The background tint of each Time cell is dependent upon the value in another Filter grid column. -- The contents of the program’s Gridstats flexgrid is based upon the Filter grid’s contents. A few entries in the Gridstats form’s code may need to be altered so they still point to the appropriate Filter flexgrid’s columns. (See attached Gridstats pic.)