If you can stand 1 more (simpler, I think):
Click on Reports from Main "form" (program)
choose Demographics as the category, Chart ID as the field, <> (not equals as the operator and 0 as the value,
Click [add Criteria to Query], then [Run Report].
Then click twice on the Report column HEADER ID (first click sorts Ascending, 2nd click Descending) then the TOP value is the last Chart ID Created.