View Single Post
  #1   Report Post  
Hebs Hebs is offline
Junior Member
 
Posts: 1
Default Duplicate declaration in scope

I am having troubles with this code please help.
its giving me the duplicate declaration in scope error.

Sub EnterSave(PanSize, PanName, CartNum, Dwidth, ProdName)
Dim Jobnum As Long
Dim DoorNum As Long
Dim PanName As Long
Jobnum = CartForm.JobTxt.Value
NumDoor = CartForm.NumDoorTxt.Value
DoorNum = CartForm.DoorTxt.Value
Sheets("Carts").Visible = True
Sheets("Carts").Select

Range("A1").Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveCell.Value = Jobnum
ActiveCell.Offset(0, 1).Value = NumDoor
ActiveCell.Offset(0, 2).Value = DoorNum
ActiveCell.Offset(0, 3).Value = PanName
ActiveCell.Offset(0, 4).Value = CartNum
ActiveCell.Offset(0, 5).Value = Dwidth
ActiveCell.Offset(0, 6).Value = PanSize
ActiveCell.Offset(0, 7).Value = ProdName

End Sub

Thanks in advance

Last edited by Hebs : January 10th 12 at 03:24 PM Reason: wrong code