Ja, wenn Du sie immer vom selben Formular aus aufrufst, dann einfach in diesem Formular das in eine Funktion geschrieben und aufrufen, wenn Du es brauchst.
Zum Beispiel:

Private Sub Color_change()
    Me.InventarNr.Locked = True
    Me.InventarNr.BackColor = 12632256
    Me.InventarNr.ForeColor = 4934475
    Me.tbl_Hersteller_ID.Locked = True
    Me.tbl_Hersteller_ID.BackColor = 12632256
    Me.tbl_Hersteller_ID.ForeColor = 4934475
    Me.tbl_Modell_ID.Locked = True
    Me.tbl_Modell_ID.BackColor = 12632256
    Me.tbl_Modell_ID.ForeColor = 4934475
End Sub

Und dann einfach an den Stellen, wo Du es aufrufen willst

call Color_change

aufrufen.

Willst Du aber von einer anderen Stelle aus aufrufen, dann musst Du das 'me' ändern und in ein Modul eine Function schreiben, keine Sub, also bitte etwas genauer sagen was Du ausprobiert hast und was nicht funktioniert.

Gruß Marie

Danke funktioniert soweit ich es brauche herrvorragend :-)
lg
andi