VBA IF with to many Or's

[Weeble]

If (P10Text.Value = "*" Or P20Text.Value = "*" Or P30Text.Value = "*" Or P31Text.Value = "*" Or PLText.Value = "*") Then
    Worksheets("PlockSnitt").Activate

Could anyone give me a suggestion on how to write this statement in a better way?
Does not work that great for me. Basicly I need if the value in the textboxes are greater than 0 It must execute a series of lines.
I've tried replacing with P10Text.Value > 0 , but can't get the code to run properly.
Probably having so many Or's is not ideal i'm guessing?

 

[Gerald Higgins]

Just an idea - is P10Text.Value (etc) a text string, or a number ?

 

[Weeble]

They are all numbers.

The IF statement later runs this.

 Cells(emptyRow2, 6).Value = CDbl(Replace(P10snitt, ".", ","))

 

[Fluff]

Try

If CDbl(P10Text.Value) > 0 Or CDbl(P30Text.Value) > 0

 

[Weeble]

I tried this

If CDbl(P10Text.Value) > 0 Or CDbl(P20Text.Value) > 0 Or CDbl(P30Text.Value) > 0 Or CDbl(P31Text.Value) > 0 Or CDbl(PLText.Value) > 0 Then
    Worksheets("PlockSnitt").Activate

And even though the textboxes are blank he still runs the IF code.
Feels like i'm missing something

 

[Fluff]

With the way that's written, if ANY of the textboxes have a value> 0 then it will activate the sheet.
if you want all the textboxes to have a value, then change Or to And

 

[Weeble]

Thx Fluff,
I must have an error somewere else in the code then
Atleast now I know this part is true.