Teveel if and in excel

Status
Niet open voor verdere reacties.

nvissers

Gebruiker
Lid geworden
1 apr 2009
Berichten
8
Goedemiddag,

ik heb geprobeerd een formule te maken in excel, maar deze wordt te groot. Hoe kan ik dezelfde formule maken in VBA? Ik kom hier zelf niet helemaal uit.

=IF(AND(C9<=5;C11=Ja);(C5*H3+C6*I3+C7*J3+C8*K3)*(C9)/260;IF(AND(C9=6;C11=Ja);(C5*H3+C6*I3+C7*J3+C8*K3)*(C9-1)/260;IF(AND(C9>=7;C9<=12;C11=Ja);(C5*H3+C6*I3+C7*J3+C8*K3)*(C9-2)/260;"")))

ps. dit is een deel van de formule.
 
Goedemiddag,

ik heb geprobeerd een formule te maken in excel, maar deze wordt te groot. Hoe kan ik dezelfde formule maken in VBA? Ik kom hier zelf niet helemaal uit.

=IF(AND(C9<=5;C11=Ja);(C5*H3+C6*I3+C7*J3+C8*K3)*(C9)/260;IF(AND(C9=6;C11=Ja);(C5*H3+C6*I3+C7*J3+C8*K3)*(C9-1)/260;IF(AND(C9>=7;C9<=12;C11=Ja);(C5*H3+C6*I3+C7*J3+C8*K3)*(C9-2)/260;"")))

ps. dit is een deel van de formule.

In VBA krijg dan zoiets als:

Code:
' huidigecel = adres van de cel waarin de formule staat; bijvoorbeeld "A1".

If range("C9").value <= 5 and range("C11").value = "Ja" then
   range(huidigecel).value = (range("C5").value*range("H3").value+...)/260
   ...
Else
  If Range("C9").value = 6 and range("C11").value = "Ja" then
     ...
  Endif
Endif

Je heb nu vast wel een idee hoe verder te gaan ;)
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan