Good try, Lucas, but Loading the variable is not an issue. That part is working smooth. I understand what you mean about the changing activecell, but I have accounted for that. I want to start on sheet1, which has the values, and get the value of Cell A1, then add the new sheet, set the new sheet to what was present on A1 of the first sheet, then go back to the first sheet and delete Row 1. I will build this to loop through the rows later.
Hope that explains my goal. Here is my revised code. I think it's a little cleaner. I also changed the variable name. I think using "ServerName" might confuse others.
Dim Worksheet As Worksheet
Dim MickeyMouse
Range("A1").Select
Set MickeyMouse = ActiveCell
Sheets.Add
Worksheet.Name = MickeyMouse --This Line is the only part not working
Sheets("Sheet1").Select
Rows("1:1").Select
Application.CutCopyMode = False
Selection.Delete Shift:=xlUp
Range("A1").Select
End Sub
That said, I still need help!