Home |
Search |
Today's Posts |
#1
|
|||
|
|||
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 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Duplicate declaration in scope
On Jan 10, 9:23*am, Hebs wrote:
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 -- Hebs panname |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Duplicate declaration in scope
In message of Tue, 10 Jan 2012 15:23:25
in microsoft.public.excel.programming, Hebs writes 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 PanName is both a parameter of EnterSave and a variable within it. That is why the code gets a duplicate declaration. I believe PanSize is equivalent to Byref PanSize as Variant. Is that what is intended? What is CartForm? There are good reasons to start all code with Option Explicit A stand alone example might cause the answer to leap out. That would save the effort of waiting for an answer. -- Walter Briscoe |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Workbook Declaration | Excel Discussion (Misc queries) | |||
Macro / Compile Error / Duplicate Declaration | Excel Worksheet Functions | |||
which declaration to use | Excel Programming | |||
Declaration? | Excel Programming | |||
Variable Declaration?? | Excel Programming |