Recent content by Ranman256

  1. Ranman256

    Debug error???

    FILTER spelled wrong. but you dont need to set filter = "" if you are gonna turn it off. So no need for it.
  2. Ranman256

    Select Case Textbox

    a control is not an event /nor value, so dont use : Select Case ctrl for every button CLICK EVENT send a parameter value to ToNoteButton(pvVal) sub btnVM_click() ToNoteButton 1 end sub sub btnSI_click() ToNoteButton 2 end sub Public Function ToNoteButton(pvBtnValu) select case...
  3. Ranman256

    Solved Grouping within a group or grouping DLIST, is it possible?

    make a query based on your table that makes the groups say: qsGrpData select *, Left([code],3) as Group, Format([mo] & "/1/2000","mmm") as MonthName from table now you can produce crosstabs or other groups using qsGrpData.
  4. Ranman256

    Module Import or Export

    you can use the access menu: external data datasource from Access import select the db to import from select the modules & forms to import
  5. Ranman256

    MEMBERSHIP TRACKING DATABASE SOFTWARE

    your query is labeled: Women Radio Membership DB Query, but it pulls only Men so.....shouldnt it be : Men Radio Membership DB Query Dont you also need a table to track Membership dates , BeginDate, ExpireDate to know when membership expires? What about payments?
  6. Ranman256

    Filter report with two criteria using combo boxes and button on form.

    another way: Public Sub btnOpenRpt_Click() Dim sSql As String, sWhere As String sWhere = "1=1" 'the query is built depending on the various filters the user picks... If Not IsNull(cboState) Then sWhere = sWhere & " and [state]='" & cboState & "'" If Not IsNull(txtName) Then sWhere =...
  7. Ranman256

    Checkboxes and unique records.

    on the form ( fMyForm), a combo box holds ORIGIN items. also a subform that holds the list of all Products the list has the PRODUCT field and CHOSEN check box user selects the origin & checks all Products wanted. then clicks a CREATE button this runs an append query i.e: INSERT INTO...
  8. Ranman256

    Total on Report

    in the query add these calculations to get amts per CommType: select [field], AgentAmt: IIf([field]="Agent",[Amt],0) ,AdminAmt: IIf([field]="Admin",[Amt],0)... from table then sum in the footer: =Sum(AgentAmt) =Sum(AdminAmt)
  9. Ranman256

    Solved Curious on Multidimension arrays

    all tables are 2 dimensional as is your example array. the table/recordset IS the array, what more do you want to do with it?
  10. Ranman256

    Print Subform Table

    a report, using the same query in the subform.
  11. Ranman256

    Solved Code in subform which does not behave as in a form

    if the sub is in the form, and you call it from the form, you can just use: formulaire2 RechercherProcedure () not needed if you are calling formulaire2 from outside the the form, then make the procedure public: PUBLIC sub formulaire2() end sub then you can call it from anywhere...
  12. Ranman256

    Send Object As

    you should be able to use code: DoCmd.SendObject acSendReport, "rTest", acFormatPDF, "w.e.coyote@ACME.com", , , "Subject", "message" tho, some older Access versions may not be able to use PDF. but you can use RTF ( acFormatRTF )
  13. Ranman256

    Error on update of recordset

    if the odbc is working if the recordset is dynaset then: with rstSerial .edit .strL = "02" .update end with
  14. Ranman256

    DoCmd.OutputTo - Excel coded sql string

    uses a query , not sql: docmd.OutputTo acOutputQuery ,"qsMyQuery" ,acformatXLS ,vFile
  15. Ranman256

    Print page footer only on the first page

    These work for me. only page 1 shows the section data. 'PAGE FOOTER Private Sub PageFooterSection_Print(Cancel As Integer, PrintCount As Integer) Me.PageFooterSection.Visible = (Me.[Page] = 1) End Sub
Top Bottom