So I have created a form that is pinned like a dock centered on top of the screen with icons that open different web based software. I have played with it quite a bit and I feel maybe I've just been staring for too long.
The first click works fine, secondary form loads no issues, however I want the form.visible=false after the second click(remain running) and then with the third click it comes back up as it was when it was sent away. This is what I'm playing with now and when you click the second time it just pulls the window to the front like it's only running the first part. Still learning so take it easy on me :P
Code:
Private Sub Auto_Logo2_Click()
DoCmd.OpenForm FormName:="FRMxOutlook"
If CurrentProject.AllForms("FRMxOutlook").IsLoaded Then
Forms!FRMxOutlook.Visible = True
ElseIf Forms!FRMxOutlook.Visible = True Then
Forms!FRMxOutlook.Visible = False
End If
End Sub
and I played with
Code:
Private Sub Auto_Logo2_Click()
DoCmd.OpenForm FormName:="FRMxOutlook"
If CurrentProject.AllForms("FRMxOutlook").IsLoaded And Forms!FRMxOutlook.Visible = False Then
Forms!FRMxOutlook.Visible = True
ElseIf CurrentProject.AllForms("FRMxOutlook").IsLoaded And Forms!FRMxOutlook.Visible = True Then
Forms!FRMxOutlook.Visible = False
End If
End Sub