Search results

I've got the following code Private Sub Sendemail_Click() Dim rsEmail As DAO.Recordset Dim strEmail As String Set rsEmail = CurrentDb.OpenRecordset("Bulk E-Mail") Do While Not rsEmail.EOF strEmail = rsEmail.Fields("E-Mail Address").Value DoCmd.SendObject , , , strEmail, , , Me!Subject...

i think you are meant to upate to = Null and not = Is Null Worth a try

I have the following SQL to create a chart SELECT (Format([Month],"mmm"" '""yy")) AS Expr1, Sum([Est v Act (All Companies & All Months)].Actual) AS SumOfActual, Sum([Est v Act (All Companies & All Months)].Estimated) AS SumOfEstimated FROM [Est v Act (All Companies & All Months)] GROUP BY...

Thanks Harry it works great in the end i just put in Me![First Full Billing Month] = DateAdd("d", -1, Format("01/" & Format(DateAdd("m", 1, Me![First Full Billing Month]), "mm/yy"), "dd/mm/yy"))

I'm looking for some code that will automaticall convert the inputted date the last day of the month Example User enters 13/03/02 code converts it to 31/03/02 Thanks in advance Geoff

NETWORKDAYS Returns the number of whole working days between a start and end date, excluding weekends and any identified holidays. If this function returns the #NAME? error value, you may need to install msowcf.dll. Syntax NETWORKDAYS(start_date,end_date,holidays) Start_date is a date that...

check out the datediff function under help

go this from help i tried it out and it worked fine When a delete query contains more than one table, such as a query that deletes duplicate records from one of the tables, the query’s UniqueRecords property must be set to Yes. For more information on setting the UniqueRecords property, click ...

ignore my last post as that won't work either, there is a way to do it i'm just struggling to work it ou

sorry my fault, because you unmatched query is based on 2 tables access does't know what table to delete from, the soulution is to create a delete query based on the unmatched query. and just select the unique id field which is contained in the main table

if you have created the report from a query then enter =Now() in the criteria of the date field, or if it's based on a table click on the reports property and under the data tab type the following in the filter property =[Name of Date Field]=Now()

there must be a field in you table which is the primary key (Only unique records can be entered), one of the previous 6 records has the same unique ID as the seventh record you are trying to enter. so either remove the primary key or enter a unique value

if i understand you correctly you have a query showing the records you want to keep from the table. if you save this and create an unmatched query from the wizard using the table as one source and the query as the second source it should give you a list of records not in the query. you can then...

look for union query under help this allows you to combine the data from 2 seperate tables into one if the fields are the same

Try this if isnull (cmbContract) then msgbox "the contract number has not been selected" else Enter the procedure that should take place if a value is selected exit sub end if

there is several ways to do this but the way i like is to set the combo box to invisible on form load and to visible on check box tick the code you want is on form load enter if me!checkboxname = 0 then me!comboboxname.visible = false else me!comboboxname.visible = true endif then for the...

i've got a combo box which has 27,000 entries i doubt you'll have many more than that

Add another field to your query and enter Month Sold: Format([DateOfSale],"mmmm 'yy") this will convert the date of sale to the month of sale with the year ie April '02 Now you can group by this field as well, so your query should now show no. of cars sold by salesperson and month. For the...

I use the following code for my calender it means you van close it without selecting a date Private Sub TglDateReceived_Click() If Me!ActiveXCtlDateReceived.Visible = True Then Me!ActiveXCtlDateReceived.Visible = False Else Me!ActiveXCtlDateReceived.Visible = True End If...

Post Code (A), is filtered from a royal mail list depending on town/City and County selected Example, My Town is Partington which filters the County down to Greater Manchester which then filters the Post Code (A) to M31, the user then inputs the Post Code (B) part. This stops human error, it's...