title image


Smiley function von formular nach modul
Function farben_setzen()

Dim ctl As Control, farbe As Long

farbe = RGB(192, 192, 192) 'Farbe grau



For Each ctl In Me.Controls

If TypeOf ctl Is TextBox Then

If ctl.Enabled = False Then

ctl.Locked = True

ctl.BackColor = farbe

End If

End If

Next ctl

End Function





wenn ich diese function nicht in dem Formular selbst drin stehen ahben möchte, sondern in einem modul, wie muss ich dann die function aus dem formular aufrufen? und was muss ich in der function ändern, damit es funzt?

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: