Solved

Switching between form views using acCmdSubformDatasheet

Posted on 2009-07-01
8
1,076 Views
Last Modified: 2013-11-28
Hi,

Form:                  surveyGroup
Subform             survey
sub-subform       boatTransects

I have a button on the surveyGroup form that switches the view of 'survey' from data sheet to subform view.

The following code works, but when I click the mouse 'flashing cursor'  into a textbox on 'boatTransects' and the button is then clicked, the 'boatTransects' form toggles between subform view and datasheet view NOT the 'survey' form.

What I need to do is get the reference right so that the focus is always on the 'survey' form and therefore gets its view changed regardless of where the cursor is clicked on the other sub-subforms.

Thanks


Private Sub btnView_Click()

If Forms!surveyGroup.survey.Form.surveyTypeID.Value = 2 Then

  'MsgBox "is Land"

  Me.survey.Form.subform_boatTransects.Visible = False

  Me.survey.Form.subform_LandSightings.Visible = True

 

'Swaps the view 

   Me.survey.SetFocus

    DoCmd.RunCommand acCmdSubformDatasheet

    Me.surveyDate.SetFocus

Else

  'MsgBox "is Boat"

  Me.survey.Form.subform_boatTransects.Visible = True

  Me.survey.Form.subform_LandSightings.Visible = False

 

  'Swaps the view 

  Me.survey.SetFocus

  DoCmd.RunCommand acCmdSubformDatasheet

 Me.surveyDate.SetFocus

End If

End Sub

Open in new window

0
Comment
Question by:davecocks
  • 5
  • 3
8 Comments
 
LVL 39

Expert Comment

by:thenelson
ID: 24753514
try this:
  Me.surveyGroup.SetFocus
  Me.survey.SetFocus
  DoCmd.RunCommand acCmdSubformDatasheet
0
 
LVL 39

Expert Comment

by:thenelson
ID: 24753525
If that doesn't do it try this:
  Me.surveyGroup.SetFocus
  Me.survey.SetFocus
  Me.survey.Form.SetFocus
  DoCmd.RunCommand acCmdSubformDatasheet
0
 
LVL 1

Author Comment

by:davecocks
ID: 24761816
Hey,
Thanks for the reply.     I tried both but no joy.

access didin't like       Me.surveyGroup.Setfocus         (method or group not found)
I tried                          Forms!surveyGroup.Setfocus      (worked)

                                  Me.survey.Form.SetFocus      (run time error 2449 invalid method in expression)
I tried     Forms!surveyGroup.survey.Form.SetFocus   (run time error 2449 invalid method in expression)

That left        Forms!surveyGroup.SetFocus
                      Me.survey.SetFocus

Which worked but didn't solve the problem of of the other forms changing.  

Any other ideas?
0
 
LVL 39

Accepted Solution

by:
thenelson earned 500 total points
ID: 24761859
Me.surveyGroup.Setfocus   Oops, Sorry.   Me.Bad

1. Try setting the focus to a control in survey:
  Me.survey.SetFocus
  Me.survey!MyControl.SetFocus
  DoCmd.RunCommand acCmdSubformDatasheet

2. Is survey the name of the subform container or the name of the form in the container? If they have the same name, try changing the container to ctnSurvey and use
Me.ctnSurvey.SetFocus
DoCmd.RunCommand acCmdSubformDatasheet
0
What Should I Do With This Threat Intelligence?

Are you wondering if you actually need threat intelligence? The answer is yes. We explain the basics for creating useful threat intelligence.

 
LVL 39

Expert Comment

by:thenelson
ID: 24762056
I got it.  Place:
DoCmd.RunCommand acCmdSubformDatasheet
in the on enter event of the container for survey SubForm.  

So it only fires when You want it to create a public variable in the main form surveyGroup:

In surveyGroup:
Public CreateDataSheet As Boolean

In survey:
Private Sub ctnsurvey_Enter()
If CreateDataSheet Then DoCmd.RunCommand acCmdSubformDatasheet
CreateDataSheet = False
End Sub

In your Code:
CreateDataSheet = True
Me.survey.SetFocus



0
 
LVL 1

Author Closing Comment

by:davecocks
ID: 31598710
You.Great!!!   1) worked like a charm!!!!  That's brilliant thanks mate!
0
 
LVL 1

Author Comment

by:davecocks
ID: 24762113
Didn't refresh my web page fast enough!  Thanks for posting another solution as well !!
0
 
LVL 39

Expert Comment

by:thenelson
ID: 24762228
I ran into a problem with 1 so that's why I came up with another.

Also figured out what was going on. When you enter a subform, the control in it that last had focus still has the focus. When you clicked on the boatTransects subform, it's container got the focus in the subform. Clicking on the button changed the focus to surveyGroup main form but when you changed the forces to survey, the boatTransects subform container still had the focus within survey.

You're welcome.  Glad to help and thank you very much for the points with "A" grade!  It was a fun one!

Happy Computing!

Nelson
0

Featured Post

Top 6 Sources for Identifying Threat Actor TTPs

Understanding your enemy is essential. These six sources will help you identify the most popular threat actor tactics, techniques, and procedures (TTPs).

Join & Write a Comment

In the previous article, Using a Critera Form to Filter Records (http://www.experts-exchange.com/A_6069.html), the form was basically a data container storing user input, which queries and other database objects could read. The form had to remain op…
Introduction When developing Access applications, often we need to know whether an object exists.  This article presents a quick and reliable routine to determine if an object exists without that object being opened. If you wanted to inspect/ite…
Familiarize people with the process of utilizing SQL Server functions from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Ac…
In Microsoft Access, when working with VBA, learn some techniques for writing readable and easily maintained code.

708 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

14 Experts available now in Live!

Get 1:1 Help Now