Easier way than adding 200 queries?

[Kamal]

Hello,

I'm working on a risk tool which has to include 8 matrices(each 25 clickable pictures).


But i've been wondering if there is an easier way than adding a single querie to each clickable picture (8x25=200)

This is my simple formcode which is working now:

Private Sub AFBPL11_Click()
DoCmd.OpenQuery "PL11"
End Sub


Private Sub AFBPL12_DblClick(Cancel As Integer)
DoCmd.OpenQuery "PL12"
End Sub
Private Sub AFBPL13_DblClick(Cancel As Integer)
DoCmd.OpenQuery "PL13"
End Sub


Private Sub AFBPL14_DblClick(Cancel As Integer)
DoCmd.OpenQuery "PL14"
End Sub
Private Sub AFBPL15_DblClick(Cancel As Integer)
DoCmd.OpenQuery "PL15"
End Sub


and so on.

And this is my sample querie code where Tabel1 is my tablename and PLFREQ and PLIMP are my collunms. This one works too but adds a new record instead of adding info to the record made in the first form.

INSERT INTO Tabel1 ( PLFREQ, PLIMP )
SELECT 1 AS Expr1, 1 AS Expr2;

And so on


So my question: Do i really have to make 200 query's and do it this way? Or is there an easier way?


Many thanks in advance!!

[pbaldy]

If the info in the query can be inferred or derived fom the name of the object clicked, you should be able to avoid having 200 queries.

Sounds like you want an update query with a criteria, not an append query.

[Kamal]

Thank you for your response, i tried using DAO recordsets and that sort of works.

Thanks anyway