Cell format

[Colleen45]

Is it possible to change the format of a cell from currency to percentage based on another cells value (1 or 2)?

 

[Colleen45]

I'm quite sure there is no code attached. It is not a command button, but a Form Control Option button, I would prefer if this be done in code. When I right click, there are very few properties. Colour, size, linkcell etc

 

[Colleen45]

There is no code attached to option button, it is a form option button (not Active X), when you right click for properties, there are a very limited amount of properties that can be changed. I would be happier if this could be done in code!

 

[Firefly2012]

Ah that makes sense - insert the following code into a standard module (not a worksheet or ThisWorkbook module):

Sub Font_Change()
Select Case Range("AU5").Value
    Case 1
        Range("E13:W13").NumberFormat = "$#,##0.00"
    Case 2
        Range("E13:W13").NumberFormat = "0.00%"
    Case Else
        'currently nothing here - so values other than 1 or 2 do not change the existing format
End Select
End Sub

Next, right-click on one of these option buttons and select Assign macro - assign the Font_Change macro to it and it should now work as intended.

 

[Colleen45]

Thank you, that seemed to have worked, although I did assign the macro to both option buttons, as it seemed to stop after running once, thank you for all your time and effort in helping me with this.

 

[Firefly2012]

You're welcome I'm glad we finally got it working for you!