Convert Excel formula to VBA code

Hello,

In the factory where I work, we use the "Julian Day" calendar to list our batches.

By Excel I got the formula below that when I write the date 12/01/2023 (were we use day, month and year) it returns me the year and the letter "V" (that is necessary for our process) and the referent date of the "Julian Day" calendar

Formula:

Please Login or Register  to view this content.

Thus, 12/01/2023 = 23V043

But I would need to apply this formula inside the userform, according to the attached file.

Can someone help me?

TEST.xlsm
convert-date-to-julian.xlsx

Hello.
In your example we must assume that you wanted to write February 12 and not January 12, right?...

Because that's what results from the day: 23V043.

And regarding the requested VBA code, try with:

PHP Code: 

Private Sub Inserir_Click()
Dim fe As Date
fe = CDate(Tbbatatidas)
Tbproducao = Right(Year(fe), 2) & "V" & Format(fe - DateSerial(Year(fe), 1, 0), "000")
End Sub