VBA opdrachten - If statements -

Opdracht 1 – cel waarde beoordelen

Vraag
Toon antwoord

Schrijf een If statement die een msgbox toont met de tekst ‘Hallo MacroExcel’ zodra je een getal groter of gelijk aan 10 hebt staan in cel A1 van je actieve tabblad.

Sub IfStatement()

    If ActiveSheet.Range("A1") >= 10 Then
        MsgBox "Hallo MacroExcel"
    End If

End Sub

Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec ullamcorper mattis, pulvinar dapibus leo.

Opdracht 2 – Elseif gebruiken in een If Statement

Vraag
Toon antwoord

Schrijf een If statement die een msgbox toont met de tekst ‘hoog getal’ zodra je een getal groter of gelijk aan 5 hebt staan in cel A1 van je actieve tabblad. Als het getal kleiner dan 5 is dan dien je een msgbox te krijgen met de tekst ‘laag getal’

Sub IfStatement()

    If ActiveSheet.Range("A1") >= 5 Then
        MsgBox "hoog getal"
    ElseIf ActiveSheet.Range("A1") < 5 Then
        MsgBox "laag getal"
    End If

End Sub

Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec ullamcorper mattis, pulvinar dapibus leo.

Opdracht 3 – Else gebruiken in een If Statement

Vraag
Toon antwoord

Schrijf een If Statement die een msgbox met de tekst ‘hoog getal’ geeft zodra de cel waarde van A1 van het actieve tabblad hoger dan 10 is. Indien het lager dan 10 is moet de tekst ‘laag getal’ zijn. Voeg nu een else toe met een msgbox voor als de cel waarde A1 exact 10 is. De msgbox moet dan de tekst ‘getal is 10’ geven.

Sub IfStatement()

    If ActiveSheet.Range("A1") > 10 Then
        MsgBox "hoog getal"
    ElseIf ActiveSheet.Range("A1") < 10 Then
        MsgBox "laag getal"
    Else
        MsgBox "getal is 10"
    End If

End Sub

Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec ullamcorper mattis, pulvinar dapibus leo.

Opdracht 4 – If Statement op een enkele regel uitschrijven

Vraag
Toon antwoord

Schrijf een If Statement op een enkele regel die een msgbox toont met de tekst ‘het getal is tien’, zodra de inhoud van een cel de waarde 10 heeft.

Sub IfStatement()

    If ActiveSheet.Range("A1") = 10 Then MsgBox "het getal is tien"
        
End Sub

Lorem ipsum dolor sit amet, consectetur adipiscing elit. Ut elit tellus, luctus nec ullamcorper mattis, pulvinar dapibus leo.

Heeft dit artikel je geholpen?

Laat ons weten of dit artikel jou heeft geholpen. Op deze manier kunnen wij onze dienstverlening verbeteren.

VBA opdrachten – If statements

Opdracht 1 – cel waarde beoordelen

Opdracht 2 – Elseif gebruiken in een If Statement

Opdracht 3 – Else gebruiken in een If Statement

Opdracht 4 – If Statement op een enkele regel uitschrijven

Heeft dit artikel je geholpen?

Geef een reactie Reactie annuleren