Every once in a while I need to use the same code I have in the Event Procedure of a one Control in another Forms Event Procedure, whether it be the On_Click event of a Command Button or the After_Update of a Combo Box.\u00a0 99% of the time I would just turn that into in Function or a Sub and drop it into a Module and done, I can now reuse it over and over with no issues.\u00a0 So why would I or anyone need to do this?\u00a0 Simple\u2026 the Users makes an update on a Subform and I need to refresh the Main Form and that code is specific to the Controls on that Form\/Subform, what easier way than to just reuse the code already available in an Event Procedure in another Form.\u00a0 (This happens about 1% of the time, if not less.\u00a0 It is not something I would recommend to do regularly.)\u00a0 Now, I could just copy\/paste it to the Subform but if I ever have to make a change I have to remember to hit both places!\u00a0 Leaving it where it is makes sense, now, I just need to change it in one place.<\/p>\n
So now, the specifics\u2026<\/p>\n
First and foremost, you must either remove the Private<\/strong> from in front of the Sub and\/or change it to Public<\/strong> but it\u2019s not necessary.\u00a0 I tend to change it to Public, only because if I need to find it I can use Find<\/strong> > Public Sub<\/strong> as a parameter finding it quickly.\u00a0 (Using Find<\/strong> > Sub<\/strong> will cause me to stop at every Event in every Module!)<\/p>\n Example\u2026 And the difference between Public Sub and Private Sub?\u00a0 Ken Sheridan explains it best…<\/p>\n Declaring a function in a standard module Public exposes it throughout the database, so it can be called from queries, forms, code in other modules, etc.\u00a0 Declaring a function in a standard module Private exposes it only within the module, so should be done where a function is called by another function or procedure in the same module, but not by anything outside the module.\u00a0\u00a0 The same name can be used for Private functions in different modules, but a Public function’s name must be distinct within the whole database.<\/p><\/blockquote>\n
\nWas Private<\/strong> Sub cboSearch_AfterUpdate changed to Public<\/strong> Sub cboSearch_AfterUpdate()<\/p>\n