View Single Post
  #7   Report Post  
Posted to microsoft.public.excel.programming
joel[_959_] joel[_959_] is offline
external usenet poster
 
Posts: 1
Default Case Method & Range Object Problem


You have to use my code that I posted yesterday for the 8 cases. As I
explained youi method only give two cases.

I've create 8 cases by by giving each result a binary number between 0
to 7 as you can see in the code below.

Column A B C
0 or 4 0 or 2 0 or 1

this will give thes 8 Conditions false : Not N/A true : N/A
A B C
False False False = 0 + 0 + 0 = 0
False False True = 0 + 0 + 1 = 1
False True False = 0 + 2 + 0 = 2
False True True = 0 + 2 + 1 = 3
True False False = 4 + 0 + 0 = 4
True False True = 4 + 0 + 1 = 5
True True False = 4 + 2 + 0 = 6
True True True = 4 + 2 + 1 = 7


ResultA = 0
ResultB = 0
ResultC = 0

if ISNA(Left(rTEST.Cells(iBB_DATA_Row, "A")) then
ResultA = 4
end if
if ISNA(Left(rTEST.Cells(iBB_DATA_Row, "B")) then
ResultA = 2
end if
if ISNA(Left(rTEST.Cells(iBB_DATA_Row, "C")) then
ResultA = 1
end if
Result = ResultA + ResultB + ResultC
Select Case Result
Case 0
'enter your code here
Case 1
'enter your code here
Case 2
'enter your code here
Case 3
'enter your code here
Case 4
'enter your code here
Case 5
'enter your code here
Case 6
'enter your code here
Case 7
end select


--
joel
------------------------------------------------------------------------
joel's Profile: http://www.thecodecage.com/forumz/member.php?u=229
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=199358

http://www.thecodecage.com/forumz