conditional formatting

[ryan_law2000]

A4:AB4
If all cells have any value
then turn all cells green

So i have selected all the cells and went to conditional formatting but i need a formula that would do this?

 

[Smitty]

You can use Cell Value-->Not Equal to-->=""

Or use an equivalent formula.

HTH,

 

[ryan_law2000]

This is not working for some reason

My formula is :
="A4:AB4=<>="""""

and it applies to
=$B$4:$AB$4

not working for some reason

 

[ryan_law2000]

ALL the cells in that range must have information filled in before all the cells can turn green

 

[Smitty]

This is not working for some reason

My formula is :
="A4:AB4=<>="""""

Excel appends additional quotes that you need to remove.

ALL the cells in that range must have information filled in before all the cells can turn green

But for that criteria you need something different anyway:

=COUNTA($A4:$AB4)<>28

 

[Ingolf]

Hi,

Select cells A4:AB4 and in Conditional formating insert this formula:
=COUNT($A4:$AB4)=COLUMNS(A4:AB4)

 

[ryan_law2000]

I have tried both formulas suggested and neither work for some reason any other ideas or what could i be doing wrong?

 

[Marcelo Branco]

Hi,

Select A4:AB4

CF>New Rule > Use a formula to determine...
insert this formula
=COUNTA($A$4:$AB$4)=COLUMNS($A$4:$AB$4)
pick a format

HTH

M.

 

[ryan_law2000]

I have done exactly what you said and all that happens is all the cells turn green. Even though not all the cells have information filed in... I gues maybe a different solution could be in the userform.

Is there some code we could use?
This is what i have now that inputs the information into the cell range.
Can you add:
If all textbox's have information then color active row green
If not color active row with no fill (or white)

Private Sub CommandButton11_Click()
 Dim i As Long
        

ActiveCell.Offset(0, 2) = DimensionData.TextBox2
ActiveCell.Offset(0, 3) = DimensionData.TextBox3
ActiveCell.Offset(0, 4) = DimensionData.TextBox4
ActiveCell.Offset(0, 5) = DimensionData.TextBox5
ActiveCell.Offset(0, 6) = DimensionData.TextBox6
ActiveCell.Offset(0, 7) = DimensionData.TextBox7
ActiveCell.Offset(0, 8) = DimensionData.TextBox8
ActiveCell.Offset(0, 9) = DimensionData.TextBox9
ActiveCell.Offset(0, 10) = DimensionData.TextBox10
ActiveCell.Offset(0, 11) = DimensionData.TextBox11
ActiveCell.Offset(0, 12) = DimensionData.TextBox12
ActiveCell.Offset(0, 13) = DimensionData.TextBox13
ActiveCell.Offset(0, 14) = DimensionData.TextBox14
ActiveCell.Offset(0, 15) = DimensionData.TextBox15
ActiveCell.Offset(0, 16) = DimensionData.TextBox16
ActiveCell.Offset(0, 17) = DimensionData.TextBox17
ActiveCell.Offset(0, 18) = DimensionData.TextBox18
ActiveCell.Offset(0, 19) = DimensionData.TextBox19
ActiveCell.Offset(0, 20) = DimensionData.TextBox20
ActiveCell.Offset(0, 21) = DimensionData.TextBox21
ActiveCell.Offset(0, 22) = DimensionData.TextBox22
ActiveCell.Offset(0, 23) = DimensionData.TextBox23
ActiveCell.Offset(0, 24) = DimensionData.TextBox24
If DimensionData.TextBox25.Text <> "" Then ActiveCell.Offset(0, 25) = DimensionData.TextBox25.Text
ActiveCell.Offset(0, 26) = DimensionData.TextBox26
ActiveCell.Offset(0, 27) = DimensionData.TextBox27
ActiveCell.Offset(0, 1) = DimensionData.TextBox1
Unload Me
End Sub

 

[Marcelo Branco]

I have done exactly what you said and all that happens is all the cells turn green. Even though not all the cells have information filed in... I gues maybe a different solution could be in the userform.

Do you have formulas in $A$4:$AB$4 ?

If so, try this formula

=AND($A$4:$AB$4<>"", COUNTA($A$4:$AB$4)=COLUMNS($A$4:$AB$4))

HTH

M.