Truth Table
in [Functions]
|
Prev: Having info in a certain cell EXACTLY same as in cell on anoth
Next: Having info in a certain cell EXACTLY same as in cell on anotherpa
From: Victoria612 on 27 May 2010 16:16 WAIT! I think I got it - can someone confirm this is accurate? Sub Macro() Dim lngRow As Long Dim intA As Integer, intB As Integer, intC As Integer, intD As Integer, intE As Integer, intF As Integer For intA = 1 To 2 For intB = 1 To 2 For intC = 1 To 2 For intD = 1 To 2 For intE = 1 To 2 For intF = 1 To 2 lngRow = lngRow + 1 Range("A" & lngRow).Resize(, 6) = Split(intA & "," & intB & "," & intC & "," & intD & "," & intE & "," & intF, ",") Next Next Next Next Next Next End Sub Also, can someone explain why there are 64 total scenarios? For some reason I was convinced it was 36 (6 to the n power, n being the number of possible answers, which in this case is 2) Thank you. "Victoria612" wrote: > Thank you Jacob: > OK - I ran the macro and it resulted in a three column table of 27 > rows....My apologies if I did not explain my intentions correctly.. > I have 6 questions that may be answered yes or no, and for the sake of > keeping everything in integer form, let's assume "1" for yes and "0" for no. > Depending on how a customer answers all 6 questions, they will receive a > predetermined score. I am attempting to develop the answer key, so-to-speak, > to refer the reps to once they are finished asking the customer these > questions. > I was hoping for a table that would lay out all of the 6 question-answer > combinations, like the following: > Questions Scenario 1 Scenario 2 Scenario 3 Scenario 4 > 1 1 1 1 > 1 > 2 1 0 0 > 0 > 3 1 1 0 > 1 > 4 1 1 1 > 0 > 5 1 1 1 > 1 > 6 1 1 1 > 1 > > ...and so on, so that I am given all the possible 6 answer > scenarios....Hopefully this helps out. Is it still only 27 possibilities? I > thought, at the very least, 36…, no? > Your help is greatly appreciated! > Victoria > > "Jacob Skaria" wrote: > > > 27 possibilities... > > > > Sub Macro() > > Dim lngRow As Long > > Dim intA As Integer, intB As Integer, intC As Integer > > > > For intA = 1 To 3 > > For intB = 1 To 3 > > For intC = 1 To 3 > > lngRow = lngRow + 1 > > Range("A" & lngRow).Resize(, 3) = Split(intA & "," & intB & "," & intC, ",") > > Next > > Next > > Next > > End Sub > > > > -- > > Jacob (MVP - Excel) > > > > > > "Victoria612" wrote: > > > > > I stand corrected - is there a way to program a macro that can determine all > > > 72 possible scenarios? > > > > > > "Victoria612" wrote: > > > > > > > OK - I have 6 questions, all of which can be answered either yes or no. Is > > > > there a way to build a macro that can determine all 36 possible scenarios for > > > > me? > > > > > > > > For example: > > > > 1 Yes Yes Yes > > > > 2 No Yes Yes > > > > 3 No No Yes > > > > 4 No No No > > > > 5 No No No > > > > 6 No No No > > > > > > > > ....and so on. > > > > > > > > We can use other values for Yes and No, say True or False, or "1" or "0", > > > > respectively. > > > > > > > > Any help is greatly appreciated. > > > > > > > > Victoria
From: Victoria612 on 27 May 2010 16:30 Thank you Jacob: OK - I ran the macro and it resulted in a three column table of 27 rows....My apologies if I did not explain my intentions correctly.. I have 6 questions that may be answered yes or no, and for the sake of keeping everything in integer form, let's assume "1" for yes and "0" for no. Depending on how a customer answers all 6 questions, they will receive a predetermined score. I am attempting to develop the answer key, so-to-speak, to refer the reps to once they are finished asking the customer these questions. I was hoping for a table that would lay out all of the 6 question-answer combinations, like the following: Questions Scenario 1 Scenario 2 Scenario 3 Scenario 4 1 1 1 1 1 2 1 0 0 0 3 1 1 0 1 4 1 1 1 0 5 1 1 1 1 6 1 1 1 1 ....and so on, so that I am given all the possible 6 answer scenarios....Hopefully this helps out. Is it still only 27 possibilities? I thought, at the very least, 36…, no? Your help is greatly appreciated! Victoria "Jacob Skaria" wrote: > 27 possibilities... > > Sub Macro() > Dim lngRow As Long > Dim intA As Integer, intB As Integer, intC As Integer > > For intA = 1 To 3 > For intB = 1 To 3 > For intC = 1 To 3 > lngRow = lngRow + 1 > Range("A" & lngRow).Resize(, 3) = Split(intA & "," & intB & "," & intC, ",") > Next > Next > Next > End Sub > > -- > Jacob (MVP - Excel) > > > "Victoria612" wrote: > > > I stand corrected - is there a way to program a macro that can determine all > > 72 possible scenarios? > > > > "Victoria612" wrote: > > > > > OK - I have 6 questions, all of which can be answered either yes or no. Is > > > there a way to build a macro that can determine all 36 possible scenarios for > > > me? > > > > > > For example: > > > 1 Yes Yes Yes > > > 2 No Yes Yes > > > 3 No No Yes > > > 4 No No No > > > 5 No No No > > > 6 No No No > > > > > > ....and so on. > > > > > > We can use other values for Yes and No, say True or False, or "1" or "0", > > > respectively. > > > > > > Any help is greatly appreciated. > > > > > > Victoria
From: Victoria612 on 27 May 2010 16:43
I stand corrected - is there a way to program a macro that can determine all 72 possible scenarios? "Victoria612" wrote: > OK - I have 6 questions, all of which can be answered either yes or no. Is > there a way to build a macro that can determine all 36 possible scenarios for > me? > > For example: > 1 Yes Yes Yes > 2 No Yes Yes > 3 No No Yes > 4 No No No > 5 No No No > 6 No No No > > ....and so on. > > We can use other values for Yes and No, say True or False, or "1" or "0", > respectively. > > Any help is greatly appreciated. > > Victoria |