Open Table From Switchboard

Nov 28, 2004

i'm creating a database which has several switchboards. i have several tables, each saved in the same format with the table name representing the date of the report, for example table 1 is saved as 100204(Oct 2, 2004), and table 2 is 100904, so on and so forth. I have a text box which a user needs to enter the date of the report they want to look at and i need to be able to open the desired table by date entered. I've had a couple of vb classes but haven't used it in a while. can anyone help? thx in advance.

View Replies


ADVERTISEMENT

Switchboard Open On Startup

Mar 8, 2006

Is there i way so that when you open up your database you can get your Switchboard to open up??? is there a simple box to click to make it do this that i am missing or is it some VB code?

Help please thanks alot
l33tskyline aka Chewstar

View 5 Replies View Related

Switchboard Doesn't Open

Oct 11, 2004

I know stupid question. When I open my database I want the switchboard to open automatically, but it doesn't. What do I do to fix this?

Thanks
Biz

View 2 Replies View Related

Using A Switchboard To Open A Form.

Nov 18, 2004

Ok, quick question.
I am using a switchboard to open my main form, 'frmJobLog'. This main form has a tab control with four tabs. How do open the form to the 4th tab using a command button on the switchboard?

Thanks in advance.

View 4 Replies View Related

Switchboard To Open New Blank Form...

May 30, 2006

Just curious. I'm trying to set up a switchboard to guide users to the right place in my database. I would like to have one button on the switchboard to open a standard form with all the infomation in it already. and then I would like to have a button to open a form that is blank and then adds to the previous form I mentioned.

Any help will be greatly appreciated.

View 2 Replies View Related

Possible To OPEN Switchboard Again When A Form Is Closed

Mar 15, 2013

I would like to have the Switchboard I created open when the database is selected. I used Tools/Startup to set this up. It works to a point. The database window opens and THEN the Switchboard opens (on top of the database window). There are some who I wish not to see the database navigation window). Also, is it possible to OPEN the switchboard again when a Form is closed?

View 1 Replies View Related

Open Filtered Form From Unbound Switchboard

Feb 3, 2005

I get the feeling I'm really missing something glaringly obvious here but I'm struggling.....

I have a combo box on my switchboard that looks up field txtOfficer in a query and then want it to open up a new form containing only those records relating to the officer name selectedtxtOfficer

The rowsource for the combo is:

SELECT DISTINCTROW [qryMain].[txtName] FROM [qryMain];

and the on click event is:

DoCmd.OpenForm "frmFiltered", , , "[txtName] = " & Me.cmbOfficer.Column(0), acFormEdit

When I select a name from the combo I get a parameter box and have to type in the name to open up the filtered records form. How can I get rid of it so the selection is one seamless process? :confused:

View 2 Replies View Related

