G Guest Apr 4, 2005 #1 Hello, Is their a way to Open the same Form more than once at the same time ? Thank you, Jeff
A Arvin Meyer Apr 4, 2005 #2 Jeff said: Hello, Is their a way to Open the same Form more than once at the same time ? Click to expand... In a command button's click event, something like: Static colForms As New Collection colForms.Add New Form_frmMyFormName colForms.Item(colForms.Count).Visible = True -- Arvin Meyer, MCP, MVP Microsoft Access Free Access downloads: http://www.datastrat.com http://www.mvps.org/access
Jeff said: Hello, Is their a way to Open the same Form more than once at the same time ? Click to expand... In a command button's click event, something like: Static colForms As New Collection colForms.Add New Form_frmMyFormName colForms.Item(colForms.Count).Visible = True -- Arvin Meyer, MCP, MVP Microsoft Access Free Access downloads: http://www.datastrat.com http://www.mvps.org/access
? =?iso-8859-1?Q?J=F6rg_Ackermann?= Apr 4, 2005 #3 Jeff said: Is their a way to Open the same Form more than once at the same time ? Click to expand... Shure... Create a form and call it frmTest Insert some VBA-Code to create a form-module. in a standard-module write: Option Explicit Public f1 As Form, _ f2 As Form, _ f3 As Form Sub Test() Set f1 = New Form_Formular1 Set f2 = New Form_Formular1 Set f3 = New Form_Formular1 f1.Visible = True DoCmd.MoveSize 100, 100 f2.Visible = True DoCmd.MoveSize 200, 200 f3.Visible = True DoCmd.MoveSize 300, 300 End Sub run sub Test() it will open the form three times. Note: In frmTest you have to set the 'HasModule' property to 'yes', if there is no code in it.
Jeff said: Is their a way to Open the same Form more than once at the same time ? Click to expand... Shure... Create a form and call it frmTest Insert some VBA-Code to create a form-module. in a standard-module write: Option Explicit Public f1 As Form, _ f2 As Form, _ f3 As Form Sub Test() Set f1 = New Form_Formular1 Set f2 = New Form_Formular1 Set f3 = New Form_Formular1 f1.Visible = True DoCmd.MoveSize 100, 100 f2.Visible = True DoCmd.MoveSize 200, 200 f3.Visible = True DoCmd.MoveSize 300, 300 End Sub run sub Test() it will open the form three times. Note: In frmTest you have to set the 'HasModule' property to 'yes', if there is no code in it.