If end If erkt OR niet

[PJurriaans Sr]

Hallo geweldige helpers ik zit hier zo lang mee te knoeien kunt U mij aub helpen?
met onderstaande regels spring ik naar een andere procedure maar als ik meerdere
keuzes moet maken werkt het niet.


Sheets(1).Select
Range("A" & Rows.Count).End(xlUp).Offset(, 5).Select

If ActiveCell.Value = 503 Then ---------------------------------------------Dit werkt
ENERGIE

Bovenstaande werkt maar zodra ik OR op onderstaande manier gebruik werkt hij niet??

If ActiveCell.Value = 869000 Or 503 Then-------------------------------Dit erkt niet
ENERGIE

End If

Mvg Peter.

 

[Hoornvan]

PJurriaans Sr,

De volgende keer de code selecteren en dan boven in het menu op # klikken svp.

 

[PJurriaans Sr]

Zorry Wim echt vergeten gr Peter.

 

[Jabber]

Ik heb er niet veel kaas van gegeten, maar kan het aan het volgende liggen:

If (ActiveCell.Value = 869000) Or (ActiveCell.Value = 503) Then
    ENERGIE
End If

 

[PJurriaans Sr]

Jabber Dank. Kijk daar heb ik wat aan:thumb:Het lijkt zo logisch maar ik
experimenteer me een ongeluk nogmaals Dank.Mvg Peter.

 

[Warme bakkertje]

De haakjes zijn overbodig

 

[PJurriaans Sr]

Warme bakkertje Beankt voor de reactie bedoel je de haakjes in de oplossing van
Jabber die werkt wel prima?Mvg Peter.

 

[Warme bakkertje]

Ik zeg ook niet dat het niet werkt, ik zeg enkel dat ze niet nodig zijn.

 

[PJurriaans Sr]

Rudi bedankt.Mvg Peter