[Request] - Convert Excel formula to VB6 Code

[Carb0n F1ber]

I have two suggestions:
1. Try and embed the excel sheet and continue normal functioning of the application
2. Split the if statements up for me an i'll lend you a hand.
Because of the format, I have no idea whats going on in 2 and especially 3. I may have an example at school that was a bar-code validation program I could send you if your able to learn from source code (some are, most aren't).

Thanks so much for your reply ....

1. I cannot embed the excel sheet as you suggest, because the sheet's properties are set to be invisible and its only the form that loads upon opening the workbook

3. I can learn great from source codes, I think I might get lucky if I see how the barcode validation is done .. Looks like exactly what I want

2.

Code:

11-MOD((LEFT(D11,1)*2)+(MID(D11,2,1)*1)+(MID(D11,3,1)*6)+(MID(D11,4,1)*3)+(MID(D11,​5,1)*7)+(MID(D11,6,1)*9)+(MID(D11,7,1)*10)+(MID(D11,8,1)*5)+(MID(D11,9,1)*8)+(MI​D(D11,10,1)*4)+(MID(D11,11,1)*2),11))=VALUE(RIGHT(D11,1)

The above would be the main code. The remaining codes are just validating the inputs, ex. should be 12 digits.

The second and third codes are just displaying the age and date of birth if the above code is "True". Date of Birth is pulled out from the number itself, with validation to check if less than year 2000 or above, being the first digit 2 or 3

Hope this helps.

I'll wait to read your barcode code