If-Bedingung mit "And" und "Or"

Question

Hallo VBA-Profis,

kann mir jemand mitteilen wie ich codemäßig das folgende schreiben könnte? Die Anweisungen sollen ausgeführt werden, wenn
1. a = 0 und b = 1 oder wenn
2. a = 1 und b = 2 sind!

Bei folgendem Code funktioniert es irgendwie nicht! Was könnte ich falsch gemacht haben?

If (a = 0 And b = 1) Or (a = 1 And b = 2)
Then

Liebe Grüße und vielen Dank an alle Antwortenden!
Thorsten

Answer 1

ich habe es da ich gerade mit Visual Basic 2008 über dort mal getestet.

[code]        Dim a As Integer = 1
        Dim b As Integer = 2

        If (a = 0 And b = 1) Or (a = 1 And b = 2) Then
            Console.WriteLine("ja")
        Else
            Console.WriteLine("nein")
        End If
        Console.ReadLine()
[/code]
Dort läuft es ohne Probleme


Gruß Steffen

Answer 2

Hallo Thorsten,
oder so:

Sub Makro1()
If Range("A1") = 0 And Range("B1") = 1 Or Range("A1") = 1 And Range("B1") = 2 Then
Range("C1") = OK
Else
Range("C1") = ""
End If
End Sub

Gruß
fedjo

Answer 3

Danke, hat mir geholfen!