Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. ReluctantDataGuy

    Datasheet view form - prevent "space,space"

    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...
  2. ReluctantDataGuy

    Change PageHeader label's caption on ReportFooter pages...

    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...
  3. ReluctantDataGuy

    Reset File Summary Title after Compact/Repair

    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...
  4. ReluctantDataGuy

    Reset File Summary Title after Compact/Repair

    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
  5. ReluctantDataGuy

    Reset File Summary Title after Compact/Repair

    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...
  6. ReluctantDataGuy

    Avoid Save dialog after query format changes

    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...
  7. ReluctantDataGuy

    Populate field with username

    Safer to use VBA.Environ("UserName")
  8. ReluctantDataGuy

    Increase the size of memo field?

    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
  9. ReluctantDataGuy

    Drag and Drop Sort in List Box

    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...
  10. ReluctantDataGuy

    Delete Rows without lossing autonumber

    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...
  11. ReluctantDataGuy

    open one form twice

    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...
  12. ReluctantDataGuy

    Remove < sign and sum number stored as text

    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...
  13. ReluctantDataGuy

    How to protect ONE db design on a network?

    For protecting sensitive data from prying eyes, I have a technique that is ( I think ) simple yet fool-proof. I've had some very smart people try to hack it and they couldn't find a way. It does require a workgroup, but the workgroup is only for database design changes. Users don't have to...
  14. ReluctantDataGuy

    Query Column Width (Newbie)

    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...
  15. ReluctantDataGuy

    Change width of a control per record on multi-rec form

    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...
  16. ReluctantDataGuy

    report columns

    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
  17. ReluctantDataGuy

    Two problems with Excel in Access

    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...
  18. ReluctantDataGuy

    Counting the number of records

    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...
  19. ReluctantDataGuy

    Macro Not Firing for Sub Form?

    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...
  20. ReluctantDataGuy

    Macro Not Firing for Sub Form?

    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...

Part and Inventory Search

Back
Top