Recent content by hellind

Why am I getting the error in this function: CustomSplit Please see attached database. Try to query [query_dt_volume1] It is simple query, calling the function in module: CustomSplit. Output should be: Tower Records [USA] = Tower Records Deutsche Bank [Hong Kong] = Deutsche Bank HongKong Fund...

If I have one table like this: PRODUCT VOLUME NK 200 CN 180 CY 220 and another table: REGION SHARE AUSTRALIA 0.45 CHINA 0.55 Want output: PRODUCT REGION VOLUME NK AUSTRALIA 90 NK CHINA 110 CN AUSTRALIA 81 CN CHINA 99 CY AUSTRALIA 99 CY CHINA 121 Volume for each product...

I have a form bounded to a table in a back-end MDB. The OnTimer is set to auto save every 5 minutes. Question: How fast does an update in the form gets saved in the database table? I've tested that it is saved instantly: I make a change and quickly exit access, and when I reopen the update is...

Step 1 Realize that Microsoft Access sorts multiple criteria by first sorting the column to the left. The column immediately to the right of that column is sorted next. To begin your multiple criteria sort, you must first arrange your columns in this order. In the sort-by-names...

Office 2003 When I open a table in datasheet view, how do I sort by multiple columns? In other words, I want to achieve the same effect as "Select * From [Table] Order By Column1, Column2, Column3 ASC"

You understood the problem. The value dScore seems somewhere in between 332.2 and 332.21. But why doesn't msgbox returns the 3rd decimal? Your suggested solution will work except for the fact I want to catch else as an Error.

Wouldn't the function declaration already cast it as double? Function Score2Grade(dScore As Double) As Double Anyway, put a dScore = cDBL(dScore) in the first line, and it doesn't work. It only works if I Round(dScore,2).

Yes the msgbox is at the start. Yes I am msgboxing the input dScore. The input dScore is 332.2. My question is it's not evaluating Case 307.81 To 332.2

'dScore = Round(dScore, 2) If (dScore) > 332.2 Then MsgBox (dScore) End If MsgBox (dScore) return 332.2 If (dScore) > 332.2 Return True Round(dScore, 2) solves the problem I think dScore is some number between 332.2 and 332.21. But why wounldn't it show in messagebox?

Function Score2Grade(dScore As Double) As Double MsgBox dScore Select Case dScore Case Is < 283.2 Score2Grade = 5 Case 283.21 To 307.8 Score2Grade = 4 Case 307.81 To 332.2 Score2Grade = 3 Case 332.21 To 380...

Thanks a lot. It worked. I spend hours Googling for an answer.

I have a bounded textbox to a field. The value I see on the textbox is "MSACCESS". The value in the field is "MS" because it is not yet saved to the table. MsgBox(Me.TextBox) Returns "MS". It returns the value from the table. How do I return the value from the text-box? I don't want to save...

Thanks for the help. But you are assuming users are always typing at the end of the text-box. What if they are making any changes between the text which they often do. And then when auto-save is activated, the cursor reset to the start position and they misplace what they are typing...

That would make my cursor position to zero. But I want to prevent that, I want the cursor to be where the user is still typing.

I have OnTimer set to 60 seconds to run Docmd.Save. When the user is typing on the textbox entering information, on the 60th second the forms save, and the cursor position reset to the start of the textbox. It's a nuisance that repeats every 60 seconds. How do I prevent the cursor in a...