0% found this document useful (0 votes)
42 views

4.1 Conditional and Looping Constructs

This document discusses various conditional and looping constructs in Visual Basic for Applications (VBA). It provides examples of how to use IF-THEN and IF-THEN-ELSE statements to run different blocks of code based on a condition. It also demonstrates FOR, DO WHILE, DO UNTIL, and SELECT CASE loops for repeating blocks of code a fixed or unknown number of times based on conditional logic.

Uploaded by

RF SOFT
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PPTX, PDF, TXT or read online on Scribd
0% found this document useful (0 votes)
42 views

4.1 Conditional and Looping Constructs

This document discusses various conditional and looping constructs in Visual Basic for Applications (VBA). It provides examples of how to use IF-THEN and IF-THEN-ELSE statements to run different blocks of code based on a condition. It also demonstrates FOR, DO WHILE, DO UNTIL, and SELECT CASE loops for repeating blocks of code a fixed or unknown number of times based on conditional logic.

Uploaded by

RF SOFT
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PPTX, PDF, TXT or read online on Scribd
You are on page 1/ 8

VBA

(Visual Basic for Applications)


Session 2
Conditional Constructs
Looping Constructs
Conditional Constructs
IF…..THEN Statement
You can check one condition and on the basis of that then run one or multiple statements if the condition holds.
Example: The below program checks if in ‘Sheet1’, we have UK mentioned or not in the cell A2 and if UK is present, it will return London

Sub Capitalcity()
If Worksheets("Sheet1").Cells(2, 1).Value = "UK" Then
Worksheets("Sheet1").Cells(2, 2).Value = "London"
End If
End Sub

IF…..THEN …ELSE Statement


You can check one condition and on the basis of that then run one of the two statement blocks present.
Example: The below program checks if in ‘Sheet1’, US is present or not – if it is, then it will return ‘Washington DC’ else ‘Not US city’

Sub Capitalcity1()
If Worksheets("Sheet1").Cells(2, 1).Value = "US" Then
Worksheets("Sheet1").Cells(2, 2).Value = "Washington D.C"
Else
Worksheets("Sheet1").Cells(2, 2).Value = "Not US city"
End If
End Sub

IF program will always have a closing ‘END IF’ statement else VBA will give an error.
Looping Constructs
For….NEXT
This loop is used for a fixed number of times. In the below code, rownum is a variable and it will run 50 times till value 50 is
reached increasing by 1 each time –

Sub Forexample1()
Dim rownum as integer
FOR rownum = 1 to 50
Worksheets("Sheet1").Cells(rownum,1).Value = rownum
Next rownum
End Sub
Looping Constructs contd..
DO WHILE….Loop
This is like FOR statement just that it will keep on looping till the condition is true –

Sub DoWhileexample1()
Dim I As Integer
I=1
Do While I <= 10
Worksheets("Sheet2").Cells(I, 1).Value = I
I=I+2
Loop
End Sub
Looping Constructs contd..
DO UNTIL….Loop
This is like DO WHILE statement just that it will keep on looping till the condition is not met –

Sub DoUntilexample1()
Dim I As Integer
I=1
Do Until I = 11
Worksheets("Sheet2").Cells(I, 2).Value = I
I=I+2
Loop
End Sub

In the above example, if you change the condition of Do Until I = 10 instead of 11, since I will never reach this value 10, as 1+2
= 3, then 3+2 = 5 and so on.. i.e. we will have only odd numbers, excel will keep on running till value of I is 32,767 which is the
maximum value a variable declared as integer can take.

This is how Do Until is different from Do While.


Looping Constructs contd..
Do Loop….While and Do Loop…Until
These test the condition is true or not after the statements have been executed – so the loops will run at least once even if
the condition was not true and this is how they are different from Do While…Loop and Do Until…Loop

Sub DoWhileexample2()
Dim I As Integer
I=1
Do
Worksheets("Sheet2").Cells(I, 1).Value = I
I=I+2
Loop While I <= 10
End Sub

Sub DoUntilexample2()
Dim I As Integer
I=1
Do
Worksheets("Sheet2").Cells(I, 2).Value = I
I=I+2
Loop Until I = 11
End Sub
Looping Constructs contd..
Select Case construct
Using this condition, you can choose from two or more options – let’s suppose we have country name in cell A2 which can be
either UK, US or India and depending on which country we have, we will place the value of its capital in cell B2. The program
will look like following –

Sub selectcaseexample1()
Select Case Worksheets("Sheet1").Cells(2, 1).Value

Case Is = "UK"
Worksheets("Sheet1").Cells(2, 2).Value = "London"

Case Is = "US"
Worksheets("Sheet1").Cells(2, 2).Value = "Washington D.C"

Case Is = "India"
Worksheets("Sheet1").Cells(2, 2).Value = "New Delhi"
End Select
End Sub

You might also like

pFad - Phonifier reborn

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.


Alternative Proxies:

Alternative Proxy

pFad Proxy

pFad v3 Proxy

pFad v4 Proxy