How to create a datasheet toggle button

[tobydobo]

Hello,



I have a contact list db that displays in datasheet view on startup. I also have an alternate form that displays in datasheet mode that i want to be able to toggle to with a click of a button. I would like the button to appear at the top of the default datasheet form, that will allow a user to toggle to the alternate form when they need to. Any ideas?

[June7]

Buttons don't display with Datasheet view. Can use Continuous view and arrange controls to appear like datasheet.

[orange]

You can try something like
DoCmd.RunCommand acCmdView and

DoCmd.RunCommand acCmdDatasheetView

[June7]

I did a test. Click toggle to go from FormView to DatasheetView, the toggle button is no longer available.

Not acCmdView, it is acCmdFormView

[tobydobo]

hmm...i may have used the wrong term to describe the form type. My default view is a fullscreen docked type form, showing a list of my contacts. I assumed that was called a datasheet view, but I may be wrong. I just want to be able to instantly switch to a alternate form with the click of a button. Hope that clarifies.

[June7]

Doesn't matter if full screen, docked, tabbed, or overlapping form. Form in Continuous or Single view and buttons are available. Switch to Datasheet view and buttons no longer available. Controls can be arranged in Continuous view to look like a datasheet. Default View property of form sets the view form opens as.

[tobydobo]

Ok so could u show me how to toggle to my alternate continuous form using a button command? I want the button to switch forms not just launch a new form; thusly hiding the previous form when the button is pressed, and vice versa.

[June7]

Unfortuntely, doesn't appear to be an acCmdContinuousView parameter.

Could use a button to switch to datasheet view then a double click on datasheet to return to form view. Code like:

Private Sub Command8_Click()
DoCmd.RunCommand acCmdDatasheetView
End Sub

Private Sub Form_DblClick(Cancel As Integer)
DoCmd.RunCommand acCmdFormView
End Sub