I ended up using this code to repove the spaces for sorting. It seems to work great.
OhBother
Function ReplaceInString(ByVal StringIn As String, _
CharReplaced As String, _
CharToReplaceTo As String) As String
Dim intInstr As Integer
Dim strTemp As String
intInstr = InStr(StringIn...
I am running into a little trouble sorting a text field in my database. The field contains customer names (entered last name, first name) and business names. The problem I am having is mostly with business names. I will need to produce a report that is sorted in alpha order to do an inventory on...
I'm sure it's not the most efficient way, but you can run an update query and update your field to the following.
right("00000"&[your Field Name],5)
OhBother
I want to do this same thing (Open a form and go to the last record) except mine is in a sub form. When I put the DoCmd.GoToRecord , , acLast in my subform and open it... it does exactly what I want. When I open my main form though, I get an error saying that the subform isn't open yet.
Where...
Thanks for your response!
I am adding records with a continuous form.
I tried your navigation button code, but I got an error for "With with no End With" and "No current Record".
I can always add a delete button on the form to delete the record, but I would still like a...
I have a form with numerous records. Each record has an autonumber field as the key. When adding a new record I want to look at the previous record. If a particular field is null I do not want a new record to be added. I was trying the following code. I was able to get the message, but I don't...
I am working on a database that is similar to a Library book check out. It involves files from my office that can be checked out by various employees. They want to keep track when a file is checked out and returned. They also want to keep a history of the activity for each file.
I am having a...
I have a Check Ledger form in a database. It is basically set up like your personal checkbook register. The user has requested a warning box to pop up if they enter a check number that is out of sequence. I'm not sure how to best do that. I can't autonumber the field because there will be...
I'm having trouble with this same thing. It's finally working a little. Here's the wierd part. When I open the report it shows the same data for each group. If I change to design view and back to preview it looks right.
Can anyone explain this or help?
Thanks a bunch!
Andrea
Try this
UPDATE tblHerdImport SET [dtCalvingDate] = cdate(Mid([calving_date],5,2) & '/' & Right([calving_Date],2) & '/' & Left([Calving_Date],4)) WHERE calving_date IS NOT NULL
Andrea
I have a database where I am doing this. Here is part of my code:
DoCmd.TransferSpreadsheet acExport, 8, "Past Due Report", "F:Data.xls", True, ""
DoCmd.TransferSpreadsheet acExport, 8, "Officer Delq Report", "F:\Data.xls", True, ""...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.