automatic number format?

[maurot]

Hi everyone.
I have a problem, or rather a question...
Let's say I have a cell, A1, whose content is a resolution (ie. 0.1, 0.01, etc - from this I can extract the number of decimals with ROUNDUP(-LOG10(A1); 0))
Then I have various "type" of other cells, namely an input cell (A2), and two other calculated cells (using a formula), one that has zero as a result (A3), and one with, say, '=1/3' (A4).
What I would like to get is that the cell A1 defines how many decimal digits should be shown in cells A2:A4.

Example.
If I wrote 0.1 in A1, and 0.234 in A2, I'd like to see 0.2 in A2, 0.0 in A3, and 0.3 in A4.
And if I wrote 0.01 in A1, I'd like to see 0.23 in A2, 0.00 in A3, and 0.33 in A4.

I've tried to find a solution for each of A2:A3 but without any success.
Anyone know of a possible solution?
Thank you

 

[maurot]

Oh, I forgot: and I would like to keep the values in A2:A4 as numbers, because they are necessary elsewhere (something like '=SUM(A2:A4)'). I've seen that using FIXED they are converted into text.
Using General formatting and ROUND the zero value does not work (it shows 0 instead of, 0.0 and 0.00).
If I use FIXED the the numbers are converted into text, and this scramble other calculations.

 

[StephenCrump]

Welcome to the Forum!

Using conditional formatting or VBA:

Book17
	A	B	C	D	E
1	N	3
2
3	CF	0.200	0.333	0.000	123.456
4
5	VBA	0.200	0.333	0.000	123.456
Sheet1

Cell Formulas
Range	Formula
C3	C3	=1/3

Cells with Conditional Formatting
Cell	Condition		Cell Format	Stop If True
B3:E3	Expression	=N=4	text	NO
B3:E3	Expression	=N=3	text	NO
B3:E3	Expression	=N=2	text	NO
B3:E3	Expression	=N=1	text	NO
B3:E3	Expression	=N=0	text	NO

Private Sub Worksheet_Change(ByVal Target As Range)
    
    If Not Intersect(Target, Range("N")) Is Nothing Then _
        Range("B5:E5").NumberFormat = "#,##0." & Application.Rept("0", Range("N").Value)
    
End Sub