Just nu i M3-nätverket
Jump to content

öppna en modul med en knapp i ett formulär


Rophphe
 Share

Recommended Posts

1) Öppna egenskaper för en knapp och skapa en händelse "Vid klickning" enligt bilden:

image.png.ea9a489235ed4376cbac87484ee058e5.png

 

2) Klicka på knappen med dom tre punkterna för att komma till funktionen
3) Ändra funktionen till följande kod

Private Sub btnOpenObject_Click()
    ' Öppna modul i designläge
    DoCmd.OpenModule "Rensa_Ecl"
End Sub

 

 

Edited by MickeF
Link to comment
Share on other sites

:) Modulen består av ett antal Function/Sub. Så du vill alltså köra en Sub eller anropa en Function.

 

Private Sub btnOpenObject_Click()
    ' Visa välkomstmeddelande
    valkomna "Micke"
End Sub

Om du har en Sub i Rensa_Ecl som t.ex ser ut så här:

Sub valkomna(personnamn AS String)
    Msgbox "Välkommen " & personnamn
End Sub





 

Edited by MickeF
Link to comment
Share on other sites

Ok, två saker du behöver göra:
1) Döp om modulen från "Rensa_Ecl" till t.ex. "Rensa Ecl Modul". (Modulnamn och function-namn får inte vara samma)
2) Sedan byter du ut anropet "

DoCmd.OpenModule "Rensa_Ecl"

till enbart

Rensa_Ecl

Sen borde det fungera.
       

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share



×
×
  • Create New...