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!

  • Congratulations Chris Miller 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. bill420

    Recordset is null

    Try If rs.BOF = True And rs.EOF = True Then rs!STU_TU_CODE = " " Else rs.Edit rs!STU_TU_CODE = rs2("TU_CODE") rs.Update End If Bill
  2. bill420

    Access alters default printer setting

    Remou, That's correct. The only thing that runs on Access start is DoCmd.Maximize so the start page fills the screen. Yet as soon as Access starts, the printer's letter size is changed to "User-Defined" making the output unusable. Bill
  3. bill420

    Access alters default printer setting

    Remou, Yes I have, with the same results. Bill
  4. bill420

    Access alters default printer setting

    When opening Access, the default printer changes from "Letter" to "User-Defined". The output is then unreadable. I then open the printer option box and change it back to "Letter" and all is fine until I reopen Access with the same result. I'm using Access 2003 with a Brothers HL1440 How can...
  5. bill420

    Rename Word doc

    Thanks Remou, Name As worked GREAT. Thanks so much. Bill
  6. bill420

    Rename Word doc

    I need to rename a Word doc using VBA in Access. I have been able to open the existing file and save as the new name, If strAgent <> Me.Combo15 Then Set WordInst = CreateObject("word.application") WordInst.Documents.Open ("C:\Access\Folder1\" & strAgent & ".doc")...
  7. bill420

    Using a variable to call an unbound text box

    lewds, Thanks for the fast reply. Worked GREAT!!! Thanks again for your insight. Bill
  8. bill420

    Using a variable to call an unbound text box

    I have a set of unbound text boxes numbered 181 thru 205, I'm trying to fill with the following code. cnt01 = 0 cntBox = 181 Do While cnt01 < cntRes Me.Text(cntBox).BackColor = lngRed Me.Text(cntBox).ForeColor = lngRed cntBox = cntBox + 1 cnt01 = cnt01 +...
  9. bill420

    Forms unusable at smaller screen resolutions

    Thanks you for your quick reply and useful information. Changed the forms, works great for all users Bill
  10. bill420

    Forms unusable at smaller screen resolutions

    I have a number of forms that are set as Pop Up = Yes and Modal = Yes, Auto Resize is set to Yes along with Scroll Bars set to both. Everything works fine except for 2 users who use a smaller screen resolution. They are unable to view the whole form. If a form fills the page with the screen...
  11. bill420

    Access to Excel problems

    Thank you once again for your insight. Bill
  12. bill420

    Access to Excel problems

    I use the following code to create an Excel file. This works great the first time, but if I reopen the form and click on Command 125 I receive an error "Object variable or With block variable not set" When I close Access and reopen the form, it functions fine. What am I missing? Thanks, Bill...
  13. bill420

    DLookup problems

    Thank you so much PHV, File_Number is defined as text and your solution worked great. I have an additional question, if there is more than one duplicate, what would be the best method for checking for all of them? This pulled up the first duplicate within the table but there are more. Thanks...
  14. bill420

    DLookup problems

    Thanks UnicornRainbow for your fast reply, however I am now receiving a compile error, type mismatch, highlighting '" & Forms![Hull_Number] & "' in the code. Not sure why. Bill
  15. bill420

    DLookup problems

    I am attempting to use DLookup to retrieve the file number (primary key) of any and all previous records that the hull numbers match in a table named “Vessel”. I have started with the following code, and created a new record with duplicate hull number to test with. Private Sub...
  16. bill420

    Converting dollar amount to text

    I need to convert number amounts over a million to text, as on a check. I have seen solutions for amounts under a million, however we transfer funds over $1,000,000.00 daily. Users are getting tired of typing the amount out. Can this be done? Bill
  17. bill420

    Help separating names

    Thanks for the fast replies. PHV, your solution worked perfect Thanks so much Have a star. Bill
  18. bill420

    Help separating names

    I have a name field that can contain more than one name, the names are always separated by “and” (i.e. Thomas S. Smith and Tracey L. Smith). I need to split these names out to separate names on certain forms. I started with this code: If InStr(ucName, " and ") Then ucBuy1 = Left(ucName...
  19. bill420

    Moving Access Query to Excel

    rubbernilly" Your code worked GREAT. Thank you for all your time and effort on this problem. As we have recently converted to Access from Excel, I now have a method of retaining the Excel reports for the users. I'm sure this won't be the last problem I have... Thanks again for your great help...
  20. bill420

    Moving Access Query to Excel

    Hi "rubbernilly" Finally got back to Access to try this, it creates a new worksheet no matter what I name it. If I call the worksheet "Sheet2" it creates a "Sheet21", I tried to rename it to "Start" with the same results, creates "Start1". Any clues as to why this is happening. Thanks again...

Part and Inventory Search

Back
Top