Create A Toggle Button That Switches A List To A Range And Then Back To A List If Needed?

II am trying to create a toggle button that switches a list to a range and then back to a list if needed. I am able to get it to do both but when I add an item to the list, convert to a range and then convert back to a list it leaves off the last items I entered.I tried to work in a code to select all cells but I must not be putting it in the right place.This is what I have so far:

ActiveSheet.ListObjects.Add(xlSrcRange, Range("$A$3:$AE$7"), , xlYes).Name = _
"List1"

I realize the problem is the $AE$7 (the $A$3 is correct)