VBA Adding a row to a named range

[davebliz]

I have a list of names in a named range "Player_Names"

When I do a Vlookup into this named range, if I do not find the name, I want to add the name to the end of the list and modify the named range to include the new row.

I'm new to VBA and would appreciate any help.

Thanks.

 

[AlphaFrog]

This will expand the named range "Player_Names" by one row.

[color=darkblue]Sub[/color] Player_Names_Plus_One()
    
    ThisWorkbook.Names.Add Name:="Player_Names", _
        RefersTo:=Range("Player_Names").Resize(Range("Player_Names").Rows.Count + 1)
        
[color=darkblue]End[/color] [color=darkblue]Sub[/color]