Solved

If Statement in MS Access

Posted on 2011-03-02
8
332 Views
Last Modified: 2012-05-11
Using MS Access 97 how do you create a query that would produce a word instead of true or false (I will be using this to populate an Access report.  I have three fields (laborer, carpenter, other).  Laborer and Carpenter are yes/no fields, and other is text.  I'd like to create a report showing a field for TRADE and under that field display Laborer if the laborer field is a yes, or show Carpenter if the carpenter field is a yes, or display what is in the other field if there is something in it.  It should also display any combination (example:  If Carpenter is a yes and Laborer is a yes and there is something in other display
Carpenter
Laborer
Blah Blah Blah.
0
Comment
Question by:nplanek
  • 3
  • 2
  • 2
  • +1
8 Comments
 
LVL 3

Expert Comment

by:JAMcDo
ID: 35022730
Create a query based on the following SQL statement.

SELECT TblTrades.ID, TblTrades.Laborer, IIf([Laborer]=True,"Laborer"," ") AS txtLaborer, TblTrades.Carpenter, IIf([Carpenter]=True,"Carpenter"," ") AS txtCarpenter, TblTrades.Other
FROM TblTrades;

My table is called TblTrades with fields ID (Autonumber), Laborer (Yes/No), Carpenter (Yes/No) and Other (Text).

To do this, open a blank Query in SQL view and paste the SELECT . . . statement (including the semi-colon) into the SQL window.

If your table and/or field names differ from mine, change them in the SQL statement before changing views.

For the report only use the txtLaborer, txtCarpenter and Other fields.

J.
0
 
LVL 119

Expert Comment

by:Rey Obrero
ID: 35023617


select IIf([laborer]=-1,"Laborer",iif([carpenter]=-1,"Carpenter",[Other])) as Trade
from  TableX
0
 
LVL 8

Expert Comment

by:Andrew_Webster
ID: 35024009
Cap's nearly got it, but the parentheses look wonky.  Here's my attempt!

SELECT ((Iif([laborer]=True, "Laborer", Null) & vbCrLf) & (Iif([carpenter]=True,"Carpenter", Null) & vbCrLf) & Nz([Other],"") As Trade 
FROM tblMyTableName

Open in new window


Each "Iif" statement will return either the word with a carriage return/linefeed or Null.  There's a trick called "Null concatenation where "string" + Null returns Null, but "string" & Null returns "string".  I've used that to concatenate a newline with each term if it's there.  i.e. When [laborer] is True, then Iif([laborer],"Laborer", Null) will return the string "Laborer".  Concatenate that with an "&" to vbCrLf gives your newline.  But if it's False, then it returns a Null.  Concatenate the Null with the next expression using "&" and you just get the next expression.

It's a handy trick for odd conditional concatenation.
0
 

Author Comment

by:nplanek
ID: 35037550
This is the entire SQL Statement:
SELECT Information.FirstName, Information.LastName, Information.AppDate, Information.Address, Information.Ward, Information.City, Information.State, Information.Zip, Information.Phone,
((Iif([laborer]=True, "Laborer", Null) & vbCrLf) & (Iif([carpenter]=True,"Carpenter", Null) & vbCrLf) & Nz([Other],"") As Trade,
Information.Community, Information.Local, Information.Comments
FROM Information;

It's telling me my syntax is incorrect.
0
Comprehensive Backup Solutions for Microsoft

Acronis protects the complete Microsoft technology stack: Windows Server, Windows PC, laptop and Surface data; Microsoft business applications; Microsoft Hyper-V; Azure VMs; Microsoft Windows Server 2016; Microsoft Exchange 2016 and SQL Server 2016.

 
LVL 119

Expert Comment

by:Rey Obrero
ID: 35037823
test this



SELECT Information.FirstName, Information.LastName, Information.AppDate, Information.Address, Information.Ward, Information.City, Information.State, Information.Zip, Information.Phone,
IIf([laborer]=-1,"Laborer",Null) & IIf([Carpenter]=-1,Chr(13) & Chr(10) & "Carpenter",Null) & IIf(IsNull([Other]),Null,Chr(13) & Chr(10) & [Other]) AS Trade,
Information.Community, Information.Local, Information.Comments
FROM Information;
0
 
LVL 8

Accepted Solution

by:
Andrew_Webster earned 500 total points
ID: 35037859
Here you go.  It needed two tweaks: 1. a missing bracket before "As Trade" and 2. I was thinking in VBA so used vbCrLf instead of Chr$(10) & Chr$(13) - they both mean "new line".

SELECT 
    Information.FirstName,  
    Information.LastName,  
    Information.AppDate,  
    Information.Address,  
    Information.Ward,  
    Information.City,  
    Information.State,  
    Information.Zip,  
    Information.Phone,  
    ((IIf([laborer]=True,"Laborer",Null) & Chr$(10) & Chr$(13)) & (IIf([carpenter]=True,"Carpenter",Null) & Chr$(10) & Chr$(13)) & Nz([Other],"")) AS Trade,  
    Information.Community,  
    Information.Local,  
    Information.Comments
FROM  
    Information;

Open in new window

0
 

Author Closing Comment

by:nplanek
ID: 35038386
Love you experts!  Thanks!
0
 
LVL 119

Expert Comment

by:Rey Obrero
ID: 35038502
nplanek,

looks like you ignored the earlier posted comment at http:#a35037823
0

Featured Post

Backup Your Microsoft Windows Server®

Backup all your Microsoft Windows Server – on-premises, in remote locations, in private and hybrid clouds. Your entire Windows Server will be backed up in one easy step with patented, block-level disk imaging. We achieve RTOs (recovery time objectives) as low as 15 seconds.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

The first two articles in this short series — Using a Criteria Form to Filter Records (http://www.experts-exchange.com/A_6069.html) and Building a Custom Filter (http://www.experts-exchange.com/A_6070.html) — discuss in some detail how a form can be…
It took me quite some time to sort out all the different properties of combo and list boxes available from Visual Basic at run-time. Not that the documentation is lacking: the help pages are quite thorough and well written. The problem was rather wh…
Familiarize people with the process of utilizing SQL Server functions from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Ac…
Learn how to number pages in an Access report over each group. Activate two pass printing by referencing the pages property: Add code to the Page Footers OnFormat event to capture the pages as there occur for each group. Use the pages property to …

932 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

15 Experts available now in Live!

Get 1:1 Help Now