Guys,
I have a little complicated access question, I would appreciate if any of you can help me. Here is the scenario:
I have a query that is pulling different boxes from the table, let say the boxes are A, B, C, D and E. In the query, I need to perform some calculation, however, those calculations are not the same for all the boxes. For box A - the calculation should be A/2, for B - calculation should be B*2, for C - C*25 etc. Is this even possible in access?

Thanks in advance for your help!

If you have a table that looks something like following:

TABLE Boxes

A B C
2 2 1
4 9 2
5 2 6
6 1 1

Then, you could do something like this:

SELECT A/2 as Calc1, B*2 as Calc2, C - (C*25) as Calc3 FROM Boxes;

And if you don't want any titles, then remove "as CalcXXX" part!

Nepali kancha,
My table looks like following

Apple 5
Orange 6
Mangoes 20
Grapes 100

(Let say, we are cutting apples in 2 pieces, orange in 4 pieces, Mangoes in 3 pieces and divide grapes by 10)

If my field has apple then 5*2
If my field has Orange then 6*4
If my field has Mangoes then 20*3
If my field has grape then 100/10

Thanks for your help!

I'm pretty positive that Access SQL is pretty limited and will not allow you to use If-Then or other programming languages. The only way I can think of accomplishing what you want is as follows:

Setup two tables: Fruits & FruitsDistribution

I have attached "Fruits" table with this post. Setup "FruitsDistribution" the same way as "Fruits" but leave it empty. Create a form and add a button called "cmdCalculate". Copy the following code to cmdCalculate:

Set db = CurrentDb

strQry = "SELECT * FROM Fruits"
Set rec = db.OpenRecordset(strQry, dbOpenDynaset)

rec.MoveFirst

Do Until rec.EOF

If rec.Fields(0) = "Apple" Then
strInsert = "INSERT INTO FruitsDistribution VALUES ('" & rec.Fields(0) & "', " & rec.Fields(1) * 2 & ")"
db.Execute (strInsert)
End If
If rec.Fields(0) = "Oranges" Then
strInsert = "INSERT INTO FruitsDistribution VALUES ('" & rec.Fields(0) & "', " & rec.Fields(1) * 4 & ")"
db.Execute (strInsert)
End If
If rec.Fields(0) = "Mangoes" Then
strInsert = "INSERT INTO FruitsDistribution VALUES ('" & rec.Fields(0) & "', " & rec.Fields(1) * 3 & ")"
db.Execute (strInsert)
End If
If rec.Fields(0) = "Grapes" Then
strInsert = "INSERT INTO FruitsDistribution VALUES ('" & rec.Fields(0) & "', " & rec.Fields(1) / 10 & ")"
db.Execute (strInsert)
End If

rec.MoveNext

Loop

There might be easier way, but, I'm just out of ideas right now.

And then, you can just query FruitsDistribution.

Thanks Nepali Kancha!

You are welcome! :)