In a tab control on one of my forms I want to record who is entering what page, (this is in order that we know what is being used and to build a faster form where data of highest priority loads on first open
On experimenting with the events of each page in the tab control
On mouse move...
This will send table or query to named spreadsheet
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "YourTableOrQuery", "C:\YourFolder\YourSpreadsheet.xls"
This here
DoCmd.OutputTo acOutputQuery, "YourQuery", acFormatXLS
will output prompting the user for where to save
Jimmy
Try following if the event is on sub form
Me.Detail.BackColor = 13882281
Me.FormFooter.BackColor = 13882281
Me.FormHeader.BackColor = 13882281
Hope this helps
Jimmy
Assuming buttons in your option group have data values 1, 2 & 3
You could use a select case statement in the after update even of your option group
Select Case Me.YourOptionGroup
Case 1
Me.YourComboBox.RowSource = "Table1"
Case 1
Me.YourComboBox.RowSource =...
What email client are you using, I ask this as SendObject is best used with a query or report with you database and is not email client specific
If you are using Outlook then something like this would do
Dim objOutlook As Outlook.Application
Dim objEmail As Outlook.MailItem...
Perhaps rather than navigating with the scroll bar you could use the tab control with multiple pages, then users would see where they are navigating to
Jimmy
Make sure you have the Form Design tool bar, also make sure that your required field is contained in the SQL for the forms record source.
You should the find the field list button for you to drag and drop the required field
Jimmy
This could be done with 2 adjacent text boxes
In the left hand box have your mathematical operator as the result of an If Then Else statement
On the right hand text box have the value
Then use conditional formating on the left hand box
EG > = red
<= blue or whatever
Cheers
Jimmy
Add the line
Me.YourSubForm.Requery
for each subform
after the append queries
Or put the TAG RequerySubForm on each subform ,and put this code in the after update event of your combo
Dim CTL As Control
For Each CTL In Me.Controls
If CTL.Tag Like "*" & "RequerySubForm" & "*" Then...
Duane
Thanks for that link
I'll check it out
One thing I think ill look at is sending an mdb file with all tables forms & queries as an email attachment.
I'm sure I can find the code somewhere on Tek Tips to zip an mdb ready for attachment to an outlook email
Thanks
Jimmy
I am building a database viewer for customer, Customers will have their own cut down version of the database with their a copy of the data emailed to them
I want to email the data daily as a multi tab xls spreadsheet, to do this I wish to
1. use FileCopy to get blank version of spreadsheet...
Dawn
do not add data direct on a bound form use DAO. this here is a good example http://www.rogersaccesslibrary.com/forum/forum_posts.asp?TID=374
Also prior to adding data use an if then else with a dcount
If DCount("*","YourTableName","[NewSurname] = " & forms!YourForm!NewSurnameTextBox)...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.