diff --git a/TrackAccessChanges.bas b/TrackAccessChanges.bas index cccf4a2..6ea8475 100644 --- a/TrackAccessChanges.bas +++ b/TrackAccessChanges.bas @@ -288,10 +288,11 @@ Public Sub ExportAllCode() If Sfx <> "" Then 'If Left(c.Name, 16) = "form_frm_product" Then c.Export _ - FileName:=CurrentProject.Path & "\" & _ + FileName:=CurrentProject.Path & "\" & filen & Sfx 'End If End If Next c -End Sub \ No newline at end of file +End Sub +'example change 1 \ No newline at end of file