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 strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by richiepr77

  1. richiepr77

    Nested Do While Loops

    Removed the Exit Do. Closed the second Loop. (Thanks for that, didn't see it) Here's the corrected code: DoCmd.SetWarnings False Dim FirstDate, EndDate As Date, RecordNo As Long, ChangeType As String FirstDate = Me.Date1 EndDate = Me.Date2 RecordNo = 1 ChangeType = cboTipoCambio.Value Do...
  2. richiepr77

    Nested Do While Loops

    I'm trying to insert records in a table with a range of dates. I've already did that with one employee on this sub. DoCmd.SetWarnings False Dim FirstDate, EndDate As Date, RecordNo As Long, ChangeType As String FirstDate = Me.Date1 EndDate = Me.Date2 RecordNo = 1 ChangeType =...
  3. richiepr77

    Get the parameter property value from a custom menu item

    I'm trying to return the value of a custom menu item from its parameter property and copy it to an unbound text field in a form. I've tried the following code with no success. Function Menu1() Me.txtMenuValue = Application.CommandBars("mnuCustom").Controls(1).Parameter End Function I've...

Part and Inventory Search

Back
Top