Multiple "IIF" statements

[Cloudbuster]

I want to make a column in a query that contains multiple "IIF" statements
using VBA code. I want the column to recognize that if the returned value for
another column is "A", for example, show it as "1", but if the value is "B",
then show a "2", and so on...I have experience using VBA, so an example
script would probably be fine...

 

[Tom Wickerath]

Hi Cloudbuster,

Here is an example that you might find helpful. Read the entire thread, but
see post #9 in particular:

http://groups.google.com/group/micr..._frm/thread/b85d4522abcc9b48/aa1c1a1760995bf3


Tom Wickerath
Microsoft Access MVP

http://www.access.qbuilt.com/html/expert_contributors.html
http://www.access.qbuilt.com/html/search.html
__________________________________________

 

[Wayne-I-M]

SomeOtherField:
(IIf([SomeField]=1,"A",IIf([SomeField]=2,"B",IIf([SomeField]=3,"C"))))


Or for a form

Private Sub Something_Something
If Me.SomeField = A Then
Me.SomeotherField = 1
If Me.SomeField = B Then
Me.SomeotherField = 2
If Me.SomeField = C Then
Me.SomeotherField = 3
If Me.SomeField = C Then
Me.SomeotherField = 4
End If
End If
End If
End If

 

[Cloudbuster]

Thanks Wayne! Most helpful, and simple!

SomeOtherField:
(IIf([SomeField]=1,"A",IIf([SomeField]=2,"B",IIf([SomeField]=3,"C"))))


Or for a form

Private Sub Something_Something
If Me.SomeField = A Then
Me.SomeotherField = 1
If Me.SomeField = B Then
Me.SomeotherField = 2
If Me.SomeField = C Then
Me.SomeotherField = 3
If Me.SomeField = C Then
Me.SomeotherField = 4
End If
End If
End If
End If






--
Wayne
Manchester, England.

I want to make a column in a query that contains multiple "IIF" statements
using VBA code. I want the column to recognize that if the returned value for
another column is "A", for example, show it as "1", but if the value is "B",
then show a "2", and so on...I have experience using VBA, so an example
script would probably be fine...