Search results for query: *

Remou, Thanks for the help. The table had a couple of last name fields that were empty. That was causing the trouble, like you said it would. I filled them in and now it works. Cheers, Mike

Hello, I've been playing around with a soundex function that I found in this forum that compares the last name in a textbox with those in a table. So, in the BeforeUpdate event I put the following, but I get "Error 3464 - Data mismatch in criteria expression". Any help is appreciated, as...

Thanks, I'll try it out!

I'm using the TransferText method to create a .csv file from the results of a query. If there are any empty fields in the table there has to be double-quotes between the commas in that .csv file. Anybody know how I can add the quotes in the query? The file has to look like this...

Well, it works pretty good except "#DELETED" shows up in the combobox list once you've selected an item. That is, using Fneily's temptable method. Any thoughts?

Thanks for your help and I know it's confusing. This is only useful because the training software isn't easy to work with. When the form opens, SQL updates all the POS (spot) fields in tblRiders to "0". There are 8 comboboxes on the form, each one representing a spot, or resistance trainer #...

The table looks like your example, with a name field and a spot field, among others. The form changes the value in the spot field when that rider sets his bike up in a different position. When you click the command button, it updates the table and outputs a .csv file from a query that the...

Hello, I have eight comboboxes on an unbound form. You can select person's names to assign them spots in an indoor cycling training facility. These names come from "tblRiders". You might not assign all the spots, but you shouldn't be able to assign more than one spot to the same person. Is...

But maybe use the report's close event.

This might help: thread705-1181598

Also, adapted from faq707-2112 Sub FindUsedRange() Dim FirstRow As Long Dim LastCol As Long ' Find the FIRST real row FirstRow = ActiveSheet.Cells.Find(What:="*", _ SearchDirection:=xlNext, _ SearchOrder:=xlByRows).Row ' Find the LAST real...

If there isn't a sheet named "username_temp", it's trying to add one on each loop. On the second time around, it fails. This might work: Private Sub Workbook_Open() Dim CurrentUser Dim WS As Worksheet Dim TempName As String Dim wsBoo As Boolean wsBoo = False CurrentUser =...

Here's one of mine, thanks to this forum. See the Form_Load event. Maybe this will help. Option Compare Database Option Explicit Dim db As DAO.Database Dim strConnection As String Dim ws As Workspace Private Sub Form_Load() Set ws = DBEngine.Workspaces(0) Let strConnection = "ODBC;DSN="...

Here's something I used to find the occurances of yellow highlighted cells. I've changed it to count cells that have a value of 1, which might work for you with some changes. It goes through all the sheets in the workbook and counts within the range of cells. Public Sub CountYellow3() Dim WS...

Maybe you can do a saveRecord when they hit the esc key. Then the form won't be dirty and the second hit of esc won't do anything. I haven't tried it, though.

I just tried adding our area code to the input mask like this: !"(414)"000\-0000;0;# When you tab to the phone number textbox the input mask shows with our area code. Then, if I don't add any more digits to it and tab past it, the box clears itself. Would that work?

PHV, I couldn't get the Val to work, now I see why. It's the qoutes............. Nice.

This works, but I'm sure it could be much better: Dim strYearPat, strTrain, strNumb As String strYearPat = Year(Now) & "PAT" strTrain = Nz(DMax("[TrainNo]", "tblTrainNo", "Left(TrainNo,4)=Year(Now())"), Year(Now) & "PAT" & 0) strNumb = Mid(strTrain, 8) + 1 Me!TrainNo = strYearPat & strNumb

I can't get it work either. It won't add 1 to any record over 2007PAT9, so the highest train number I get is 2007PAT10 which will keep repeating. I think when it looks for the "DMax" of the "Mid" starting at the eighth character, it stops at "9", the highest number and keeps adding 1 to that...

I just tried in the "on open" event of a form that loads on startup. It works, but I'd personally go with what crowley16 suggests.