Search results

  1. jeran042

    Solved Iterate through a record-set Twice

    I am trying to iterate over the same recordset twice to generate 2 separate emails. The first will attach a password protected email, and the second will be the password for said email. The first loop works exactly as desired, its restarting the loop through the recordset that I am having an...
  2. jeran042

    Solved Append Data to Excel Table

    Full disclosure, I did post this code to this form in the past, but that problem has been resolved. Here is what I am looking to do, and thus far I am unable to come up with any ideas. So I am looking for a little help. I have command button within an Access (MS Office 2013) form. What this...
  3. jeran042

    Solved Find Table Name

    I have a procedure that will export various recordsets to already created excel workbooks, and all works fine except for one part. I need to dynamically find a table name on a specific tab so it can be cleared out and the new data pasted in. As of yet I am not having any luck. Here is what I...
  4. jeran042

    Solved Concatenating variable in SQL Statement

    I keep getting a run time error: Run time error 2465- "Microsoft access cant find the field" and I'm sure that I am not concatenating correctly. Any guidance or suggestions would be helpful. Set rsQuery = dbs.OpenRecordset("SELECT * FROM qryLedger_Detail_2019_Exhibit WHERE [EXHIBIT_2_COST] =...
  5. jeran042

    Solved Export Multiple Record sets to Multiple Excel Sheets

    Here is what I want to accomplish: Output 2 different record sets to corresponding worksheets in an already created excel workbook. Here is the code that I have so far. It does not throw any errors, and when I look at the excel file it appears to have been modified as the "Date Modified"...
  6. jeran042

    Solved Iterate Through 2 Recordsets + Excel

    This is the next step in a questions that I was able to resolve on this forum. My goal is to iterate through a recordset, and inside that recordset, reference a second recordset and output the results to an existing excel file. Example: If the department is active (first recordset) output all...
  7. jeran042

    Solved Export Query to Excel Spreadsheet Tab

    I have a piece of code that works the way I expect it too. On a form in my MS Access (2013) database there is a command button that will export an existing query out to a specific tab within an existing spreadsheet. What I am looking for is some validation that this code is efficient or...
  8. jeran042

    Sum Through Previous Month

    DSum Through Previous Month Good afternoon all, I have a query that has a spread of number broken down by month. Picture $12,000, broken down by month, so $1k each month. The current structure of the query is a department name, and each of the months. In addition, there is a calculated...
  9. jeran042

    Conditional Formatting + Unbound control

    I need conditional formatting to take 3 arguments: 1 - Greater than or equal to 5 - form control txt_Percent 2 - Less than or equal to -5 - form control - txt_NPercent 3 - Greater than 5000 - form control - txt_Dollar Here is what I have so far: ([txt_PC_Due]>=[txt_Percent] Or...
  10. jeran042

    Iif and + or

    Here is what I am trying to do, I need to meet three conditions. If txt_1 is above 5 OR less than -5 AND txt_2 is greater than 5000. Not sure how to go about this. Here is what I have so far. Any help or guidance is appreciated, =IIf([txt_1]>="5",IIf([txt_1]<="-5" And...
  11. jeran042

    Dlookup Error

    I have an error that I can use some help on: I have an unbound textbox that performs a dlookup. The formula looks like this: =Replace(Nz(DLookUp("tblInvoiceLog.NOTES","tblInvoiceLog","[VOUCHER_NUMBER]= " & [txtADJ_POLICY] & ""),""),Chr(13) & Chr(10)," ") This works fine until there is no...
  12. jeran042

    Set visibility Based on Calculated field

    Good afternoon all, Here is what I am trying to accomplish I have a group of controls (unbound calculated text boxes and labels) on a report that I only want to be visible if there are values in the calculation. For example: When I open the Accounting report, I only want to make fields...
  13. jeran042

    Linked Tables

    I have 4 tables in a database that started life out a linked tables. I want to convert those to local tables. And have done so by using the "Convert to Local Tables" option in MS Access 2016. In addition, I have exported all the data out of the the database into an excel file, deleted and...
  14. jeran042

    Check for Duplicates

    I have a data entry form that takes numerous pieces of information. Mainly up to 5 invoice numbers (in 5 separate bound text boxes). In the after update of each text boxes I have this piece of code running: Private Sub Invoice_1_AfterUpdate() If Me.Invoice_1 <> "" Then If...
  15. jeran042

    Create New SubFolder

    Good morning all, I have a command button on a form that will create a new subfolder within each folder in a specified directory. This code runs fine, but I would like any input if this is the best way to do this, or if I am missing something crucial. Here is what I have for code: Private...
  16. jeran042

    Updating Forms Recordset

    I have a continuous form that is a search form. A user can input any criteria (text before this question) and the record set of the form would be updated with anything LIKE what was typed into the search box. This all works fine. What I am now trying to accomplish is to add Integers to the...
  17. jeran042

    Textbox position

    I have a report with a series of command buttons. One of which outputs the report to a PDF. This works fine. What I am trying to accomplish is to move the position of the reports title textbox from one position to another, and then back again. Here is what I have for code: Private Sub...
  18. jeran042

    Concatenating Fields + #Size! Error

    Good morning all, I have 4 unbound controls on a subform. The first control tests and strips away unwanted leading characters: Name: txtADJ_POLICY =Nz(IIf(Left([POLICY],1)="R",Mid([POLICY],3,Len([POLICY])),IIf(Left([POLICY],1)=0,Mid([POLICY],2,Len([POLICY])),[POLICY])),"") Name...
  19. jeran042

    Replace Line Breaks in Form control

    Good morning, I am trying to replace line breaks (carriage returns) from within a form control. Here is what I am currently trying without luck: =Nz(DLookUp(Replace(Replace("NOTES",Chr(13)," "),Chr(10)," "),"tblInvoiceLog","[VOUCHER_NUMBER]= " & [txtTEST] & ""),"") The DLookUp result is...
  20. jeran042

    Set Value of Control based on result of Select Case

    Good afternoon all, I am hoping someone can help me with the very beginnings of an idea. I am trying to test the value in a form control, [POLICY], to see if it begins with "R", "R0", or 0. If it contains any of these 3 variable, I want to strip the characters away, and leave the remainder...
Top Bottom