:confused:
Hello I have a small DataBase with 4 forms (Access 2002)
1. frmMainMenu
2. frmAddEmployee
3. frmAddEmployeeRegion
4. frmEmployeeStatistic
The MainMenu calls the other 3, when I execute the mde file the only form opened is the frmAddEmployee! it should open the frmMainMenu because this one calls the others....! I've tried several times....the same result!
Any idea what I'm doing wrong?
Thank you
I,m trying to create mde file but a dreadful error mesage appeared :(
Here it is:
This error is usually associated with compiling a large database into an MDE file. Due to the method used to compile the database, a considerable number of TableID references are created for each table. The Microsoft Jet database engine version 4.0 can only create a maximum of 2048 open TableIDs at one time. Exporting a database as an MDE potentially can exceed this limit if the database has a large number of objects (table, macro, form, report, etc).
There is no accurate method to estimate the number of TableIDs the Jet database engine uses during the process of compiling a database as an MDE. However, each VBA module and each form uses one TableID, as a result, if the database has 500 forms, and each form's HasModule property is set to Yes, as many as 1,000 TableIDs are used.
My database is not AS LARGE. It has 1 table, 36 queries and forms.
Any idea how this could be avoided?
I am in Microsoft 2013 and using an .accde file. The problem is that the File menu and Home ribbon are still accessible, and the File menu can be used to change settings that will let the user get into the linked tables (on SQL Server).
View 2 Replies View RelatedI have the following code. In the Else part of the code, after the wb.Activate line, what code can I place here that will assign wb.Name to the objExcelApp object ao that when the line .Visible = False kicks in, it will make the already opened MS Excel file invisible.
Code:
Dim strExcelFile As String
Dim wb As Workbook
Set objExcelApp = GetObject(, "Excel.Application")
If objExcelApp Is Nothing Then
Set objExcelApp = CreateObject("Excel.Application")
objExcelApp.Workbooks.Open FileName:=strExcelFile
[code]...
;) Hey everybody,
I am working on a database used in recording device characteristics/test information. The main table of information has dozens of columns for test/part detailed information. When inputing the data for each specific test, many of the info. details are repeated when testing say 20 devices of the same part all at once. Rather than retype every piece of detailed information in every field, everytime, is there an easier way? Does anyone know of a way to make specific fields copy/paste the previous record's information in the fields automatically when a new record is created? Please, if anyone could help or has ANY ideas, let me know...
Thanks
gunwax
On my database I have a text box that accepts a map grid that starts with two letters. If the letters arnt within certain perameters then the box turns red and a message box appears informing the user of this. My probem is that I am using a continuous form and if one box goes red, they all go red if the grids are OK. my code is below, can anyone help?
Private Sub Grid_BeforeUpdate(Cancel As Integer)
If IsNull(Me.Grid) Then Exit Sub
If Me.Text289 = "UK" Then
Select Case Left(Me.Grid, 2)
Case "ST", "SY", "SU", "SZ"
Me.Grid.BackColor = 16777215
Case Else
MsgBox "Invalid Biagram for your chosen Database.", vbExclamation
Me.Grid.BackColor = 225
Cancel = True
End Select
End If
If Me.Text289 = "Germany" Then
Select Case Left(Me.Grid, 2)
Case "MB", "NB", "NC", "MC"
Me.Grid.BackColor = 16777215
Case Else
MsgBox "Invalid Biagram for your chosen Database.", vbExclamation
Me.Grid.BackColor = 225
Cancel = True
End Select
End If
If Me.Text289 = "Desert" Then
Select Case Left(Me.Grid, 2)
Case "NJ", "NH", "NK"
Me.Grid.BackColor = 16777215
Case Else
MsgBox "Invalid Biagram for your chosen Database.", vbExclamation
Me.Grid.BackColor = 225
Cancel = True
End Select
End If
End Sub
i developed a program and i used ms access for the database.
i compiled the program i made.
the question is, can i install the program i made into another computer eventhough it doesn't have a ms access? because i tried to install but it doesn't work at all. what do i need to do in order to make it work.
your response is greatly appreciated.
I recently upgraded a DB from 2003 to 2013 and ran into the following problem.
I have a button that opens a file dialog box and allows the user to upload a file to a predetermined location (and store the address as a hyperlink). I borrowed this code from someone else on here and modified it slightly.
In any case, the button still works, but now when it opens it doesn't have an option for "All files" under file types. So I can upload MS Office files, text files, etc., but not PDF files which are by far the most common types my users upload.
Private Sub Command35_Click()
Dim dd As Integer
Dim fileDump As FileDialog
Set fileDump = Application.FileDialog(msoFileDialogOpen)
dd = fileDump.Show
Dim Yourroute As String
Dim yourrouteName
Yourroute = fileDump.SelectedItems(1)
yourrouteName = StrReverse(Yourroute)
yourrouteName = StrReverse(Mid(yourrouteName, 1, InStr(yourrouteName, "") - 1))
FileCopy Yourroute, "us170fp00dataWBO_Tool_RoomDrawings" & yourrouteName
Me.Drawing_Link = yourrouteName & " # us170fp00dataWBO_Tool_RoomDrawings" & yourrouteName
End Sub
I often create contract using mail merge. I have an access file that I want to use as data source for word file. But it does not automatically.
Please download the attached file !
If there are 1 customer and 1 property, I do not need to do anything. Conversely, if there are many customers and many properties, I take time to manipulate.
Firstly, I open the word file. I have to copy and paste paragraphs that I want. Highlight of the original paragraphs is blue.
Secondly, I click 'Insert Word Field' -> select 'Next Record'.
In short, I wish to use VBA in access file to automatically perform the steps that I have outlined.
I've got the forms and queries in one .accdb file and my tables in a separate .accdb file. The forms file links to the tables in the tables file. The tables file resides in a folder called simply enough C:acc_tables and thats where i browsed to (obviously) when i set up the linkage.
One of the users does not wish (for whatever goddamn reason) to create a C:acc_tables file to stick the tables file in , and wants the tables file in some other folder.. Unfortunately this user does not have the skills to delete the existing links and re-link to the tables file after putting it in the folder he wants.
Where in the file that holds the forms and and queries do i find the path setting to the tables linked file? Can it be changed without deleting links and then re-linking?
hello,
I would like to automate something presently done on a one-by-one basis. Here: a number of text files(containing data) are to be exported into an MS Excel file, with each text file to occupy a different worksheet. Presently, the idea is to use the Data/import external data/import data feature of MS Excel for importing the text files one-by-one into newly created worksheets(within the same workbook).
I would appreciate some advice on how to go about creating a useful MS Access application to achieve the above. I have checked the available Macros in MS Access, but I could not find one to suit my purpose. can anyone pls assist, on how I can get started?
Tokunbo
Question: Is it possible, using VBA, to determine the actual Excel file type without opening the file?
I receive data files from other departments. Seems like every time someone changes their download structure, I end up with file types that do not match the download extension (example: xlm file with a xls extension). The files can't even be opened because of this. I think I can fix it if I could figure out how to determine what the file type really is.
I'm using Office 2010.
i had a database that allowed me from a form to store a file location for a record on a form, so i any time i could access the record, and then open the file, usually a pdf, it wasnt stored as a hyperlink, but as long text
i made the mistake of not copying the files for safe keeping when i got a permanent position..i am now back self employed, i need to recreate the database.
I recently upgraded a DB from 2003 to 2013 and ran into the following problem.
I have a button that opens a file dialog box and allows the user to upload a file to a predetermined location (and store the address as a hyperlink). I borrowed this code from someone else on here and modified it slightly.
In any case, the button still works, but now when it opens it doesn't have an option for "All files" under file types. So I can upload MS Office files, text files, etc., but not PDF files which are by far the most common types my users upload.
Here's my code and a screenshot is attached.
Private Sub Command35_Click()
Dim dd As Integer
Dim fileDump As FileDialog
Set fileDump = Application.FileDialog(msoFileDialogOpen)
dd = fileDump.Show
[Code] ....
I am using the following code to select files using Microsoft Office's file dialog:
Public Function fTestFilePicker() As String
Dim fdFileSelection As Office.FileDialog, lstrFileName As String
Const kInitialFile = "F:TestbedTest.txt"
Set fdFileSelection = Application.FileDialog(msoFileDialogFilePicker)
With fdFileSelection
.AllowMultiSelect = False
[Code] .....
When I execute it, the file picker goes to the right folder but does not highlight the file test.txt even though that file name shows in the File name text box. Is there any way to correct this?
I am not sure where to post this so could someone please move it to the appropriate area thanks.
I want to make a graph that will show how many employees are in the company for each year (Going back 10 years and keeping up to date) I have never done this before and our teacher feels that its best if we learn on our own (basicaly he's an idiot).
How do I go about using the pivot chart?
I have made a query which adds up the total number of employees at the current time.. but apart from that I havent a clue. I want the graph to have the years on the bottom and numbers up the side (1,2,3,4,5 etc) and then the number of employees that were in the company during that year will be plotted.
I will use a table that is to be used for archiving to mke the query as it will have all the employees who were ever in the system record.
The table is thus:
Employee_ID
Emp_First_Name
Emp_Surname
Age
Emp_Home_Number
Emp_Mobile_Number
Emp_Address_1
(so on and including postcode)
Date_Started
Position_ID
I have no idea what to do other than to rename the axes and change the increments, but they are jsut numbers, no dates or anything.
Any help apreciated.
Does anybody know if its possible to export data from Access into a "filename.LEX" file for use in MS Word?
If so - Do you have any idea what the fieldnames/file structure looks like.
I have tried oipening a .LEX file to check this out, but with no success.
Thanks
Hi guys,
I am having error message when I tried to make my mdb file to mde. The error message is "MS Access unable to create an MDE database". Reading through the help message it says that this problem always occurrs in trying to compile large db into MDE. So what can I do to solve this problem. Also what is MS access memory capacity. thanks
:mad:Is there anyway, I can tell who is making my backups. Is there any thing I can use to find out who is creating a backup. I have sent out emails to the users, but no one will confess who is doing yet. I have 200 users now. I have talk to our IT people, they mention it would take a lot of there time to track it down.
Does anyone know if there anything I can do?
Thanks
Hi!
I have a table called "products"
One column is "Unitary Price", another one is "Quantity" and another one is "Tax"
And I want another column called "Total" that shows:
Unitary Price*Quantity+Tax*Price*Quantity
Is this possible to be made?? :( I'm a bit newbie to MS Access, so try to explain as most detailed as you can! For example, if I have to write [Unitary Price] between brackets... I tried doing this on the "Default Value" field of the column but I couldn't make it.
Thank you!!
Luis
I'm trying to make totals in a query, but instead of using all, I need to leave one out, how to do that? for example the table looks like:
A 2 3
B 4 6
C 2 5
D 3 5
E 2 3
How can I leave row 1 out? So that the query will look like:
11 19
This is probably a stupid question but could you please tell me how i can set up a form in access to look similar to the one in the attached picture?
View 4 Replies View Relatedhi,
i'm trying to create a form for data input. When creating a new record, I want to make a field, "Date," to read from the last record and use that value as the default value. This way, I don't have to input the same date in every time I make a new record. How would I do this? Thanks =)
G
How can I make an OLE come up in the report as a photo or drawing instead of a link?
Can anyone help?
I need two reports made but I don't know the programming. The first report comes from a table that has contact numbers and their scan times. Their number comes from one column and their times come from another column in a table that i have. the time comes in this format 6/11/2007 3:46:40 AM. One report I need is those who just scaned in for that certain day. The second report is one to take their times and calculate how long they were scanned in per day, and per week. Is there any such way to do this and how would I.
View 12 Replies View RelatedGood evening,
I am trying to use VBA to address a field in three different subforms on a form. When I am in the VBA environment writing the code, I noticed that only two of the subforms are listed in the Project window on the upper left. I ignored that and wrote the code anyway, and when I execute the code, it works fine for the two subforms in the Project window, but when it gets to the third subform, it throws this error:
"MS Office Access can't find the field '|' referred to in your expression."
The code is this:
Private Sub Test_Number_AfterUpdate()
[Form_Consumables Entry].Test_Number.DefaultValue = [Form_Test Director Panel].Test_Number.Value
[Form_Squawk Entry].Test_Number.DefaultValue = [Form_Test Director Panel].Test_Number.Value
[Form_Event Log Entry].Test_Number.Value = [Form_Test Director Panel].Test_Number.Value
End Sub
Can anyone tell me how to make all of my forms available to VBA?
Thanks!
Erik