How Can I Show Switchboard Only (i.e Access Doesn't Appear To Be Open)

Jul 19, 2005

Hi,
Does anyone know if I can just show the switchboard only so that it looks like a program, or if I can use an existing MDB to create an .exe??

View 2 Replies View Related

"Ambiguous Name Detected" - Switchboard Won't Open

Sep 27, 2005

Please help!

I've done a search of the forums, the results of which have more-or-less caused me to understand (roughly) what the problem might be and how to locate the code which is causing it. Sadly, I am a bit of a Visual Basic virgin, and I am reluctant to wade right in because if I screw up this database I'll have decimated my company's advertising and marketing strategy (mailouts!).

I was trying to make a command button on a switchboard (which I have done before, but not recently) -- and was taking a bit of a trial-and-error approach. I wanted the button to result in the previewing of a set of mailing labels (which the user would susbsequently print after reviewing). One of my first attempts resulted in the button automatically printing, so I "cut" it, and several close-but-no-cigar attempts follwed, all of which I used the "cut" command to dispose of. The last attempt I made resulted in the following message:
"The expression On Open you entered as the event property setting produced the following error: Ambiguous name detected: Bulletin_Board_labels_Click.
-The expression may not result in the name of a macro, the name of a user-defined function, or [Event Procedure].
-There may have been an error evaluating the function, event, or macro."

I "cut" the button I had just created and thought that might fix it. It didn't. I still got the above message whenever I tried to open either this switchboard or the main switchboard. I tried closing down Access and restarting it. Same message, same problem.

Below is the code from the switchboard in question -- the last few entries are the relevant ones: anything to do with "bulletin board" is stuff I was working on. As far as I can tell there are currently no duplicate queries, reports, macros, etc, named "Bulletin Board Labels" (theres is one query named "Bulletin Board Query", and one report named "Bulletin Board Mailout labels", and that's it.)

The code for the switchboard follows...

Please help me resolve this problem?

:confused:
Jennifer
_________________________________________

Option Compare Database
Option Explicit

Private Sub Command0_Click()
On Error GoTo Err_Command0_Click

Dim stDocName As String

stDocName = "All Art Galleries"
DoCmd.OpenReport stDocName, acPreview

Exit_Command0_Click:
Exit Sub

Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click

End Sub

Private Sub Command11_Click()

End Sub

Private Sub OLEUnbound22_Click()
Dim strInput As String
strInput = "help.html"
Application.FollowHyperlink strInput, , True
End Sub

Private Sub University_Bigwigs_Click()
On Error GoTo Err_University_Bigwigs_Click

Dim stDocName As String

stDocName = "University Bigwigs Query (VP's, Deans, etc)"
DoCmd.OpenReport stDocName, acPreview

Exit_University_Bigwigs_Click:
Exit Sub

Err_University_Bigwigs_Click:
MsgBox Err.Description
Resume Exit_University_Bigwigs_Click

End Sub
Private Sub Command13_Click()
On Error GoTo Err_Command13_Click

Dim stDocName As String

stDocName = "Invitation Destination Report"
DoCmd.OpenReport stDocName, acPreview

Exit_Command13_Click:
Exit Sub

Err_Command13_Click:
MsgBox Err.Description
Resume Exit_Command13_Click

End Sub
Private Sub Main_Click()
On Error GoTo Err_Main_Click


DoCmd.Close

Exit_Main_Click:
Exit Sub

Err_Main_Click:
MsgBox Err.Description
Resume Exit_Main_Click

End Sub
Private Sub Help__Click()
On Error GoTo Err_Help__Click

Dim stAppName As String

stAppName = "C:AEAC Mailing list Databasehelp.html"
Call Shell(stAppName, 1)

Exit_Help__Click:
Exit Sub

Err_Help__Click:
MsgBox Err.Description
Resume Exit_Help__Click

End Sub
Private Sub Ref_List_Click()
On Error GoTo Err_Ref_List_Click

Dim stDocName As String

stDocName = "Category/Destination/Receive"
DoCmd.OpenReport stDocName, acPreview

Exit_Ref_List_Click:
Exit Sub

Err_Ref_List_Click:
MsgBox Err.Description
Resume Exit_Ref_List_Click

End Sub
Private Sub Campus_Coverage_Click()
On Error GoTo Err_Campus_Coverage_Click

Dim stDocName As String

stDocName = "Campus Coverage Report"
DoCmd.OpenReport stDocName, acPreview

Exit_Campus_Coverage_Click:
Exit Sub

Err_Campus_Coverage_Click:
MsgBox Err.Description
Resume Exit_Campus_Coverage_Click

End Sub
Private Sub Flyer_Report_Click()
On Error GoTo Err_Flyer_Report_Click

Dim stDocName As String

stDocName = "Flyer Destination Report"
DoCmd.OpenReport stDocName, acPreview

Exit_Flyer_Report_Click:
Exit Sub

Err_Flyer_Report_Click:
MsgBox Err.Description
Resume Exit_Flyer_Report_Click

End Sub
Private Sub Poster_Destination_List_Click()
On Error GoTo Err_Poster_Destination_List_Click

Dim stDocName As String

stDocName = "Poster Destination Report"
DoCmd.OpenReport stDocName, acPreview

Exit_Poster_Destination_List_Click:
Exit Sub

Err_Poster_Destination_List_Click:
MsgBox Err.Description
Resume Exit_Poster_Destination_List_Click

End Sub
Private Sub Currents_Destination_List_Click()
On Error GoTo Err_Currents_Destination_List_Click

Dim stDocName As String

stDocName = "Currents Destination Report"
DoCmd.OpenReport stDocName, acPreview

Exit_Currents_Destination_List_Click:
Exit Sub

Err_Currents_Destination_List_Click:
MsgBox Err.Description
Resume Exit_Currents_Destination_List_Click

End Sub
Private Sub Catalogue_Destination_Click()
On Error GoTo Err_Catalogue_Destination_Click

Dim stDocName As String

stDocName = "Catalogue Destination Report"
DoCmd.OpenReport stDocName, acPreview

Exit_Catalogue_Destination_Click:
Exit Sub

Err_Catalogue_Destination_Click:
MsgBox Err.Description
Resume Exit_Catalogue_Destination_Click

End Sub
Private Sub FlyerMultCopiesButton_Click()
On Error GoTo Err_FlyerMultCopiesButton_Click

Dim stDocName As String

stDocName = "Flyer Multiple Copies Report"
DoCmd.OpenReport stDocName, acPreview

Exit_FlyerMultCopiesButton_Click:
Exit Sub

Err_FlyerMultCopiesButton_Click:
MsgBox Err.Description
Resume Exit_FlyerMultCopiesButton_Click

End Sub
Private Sub InvitatMultCopButton_Click()
On Error GoTo Err_InvitatMultCopButton_Click

Dim stDocName As String

stDocName = "Invitation Multiple Copies Report"
DoCmd.OpenReport stDocName, acPreview

Exit_InvitatMultCopButton_Click:
Exit Sub

Err_InvitatMultCopButton_Click:
MsgBox Err.Description
Resume Exit_InvitatMultCopButton_Click

End Sub
Private Sub CampFlyMultCopButton_Click()
On Error GoTo Err_CampFlyMultCopButton_Click

Dim stDocName As String

stDocName = "Campus Flyer Multiple Copies Query"
DoCmd.OpenReport stDocName, acPreview

Exit_CampFlyMultCopButton_Click:
Exit Sub

Err_CampFlyMultCopButton_Click:
MsgBox Err.Description
Resume Exit_CampFlyMultCopButton_Click

End Sub
Private Sub PostMultCopButton_Click()
On Error GoTo Err_PostMultCopButton_Click

Dim stDocName As String

stDocName = "Poster Multiple Copies Report"
DoCmd.OpenReport stDocName, acPreview

Exit_PostMultCopButton_Click:
Exit Sub

Err_PostMultCopButton_Click:
MsgBox Err.Description
Resume Exit_PostMultCopButton_Click

End Sub
Private Sub Bulletin_Board_labels_Click()
On Error GoTo Err_Bulletin_Board_labels_Click

Dim stDocName As String

stDocName = "Bulletin Board Mailout Labels"
DoCmd.OpenReport stDocName, acNormal

Exit_Bulletin_Board_labels_Click:
Exit Sub

Err_Bulletin_Board_labels_Click:
MsgBox Err.Description
Resume Exit_Bulletin_Board_labels_Click

End Sub
Private Sub Bulletin_Board_labels_Click()
On Error GoTo Err_Bulletin_Board_labels_Click

Dim stDocName As String

stDocName = "Bulletin Board Mailout Labels"
DoCmd.OpenReport stDocName, acPreview

Exit_Bulletin_Board_labels_Click:
Exit Sub

Err_Bulletin_Board_labels_Click:
MsgBox Err.Description
Resume Exit_Bulletin_Board_labels_Click

End Sub
Private Sub Command57_Click()
On Error GoTo Err_Command57_Click


Screen.PreviousControl.SetFocus
DoCmd.FindNext

Exit_Command57_Click:
Exit Sub

Err_Command57_Click:
MsgBox Err.Description
Resume Exit_Command57_Click

End Sub
Private Sub Command58_Click()
On Error GoTo Err_Command58_Click

Dim stDocName As String

stDocName = "Bulletin Board Mailout Labels"
DoCmd.OpenReport stDocName, acPreview

Exit_Command58_Click:
Exit Sub

Err_Command58_Click:
MsgBox Err.Description
Resume Exit_Command58_Click

End Sub

View 5 Replies View Related

Adding Data Into A Table Via A Switchboard

Mar 11, 2006

I was wondering if it was possible to do this, currently if I need to add a new record, I have to add it all in the tables section, this works fine but would be easier if it could be done through the switchoard somehow.

View 4 Replies View Related

Linking From Switchboard To Switchboard On Two Or More Databases

Nov 21, 2006

I am working on a database that will be an addition to an existing one on the company server. However, to make the overall layout not so complex and allow room for other additions in the future, I'd like to keep the databases separate. This will also ensure more efficiency, integrity and troubleshooting overall.

I have the original database with the name of "Cell MFG Screen" that contains a switchboard. I am now creating a db to keep track of manufacturing waste (which will also be on the same server when completed). That switchboard is called "Cell Waste Weight". Again, I want to keep these db's separated from one another as well being able to add future dbs. Now, what my plan is to make up a one db that consists of only a switchboard that will be used as the main switchboard to be able to navigate to other dbs that are located on the server.

Does anyone know how this is done?

Thank you in advance for your help,

~Kilch

View 10 Replies View Related

General :: Error Reading Switchboard Items Table

Jun 26, 2013

I have two options on the main switchboard page and when I click on the second option it goes to a secondary page that gives me 3 options with the third option being to return to the main screen. When I select that option it does go back to the main screen but then on the main screen it shows the return to main screen option as well and when I select it.... it says " There was an error reading the switchboard items table." But I want the main screen to only show the original two options only.

View 1 Replies View Related

Making Form Open With Data From A Table Based On Date And Time In Table?

Sep 12, 2014

How to make a form open with data from a table based on a date and time in the/a table?

View 7 Replies View Related

Open Certain Table

Apr 8, 2007

Hi.I'm new to Access. I'd like to know how can I choose which table/form will open when I open the MS Access file from my desktop? And can I change it in the future? I have Office 2007.Regards,Kirret

View 2 Replies View Related

Can Not Open Table

Oct 11, 2005

I have never seen something like this. I am not able to open any table in Access ... Every time I clicked on table I have message "Unknown"

Does anybody have idea why I have this problem???

View 5 Replies View Related

Edit A Table Using DAO, PLEASE OPEN

Mar 12, 2007

Hi, I have a form called Edit Column, which contains two text boxes: ID and Description. The user types something in these two boxes and presses a button, and this button should take the value of ID and edit description for that particular ID in the table "Map". Here is the code I have written for it:

Dim d As Database
Set d = CurrentDb
Dim r As Recordset
Set r = d.OpenRecordset("Map")

r.MoveFirst
If r! = Me.Text1 Then [I]('Text1 is the text box where the user enters an ID)
Do While Not r.EOF
r.Edit
r![Description] = Me.Text3
r.Update
r.MoveNext
Loop
MsgBox "Successful", vbInformation
Else
MsgBox "This column does not exist in the Store", vbCritical
End If


Thanx in Advance

View 1 Replies View Related

Open Table On Startup

Aug 29, 2006

Is there any way that anyone knows to have a table open on startup? I am not using a form, because the nature of this database is easier to use with a table. And I can't use Excel because I need reports out of the data.

Having said that, I have some users who may be partially Access-illiterate, and it would be easier to have them work on a table that opened for them. Any clues?

Lisa

View 4 Replies View Related

Use Combo Box Selection To Open The Table

Feb 17, 2005

I have created a combo box with the values I need from a table. Once I select the correct record from the drop down box I'd like to be able to open the table with just that one record being displayed. Thanks for your help.

View 3 Replies View Related

Control Button To Open Table.

Jul 26, 2005

the wizard does not have a button to open tables...i have been using this code to open forms...what needs to be changed in order to make it open tables?

Private Sub Command5_Click()
On Error GoTo Err_Command5_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "intakeMatrix"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command5_Click:
Exit Sub

Err_Command5_Click:
MsgBox Err.Description
Resume Exit_Command5_Click

End Sub

View 1 Replies View Related

Using Command Button To Open Table

Aug 26, 2005

Dear All:

I would like to use a command button on a form to open a table. The name of the table is called "MAJORCODE"

Any suggestions?

Many thanks,

Dion

View 5 Replies View Related

Tables :: Open Table From Query

Sep 12, 2014

I have a query that lists all tables within my access database.what i want it to be able to click the table name from the query list.for example my query list is:

Rawdata
Outcomes
Reporter
Tracker

how would I click on Tracker and open in up the tracker table? is it something like

stdocname = "tablename"
docmd.opentable, stdocname, opentable, acnormal , ," [tablename] = " & me.tablename?

View 3 Replies View Related

Tables :: Open Table As Read Only

Jun 27, 2013

I want to be able to open a Table as Read Only, so that a user can browse etc., but neither alter nor enter data - I want them to use the Forms for that. How then, using VBA code, do you open a Table as Read Only?

View 14 Replies View Related

Table Exclusively Open By Another User Problem

Jun 27, 2006

i have a form that uses a text box to search through my bookings, and when the user double clicks on the record in the listbox it loads that record in my main booking form..

this works fine. the problem is this..

i will search and find a record using the text filter.. i will double click on the record and it loads in the booking form.

i then close the booking form, and the search form is still open in the background..

if i then click on another record in the search form, i get this message..

runtime error 3008, the table bookings is already opened exclusively by another user... etc

below is the code in my search form, is there anyway it can be edited to make sure this doesnt happen.


Option Compare Database
Option Explicit


Private Sub QuickSearch_DblClick(Cancel As Integer)
DoCmd.OpenForm "newBOOKINGS", , , "[bookingid] = " & Me![QuickSearch].Column(0)
End Sub

Private Sub Search_Change()
Dim vSearchString As String

vSearchString = Search.Text
Search2.Value = vSearchString
Me.QuickSearch.Requery

End Sub

Private Sub QuickSearch_AfterUpdate()

DoCmd.Requery
Me.RecordsetClone.FindFirst "[bookingid] = '" & Me![QuickSearch] & "'"
If Not Me.RecordsetClone.NoMatch Then
Me.Bookmark = Me.RecordsetClone.Bookmark
Else
MsgBox "Could not locate [" & Me![QuickSearch] & "]"
End If

End Sub

View 3 Replies View Related

Make New Table In Front End When Back End Is Open

Jul 2, 2007

I have a Front End Database and a Back End Database.

Certain tables in the BE are linked to the FE.

Once or twice a day I need to run Make Table Queries in the FE, but I am unable to do so if someone else has the BE open.

Best solution would be greatly appreciated

Many thanks

John

View 8 Replies View Related

Open Blank Form When Connected To Table?

Mar 21, 2005

I have a form that is connected to a table - when I open the form it loads the first record in the table. How can I make it open a blank form, ready to add a new record?

View 1 Replies View Related

Check To See If A Table Is Already Open On A Click Event

Feb 4, 2005

Some of the things that bring me screeching halt really surprise me. I swear, this sounds like it should be so easy....

What I need to do is check, when the user clicks on a button, whether a specific table that is going to be modified/deleted later in the click code is already open. If it is open, I will msgbox the user to close the table first and exit the sub.

Any ideas?

All help, as always, is much appreciated!

John

View 4 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved