How can I generate purchase order numbers?

[Guest]

Purchasing department has developed a purchase order form. At the top of the
form is a space for a purchase order number. They'd like this space to fill
itself in with consecutive, non-duplicating numbers each time the form is
used. Can this be done using a custom function?

Jason

 

[L. Howard Kittle]

J.E.'s got it all figured out for you here.

http://mcgimpsey.com/excel/udfs/sequentialnums.html

HTH
Regards,
Howard

 

[Guest]

Thanks Howard I'm new to macros. I figured out how to enter the
example code into VB in the worksheet. How do I call it from the cell?

 

[L. Howard Kittle]

I have never used J.E.'s souliton for invoice number increment. I passed on
what I am sure is a pro's solution to all the what-if's of issuing PO #'s.

Frankly, if you need to use J.E.'s solution to overcome the risk of
duplicates or skipped numbers you should defer to your IT department, if you
have one.

A very simple remedy is to use something like this. But you should have a
"No one touches this but me!" policy. If you use the PO, then "OneMore",
if not then "OneLess".

Sub OneMore()
Range("A1").Value = Range("A1").Value + 1
End Sub
Sub OneLess()
Range("A1").Value = Range("A1").Value - 1
End Sub

There are many ways to associate the PO No.'s to Department, Product, Field
and such by using code and formulas.

HTH
Regards,
Howard