Menu


Główna
Kurs:
Wstęp

Edytor

Pierwszy program

Instrukcje warunkowe

Pętle

Przydatne makra:

 Sheet delete

Nie zapisuj

Iloczyn macierzy

IP - ping

 Instrukcje warunkowe.

Instrukcja warunkowa If.
Jeżeli chcemy by procedura wykonała różne zadania w zależności od np. wartości jakiej zmienne używamy instrukcji If. Poniżej przedstawiono kilka podstawowych składni tej instrukcji w VBA:

 If wyrazenie_logiczne Then {ciag instrukcji}
If wyrazenie_logiczne Then {ciag instrukcji} Else {inny_ciag_instrukcji}
If wyrazenie_logiczne Then
{ciag instrukcji}
Else
{inny_ciag_instrukcji}
End If

 wyrazenie_logiczne to takie wyrażenie które może przyjąć tylko jedna w dwu wartości: True (Prawda) albo False (Fałsz). Wyrażeniem logicznym może być np. wynik porównania dwu liczb (np. A < B).

Wyrażenie {ciag_instrukcji) występujące po słowie kluczowym Then reprezentuje instrukcje wykonywane w przypadku, gdy wyrażenie logiczne posiada wartość True. Jeżeli wartość wyrażenia wynosi False, realizowane są instrukcje po słowie kluczowym Else.

Wyrażenie {ciag_instrukcji) występujące po słowie kluczowym Then reprezentuje instrukcje wykonywane w przypadku, gdy wyrażenie logiczne posiada wartość True. Jeżeli wartość wyrażenia wynosi False, realizowane są instrukcje po słowie kluczowym Else.

Instrukcja wyboru Select Case.
W przypadku instrukcji If...Then...Else mamy do wybory tylko dwie sytuacje. Jeżeli chcemy sterować przebiegiem programu w zależności od większej ilosci warunków, stosujemy Instrukcje Select Case. Jej składnia wygląda następująco:

 Select Case wartosc_badana
Case wartosc_1
{ciag_instrukcji_1}
Case wartosc_2
{ciag_instrukcji_2}
....
Case wartosc_n
{ciag_instrukcji _n}
Case Else
{ciag_instrukcji}
End Select

W zależności od wartości wyrażenia wartosc_badana wykonywane będą odpowiednie instrukcje. W przypadku, gdy wartosc_badana będzie równa wartosc_1 to wykonywany będzie ciag_instrukcji_1, analogiczne dla pozostałych przypadków. W przypadku, gdy wartosc_badana nie będzie równa żadnej z wymienionych wartości , wykonywany będzie ciąg instrukcji po wierszy Case Else.

Linki
VBA:

VBA Mania

Anhtony VBA

 Shmitti's Vba

 Excel Macro

Programy VBA