You don't need VBA, you can do it with formulas.
In B16 add data validation, with a type of List, and a formula of
=OFFSET(Sheet1!$A$1,1,0,COUNTA(Sheet1!$A:$A)-1,1)
In B18, add a formula of
=VLOOKUP(B16,Sheet1!A:G,7,FALSE)
You can select the child from the DV list and print it off or whatever, then the next.
Bookmarks