Code to insert Code
Public Sub EventProcedure_Insert()
On Error GoTo Error_Handler
Dim Frm As Form, mde As Module, obj As Object
Dim strForm As String
Dim strTarget As String, strCode As String, strEnd As String
Dim lngStartLine As Long, lngStartColumn As Long, lngEndLine As Long, lngEndColumn...