Search results for query: *

Hi traingamer, Many thanks for your reply. Tried your code, but it comes up with this error "Loop without Do" (Compile Error) Not sure what to do next.. Regards, kp

Hi all, I need some help in wrting this bit of code please. On a continous form I have a check box which is used to mark off payments. (PD) The are times when payments have to be reversed. i have put an unbound checkbox in the footer (Cancel) with this code; If Cancel Then If Cancel Then...

Hi the Aceman1 Many thanks for your reply. Had to give u a star for this one. It works great, but is it possible to be able to modify the code so that the second month using condtional formatting can be set up. So that the second month entries can have a different condtional formatting...

Hi In our Db there is a continous form that has a start date to show schedules for clients. The schedules can vary from one month to several months. What I require is to use condtional formatting so that just the current month can have a different background colour. I know how to set up the...

Hi Below is the sql code for a crosstab query; TRANSFORM Sum(Accounts08.InvoiceTotal) AS SumOfInvoiceTotal SELECT Accounts08.Companyname, Sum(Accounts08.InvoiceTotal) AS [Total Of InvoiceTotal] FROM Accounts08 GROUP BY Accounts08.Companyname PIVOT Format([DateRaised],"mmm-yyyy"); I need to be...

Hi SkipVought, Many thanks for your reply. Yes the Banks will uses the data to do a data analysis. I will take on board your last paragraph and implement the year. This data is available in the accounts table. KP

Hi I have created a crosstab query to pull debtors from a list of companies.This is then exported to Excel. The problem i have is that it only shows 12 months. So I get Sep09 to Aug 1o. What I requires is for it to got from July 09 to Aug 10. Here is the sql code for the query; TRANSFORM...

Hi, I am using this code on a continous form to show specific data when a certain date criteria is reached. Expression is DateDiff("d",[DateRaised],Date())>30 This will hightlight all dates that are over 30 days. What I need to do is to be able to show 30 days, 60 days in different colours...

Hi all, I have a requirement to be able to export a table to csv format. I know I can use the Export command in the menu for this, but I would like to just be able to use a command button to do it automatically. Many thanks, kp

Hi On an invoice form I have used this code to generate invoice numbers Me.InvoiceNumber = Nz(DMax("InvoiceNumber", "Accounts08"), 0) + 1 What I have noticed is that the invoice number does not appear in the table until the invoice is saved. I need to have 2 people invoicing at the same time...

Hi, I have a requirement to export an access query to the desktop where MYOB can link via software. I have created a command button on a form with this code Private Sub PostInvoices_Click() On Error GoTo Err_PostInvoices_Click Dim stDocName As String stDocName = "QSendInvoices"...

Hi , In an Invoice Ledger there is a date to show the date the invoice was raised. What I want to show is that when the date exceeds 30 days that the date of invoice will change background colour so that the bookeeper can then query the company. I think that the condtional format would work...

Hi dhookom, If you were desiging a form which had to have this type of data, how would you do it. This is the orignal db design, and I want to improve this. On the invoice report the companies want to see all the hrs worked and rates for each criteria. The db holds about 4000 clients, and they...

Hi dhookom, Many thanks for your reply. The 4 number fields represent the following; D1 = Day hrs, D2 = night hours, D3 = sat hrs, D4 = Sun Hrs. All these number fields calulate a cost per hr. So that D1 * Rate1 gives the hrs and cost per day rate. All the rates are subject to differing rates...

Hi, I have a continous form that has 4 number fields that are summed in a field in the form Footer. In the tblAccounts the number fields are D1, D2,D3,D4 Also in the tblAccounts there are 4 fields that Total each one, D1Total,D2Total, D3Total,D4Total. In the form Footer I have placed D1Total...

TheAceMan1, Many thanks for that. It works really well. kp

Hi TheAceman1, Many thanks for your reply. When I looked at your post it was not what I was looking for to do the job. The following allows you to set defaults to any record by double clicking the record selector for that record. I would prefer to be able to dbl click the respective text box...

Hi, Heres one I am not able to solve. On a continous form how can the data be duplicated onto the next record. ie: I have a form that has 6 text fields. I just want to use the On Dbl Click event to duplicate the data onto the next record. Many thanks, kp

Hi dhookom, You are so right. It works really great. Thank you for your time. Its worth a dozen stars! kp

Hi dhookom, No I'm not sure why the After Update event code doesn't work This is the code used to input the data from Lebans Date picker.. Private Sub SDate_DblClick(Cancel As Integer) Dim blRet As Boolean Dim dtStart As Date, dtEnd As Date dtStart = 0 dtEnd = 0 blRet = ShowMonthCalendar(MC...