ActiveWorkbook.Names.Add Name:="Members", RefersToR1C1:="=Lists!R3C5:R12C5"

I have this in "Workbook_Open". But How do I expand the area if new members
are added