VBA Macro To Move Data To Summary Sheet Based On ID's

I have had several intro programming classes, but not with visual basic. I've noted the problem lines with comments below. The problems are probably very easy syntax error.

Sub list()

Dim counter As Integer
Dim counter2 As Integer
Dim id As Double
Dim id2 As Double
Dim palletnum As Integer

ActiveSheet. Name = "Pallet Detail"
Sheets.Add
ActiveSheet.Name = "Pallet Summary"
Sheets("Pallet Detail").Select