VBA

Question 1

For Loops

Answer 1

For each i in j (step (x)) %step is optional
….
next i

For i to 10 (step x)
….
next i

Question 2

If loops

Answer 2

If not A is nothing then %if A is not empty
…..
end if

if .... then
...
else if .... then
....
end if

Question 3

Do while loop

Answer 3

Do [while condition]
 [statements]
 [exit do]
 [statement]
loop

Question 4

Do until loop

Answer 4

Do [until condition]
 [statements]
 [exit do]
 [statements]
Loop

Question 5

Select case loop

Answer 5

select case TESTEXPRESSION
 [case EXPRESSIONLIST 1]
 [statement 1]
 [case EXPRESSIONLIST 2]
 [statement 2]
 ....
 [case else]
 [else statement]
end select

Question 6

Select the cells contains constant(or contains formula, or is empty)

Answer 6

Set object1=selection.specialcells(xlConstants,xlNumbers)
%object1 equals the range of cells that has number and is constant

Set object2=selection.specialcells(xlCellTypeBlanks)
%object2 equals the range of cells that is empty

Set object3=selection.specialcells(xlFormulas,xlNumbers)
%object3 equals the range of cells that contains number and formula

Question 7

decide whether a cell is empty or not

Answer 7

If IsEmpty(cell(i,j).value) then
….
end if

Question 8

select the use range

Answer 8

ActiveSheet.UsedRange

Question 9

With Statement

Answer 9

With Activecell.font
 .Bold=
 .Color=
 .Name=
 .Size=
 .Italic=
End With 

(same object is select multiple times)