[color=green]' In this Form...[/color]
Private Sub cmdTestIt_Click()
[color=green]' Call function FunctionInForm1() in Form Form1
' Form1 does not need to be open.[/color]
MsgBox Form_Form1.FunctionInForm1()
End Sub
[color=green]' In Form1[/color]
Public Function FunctionInForm1() As String
FunctionInForm1 = "Here in Form1"
End Function