Search results

I apologise if I am being stupid, but this is the first time I have triend tis and I can't get it to work Sub CreateTableTestTable() Dim dbs As Database Set dbs = OpenDatabase("C:\Program Files\em\EM_UoM_ENRep.mdb") dbs.Execute "CREATE TABLE TestTable" _ & "(Mnemonic...

I have a bar chart, which I would like to have formatted with either of the following 1) the bars for saturday and sundays are in a differnt colour or 2) the date shown on the axis for saturdays and sundays are in a different colour Any help much appreciated Thanks Geoff

"One day I'll actuallywork out what all the different syntax are" I have a Query which has three fields Date - Date Format Time - Date Format Present_Reading - Number I have added a fourth field Previous_Reading which is the following formula Previous_Reading...

I've done it DMax("[Present_Date]","All Electricity Data","[Point_Id] = " & [Points].[Id] & " And [Present_Date] < #" & Format([Present_Date],"mm/dd/yyyy") & "#") Geoff

Here's the file

I've sort of got it to work using Previous_Date: DMax("[Present_Date]","All Electricity Data","[Point_Id] = " & [Points].[Id] & " And [Present_Date] < #" & [Present_Date] & "#") About 60% of the records returned are correct but there are a few which aren't and I can't see a pattern to it I...

I have the following Query SELECT Points.Id, Points.Location, [All Electricity Data].Present_Date, [All Electricity Data].Units FROM Points INNER JOIN [All Electricity Data] ON Points.Id = [All Electricity Data].Point_Id WHERE ((([All Electricity Data].Direct)="D")) ORDER BY Points.Location...

Thanks Jon You learn something new every day Geoff

use the unmatched query wizard that will make it alot easier for you

Could you not use an unmatched query, show records which do not appear in one table but appear in the other. Geoff

I have the following criteria in a query but it won't work IIf([Forms]![Report Criteria Selection]![Sub-Group_Selection]="Gas (All Sites) & Water (All Sites)",Like "Direct Reading - Gas*" Or Like "Direct Reading - Water*",Like [Forms]![Report Criteria Selection]![Sub-Group_Selection]) When I...

I'm using the following code to send a report using Outllook and Access 97 DoCmd.SendObject acReport, "All_Direct_Reading_Sheets", "SnapshotFormat(*.snp)", "geoff.codd@man.ac.uk", "", "", "Meter Readings", "Please read", True, "" Everything seems to be working fine until it brings up a screen...

I have the following query SELECT [Central_Budget_Utilities_Data_(Present)_Grouped_(Temp)].Utility_Type, [Central_Budget_Utilities_Data_(Present)_Grouped_(Temp)].Period, [Central_Budget_Utilities_Data_(Present)_Grouped_(Temp)].SumOfCost...

I'm having a problem using the send object command in VBA as our e-mail system is pegasus and not outlook, has anyone else used non microsoft e-mail package with any luck. All help greatfully received Thanks Geoff

I'm trying to run the following code in a module, but can't get my head round it. INSERT INTO DataWater ( Point_Id, [Date], Direct ) SELECT Direct_Reading_Meters_Without_Reading.Id, [Forms]![Report Criteria Selection]![Start_Date] AS [Date], "D" AS Direct FROM...

Cheers Colin, I've worked out that it has something to do with database being converted from 2k to 97 and there being a missing reference somewhere, I imported all the objects into a fresh database and it now works what a pain. Geoff

I have the following calculation which is placed in a text box on my report, I've used it before and it work but now all I get is "The expreesion you have entered contains invalid syntax or you need to enclose your text data in quotes" =DateAdd("d", -1, Format("01/" & Format(DateAdd("m"...

In your criteria enter Between [Enter Start Date] And [Enter End Date] Geoff

This is going to take a genius to work out, what I am trying to to is create a query showing apportioned data. The query I currently have returns the following information FName BName DName Dates Cons Medicine Coupland Dental 31/08/01 8160 Medicine Coupland...

I'm using A97 and I'm trying to do someting that I've done a hundred times before in A2k, but for some reason it won't work. Any ideas would be a great help Here's the code Option Compare Database Option Explicit Private Sub Report_Open(Cancel As Integer) If...