Where-betingelse, makroer & rullepaneller

Hi xxx> " ..... Where [ID] = " & Me.YourCombo

I would stop using macro's and do it in VBA
In the combo's AFTER UPDATE event you could carry out exactrly what you macro did

Enig med Terry vedr. brugen af makroer i db.
Hvis du ikke er velbevandret i VBA, er der dog ikke noget til hinder for, at du kan lave en makro. Når du har sikret dig, at den fungerer kan du i databasevinduet:

Fanen Funktioner > Makro > Konverter til Visual Basic

konvertere makroen til VBA. Programmet gør det automatisk og lægger koden i et modul. Herefter er det blot at kopiere koden ind i din formular. Kontroller at det fungerer og slet derefter både makro og modul.

Det gør din db hurtigere og mere sikker.

Den makro du omtaler i dit spørgsmål kan du sagtens lave selv, ved at bruge udtryksgeneratoren i vinduet Handlingsargumenter. Sæt markøren på linien Where-betingelse, tryk derefter på de 3 prikker i højre side så udtryksgeneratoren åbnes, herefter kan du lave din betingelse.

Altså jeg har lavet makroer på alle mine 12 id'er.

Jeg vil bare gerne, at i stedet for en masse knapper som udfører sorteringen, at jeg kan vælge sorteringsparameteret udfra en dropdown boks / rullepanel. Og herefter en knap som udfører sorteringen på det valgt parameter fra rullepanellet.

what do your macro's do, can you show the code for one of them? You can convert the macro to code as mugs explained!

ÅbnFormular -> Where-betingelsen: [ID]="123"

Du skal have en form, hvorpå du placere en kombobox.
rækkekildtype sættes til værdiliste
rækkekilden sættes til 121;222;522;....... osv

på komboboxens egenskabsark under hændelser finder du 'efterOpdatering'
klik på de 3 punktummer til højre og vælg kode
I VBA editoren er der nu oprettet en hændelse

Private Sub Kombo_AfterUpdate()
  DoCmd.OpenForm "frmNavn", , , "id = " & Me.Kombo
End Sub

her indsætter du en docmd som vist - frmNavn er navnet på den form du vil åbne, kombo er navnet på din kombobox.

held og lykke ;o)
Niels

nih -> Når jeg har valgt id be'r den mig indtaste parameterværdi - ?

Kombo is the name of the combo box!

I know:

Private Sub Kommune_AfterUpdate()
    DoCmd.OpenForm "Adresse", , , "id = " & Me.Kommune
End Sub

If Kommune is a text field then it should look like this
DoCmd.OpenForm "Adresse", , , "id = '" & Me.Kommune & "'"

[id] er (skal være) et felt på formen adresse. (kollone overskrift på den tilhørende forespørgsel).

Det er vel ikke en parameterforespørgsel ??

Niels

Det kan også være fordi du i din foresp. henviser til en form du ikke har åben.

Niels