This is my first question. I am having trouble passing a variable between two subs. The variable in the second sub is always zero.
- Public Sub RetriveOrder_Click()
- Dim OldOrderNo As Single
- OldOrderNo = InputBox("Retrive Order #", "Enter")
- Call ReStoreOrder
- End Sub
- Sub ReStoreOrder()
- Dim Det As Worksheet
- Set Det = Sheets("Detail")
- If ActiveCell.Value <> OldOrderNo Then
- ActiveCell.Offset(1, 0).Select
The first sub is an object, Sheet1.
The second is a module.
I thought Public ment it could be used by other subs.
I am a very base beginer. Past threads were very helpful on other issues, but this is so smiple I did not find a solution. Bthayer