Excel Code To find the Odd and Even

Rayyan
Rayyan
Feb 7, 2009, 5:19 AM |
2

Here is an excel code I used it to find the Odd and Even  Number and count them  : I found the 54 chapters with  Odd total verses numbers  and 60 chapters for the Even total verses Numbers.

k = 0
L = 0
For i = 2 To 115
If Cells(i, 5) Mod 2 <> 0 Then
k = k + 1
Cells(i, 7) = k
Else
L = L + 1
Cells(i, 8) = L
End If
Next i

 

Serial No.

Verses

 

ODD

EVEN

1

7

 

1

 

2

286

 

 

1

3

200

 

 

2

4

176

 

 

3

5

120

 

 

4

6

165

 

2

 

7

206

 

 

5

8

75

 

3

 

9

129

 

4

 

10

109

 

5

 

11

123

 

6

 

12

111

 

7

 

13

43

 

8

 

14

52

 

 

6

15

99

 

9

 

16

128

 

 

7

17

111

 

10

 

18

110

 

 

8

19

98

 

 

9

20

135

 

11

 

21

112

 

 

10

22

78

 

 

11

23

118

 

 

12

24

64

 

 

13

25

77

 

12

 

26

227

 

13

 

27

93

 

14

 

28

88

 

 

14

29

69

 

15

 

30

60

 

 

15

31

34

 

 

16

32

30

 

 

17

33

73

 

16

 

34

54

 

 

18

35

45

 

17

 

36

83

 

18

 

37

182

 

 

19

38

88

 

 

20

39

75

 

19

 

40

85

 

20