Search results for query: *

Just FYI: You can also use this: Me.Text1 = Replace(Me.Text1, " ", " ", 1, -1) If you have problems with people entering 3 or more spaces, you can just put the above code in a loop and it'll squish any number of consecutive spaces down to one. Of course, you'd need a terminating...

Is there a way to change the caption of a label in a report's PageHeader section while the report's ReportFooter section is being formatted/printed? My report's ReportFooter spans multiple pages. I want the label in the report's PageHeader section to be different for pages in the report's...

THANK YOU CAUTIONMP!!! I didn't want to have to store a dummy database to hold the SummaryInformation so using your example as a starting point, I figured out that I could store the binary string in an OLE Object type field in a table in my database. The user clicks a button called [Compact...

That looked promising, but its for Word and I need the code for Access. I played around a bit but so far haven't found anything equivalent in Access. Thanks! BobK

I need to replace the File Summary Information Title after its removed by the compact/repair process in MS Access. I need to set the Title to "MyAppName 3.52" I've looked through FSO, etc but its all over my head and I need a quick solution. I'm hoping someone has a bit of code that will...

Is there a way to prevent MS Access from displaying the Save dialog after a user makes formatting changes - such as column widths - to a query? Note that I use "DoCmd.OpenQuery QryName, acViewNormal, acReadOnly" but it only prevents data changes - still allows formatting changes and displays...

Safer to use VBA.Environ("UserName")

You might consider linking or embedding an MS Word OLE object. Pro: You get full text formating functionality Con: You lose the ability to search the text easily

I need the same functionality available in the (internal to Access) Tab Order form. I need to present a list of items in a List Box and allow the user to drag items up and down the list, the same way you can drag field names up and down the list in the Tab Order form. I can't use third party...

Try not using AutoNumber. Its not as difficult as you might think to increment them manually, and get the result you're looking for. When you create a new record, set its key field value to: Me.KeyFieldName = DMax("[KeyFieldName]","TableName") + 1 If you subsequently delete the new...

You need to create a form object for each instance of a form you want to open. That's where the "New" keyword comes in. Example: Private Sub OpenFormTwice() Dim Frm1 As frmYourFormName Dim Frm2 As frmYourFormName ' Note: You could say "Dim Frm1 As Form" ' but the above is supposed to...

Quick and dirty response. You'll need to adopt this to your own usage. SumVariable = SumVariable + CDbl(IIf(InStr(1,[FieldName],"<") > 0, Mid([FieldName],InStr(1,[FieldName],"<") + 1),[FieldName])) If the above isn't exactly right, see help on the InStr, Mid, and IIf functions. If you...

...for each table. (yeah, I know, a query for each table is a pain, but it's required for this method to work) In the query, you can just use the * (as in SELECT * FROM...) 5) For each query that is related to a table, set it to open "With Owner Permissions" which is a property of the query...

Here's a trick I found using Send Keys. After a command that opens a query, add the following: For X = 1 To qryDef.Fields.Count SendKeys "%oc+{TAB}{ENTER}{RIGHT}", True Next X SendKeys "{UP}{F2}{HOME}", True Note that this code counts on the Format, and ColumnWidths menu...

I have a multi-record form and the records on the form represent physical objects, each of which has a width that is stored in a field called "SectionWidth". I need to have an object for each record that changes width based on the value in the SectionWidth field for that record. Of course...

Thank you for the tip on creating multiple columns in a report. I find that this method does not show page header labels though - so the first column has headings and subsequent columns do not. Is there a way to show the column headings over all the columns? Thanks! ReluctantDataGuy

First problem: Linking an Excel 2002 spreadsheet into Access 2002, I find that Access displays #Num! in fields that contain numbers only, but displays correctly when the cell contains alpha-numberic values. Interestingly, this only occurs with a link. Importing the Excel file results in...

I'm having this same problem and I've found that its a timing problem. OnCurrent Code runs before the recordset is completely loaded, so if you have a form that opens quickly, Me.Recordset.RecordCount works fine. If your form loads a little slower, Me.Recordset.RecordCount just shows 1...

I guess that makes sense, but I don't remember ever running into the problem. It makes sense because until you're actually IN the recordset, you can't move to a particular record in that recordset. It worked for me in the OnOpen. But then, I used code and you used a macro. Try using the code...

Never heard of such a thing! Well, try checking the properties of the subform conrtol. Are you opening the mainform with code? If so, make sure your not specifying the open mode, so that the forms control how they open. Also you might try deleting the subform control and adding it again...