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
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