Increment Form and Revision Number with Hyphen in Between.

[USFengBULLS]

Hello,

I am looking at many examples online on how to auto increment Invoice / Form number but they aren't specific to what I need to do.
The format to number my forms is (Change Order #) - (Revision #). Example, If I were on the fourth revision of change order three, it would be 3-4.
I need to write two codes for two different situations.

The first code needs to increment the change order number, the value to the left side of the hyphen i.e. 1-0, 2-0, 3-0, 4-0

The second code will need to increment the revision number, the value to the right side of the hyphen i.e. 1-1, 1-2, 1-3, 1-4

I had 1-0 in the cell to test and wrote a simple Range("B7") = Range("B7") + 1 and of course it did not work. I already have a place to put these codes that resets the form depending on if its a new change order, or a revision to a change order. I just need some help with the actual code that would increment the number to left only or the number on the right only.
How would I write the code for both of these?

 

[jtakw]

Hi,

Is this what you mean:

Book1
	A	B	C	D
1			Left only	Right only
2	1-0		2-0	1-1
Sheet512

Cell Formulas
Range	Formula
C2	=LEFT(A2,FIND("-",A2)-1)+1&MID(A2,FIND("-",A2),99)
D2	=LEFT(A2,FIND("-",A2))&MID(A2,FIND("-",A2),99)+1

 

[USFengBULLS]

Yes, Exactly. But I need it to do this in two separate VBA Codes so I can have it run with other codes/events that I already have happening.