Just nu i M3-nätverket
Jump to content

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


Rophphe

Recommended Posts

Jag har en modul som jag vill komma åt koden i via en knapp i flera formulär. Modulen heter "Rensa_Ecl. Jag kör Access i Office 365.

hur kodar jag?

Link to comment
Share on other sites

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

 

 

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





 

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

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...