Vba: jak używać jeśli nie (z przykładami)

Możesz użyć poniższej podstawowej składni, aby użyć logiki JEŚLI NIE w VBA, aby sprawdzić, czy warunek nie jest spełniony:

 SubIfNot ()
    Dim i As Integer
    
    For i = 2 To 11
        If Not Range(" B " & i) = " West " Then
        Result = “ Not West ”
        Else
        Result = " West "
        End If
    Range(" C " & i) = Result
    Next i

End Sub

Ten konkretny przykład sprawdza, czy każda komórka w zakresie B2:B12 nie jest równa „West”, a następnie przypisuje „Not West” lub „West” do każdej odpowiedniej komórki w zakresie C2:C12 .

Poniższy przykład pokazuje, jak zastosować tę składnię w praktyce.

Przykład: Jak używać JEŚLI NIE w VBA

Załóżmy, że mamy w programie Excel następujący zestaw danych, który pokazuje nazwę drużyny i podział różnych drużyn koszykówki:

Załóżmy, że chcemy przypisać wartość „Zachód” lub „Nie Zachód” do każdej komórki w kolumnie C w zależności od tego, czy każda drużyna należy do dywizji Zachód.

W tym celu możemy utworzyć następujące makro:

 SubIfNot ()
    Dim i As Integer
    
    For i = 2 To 11
        If Not Range(" B " & i) = " West " Then
        Result = “ Not West ”
        Else
        Result = " West "
        End If
    Range(" C " & i) = Result
    Next i

End Sub

Kiedy uruchomimy to makro, otrzymamy następujące dane wyjściowe:

Wartości w kolumnie C mówią nam, czy każdy podział w kolumnie B jest równy „Zachodowi”.

Na przykład:

• Zespół A należy do „Zachodu”, więc kolumna C pokazuje „Zachód”
• Zespół B należy do „Wschodu”, więc kolumna C pokazuje „Nie Zachód”
• Zespół C należy do „Wschodu”, więc kolumna C pokazuje „Nie Zachód”
• Zespół D należy do „Północy”, więc w kolumnie C widnieje „Nie na Zachodzie”

I tak dalej.

Dodatkowe zasoby

Poniższe samouczki wyjaśniają, jak wykonywać inne typowe zadania w VBA:

VBA: Jak używać JEŻELI LUB do testowania wielu warunków
VBA: Jak używać JEŻELI ORAZ do testowania wielu warunków
VBA: jak sprawdzić, czy ciąg zawiera inny ciąg