Convert formula to VBA equivalent

[UHsoccer]

If have a Formula that formats Inches to the nearest 1/2, 1/4, 18 etc

How can I concert that into the VBA equivalent

Formula in cell B13 is =TEXT(INT(A14/12), "0' ;;") & IF(INT(MOD(A14, 12)), INT(MOD(A14, 12)), "") & IF(MROUND(MOD(A14, 1), 1/16), TEXT(MROUND(MOD(A14, 1), 1/16), " ?/#?"), "")

tried

Range("B14") = TEXT(INT(A14/12), "0' ;;") & IF(INT(MOD(A14, 12)), INT(MOD(A14, 12)), "") & IF(MROUND(MOD(A14, 1), 1/16), TEXT(MROUND(MOD(A14, 1), 1/16), " ?/#?"), "")
But that is an invalid VBA

 

[Fluff]

How about

Range("B14").Formula = "=TEXT(INT(A14/12), ""0' ;;"") & IF(INT(MOD(A14, 12)), INT(MOD(A14, 12)), """") & IF(MROUND(MOD(A14, 1), 1/16), TEXT(MROUND(MOD(A14, 1), 1/16), "" ?/#?""), """")"

 

[UHsoccer]

Have successfully applied the elaborate formula

Here is my question: How can one encourage (force?) the Excel team to include a selection in the Excel cell formatting that effectively does the same, that is:

Provide fraction selection that will reduced to its most common etting

Selection to "nearest 16" or "nearest 8" etc would reduce the entry as follows
Nearest 16 Nearest 8

14/16 to 7/8 6/8 to 3/4
12/16 to 3/4 4/8 to 1/2
10/16 to 5/8 2/8 to 1/4
8/16 to 1/8
6/16 to 3/8
4/16 to 1/4
2/16 to 1/8

I feel that it should be a simple format selection

 

[Fluff]

Sorry, but I don't understand what you're asking.

 

[MARK858]

Here is my question: How can one encourage (force?) the Excel team to include a selection in the Excel cell formatting that effectively does the same, that is:

If you are on 365 (not sure about other versions) on the Help tab there is a send a suggestion link.
I doubt if you will get far though as display issues with fractions have been there for years but you never know..