Recent content by Onlylonely

  1. O

    Listbox multiselect and move to another listbox

    I have find the solution.
  2. O

    Listbox multiselect and move to another listbox

    Hi Guys, Appreciate if you could help me out. I have listbox4 and listbox5, when i select multiple row from the listbox4 and click next, the issuetbl suppose to update 'Check' in complete column. So that listbox5 have the item which i selected. Unfortunately, it only show the last item that i...
  3. O

    Select all the frame and update

    Hi Guys, I have roughly 20frames in my forms. Any idea how to select all the 20frames in shot and update? Like .... Private Sub All20frames_AfterUpdate() coding.... End Sub
  4. O

    How to execute many buttons using a single button?

    Hi MajP, Single button click, then it will click all the buttons. Private Sub CheckPass_Click() Dim ctrl As Control For Each ctrl In Me.Controls If CheckPass = True Then If ctrl.Tag = "Step1" Then ctrl.Value = 1 'If ctrl.Name <> "CheckPass" Then If ctrl.Tag =...
  5. O

    How to execute many buttons using a single button?

    Hi Guys, May i know how to execute many buttons using a single buttons? I have a tag all the buttons with "Step1" My code like below but not works. Private Sub CheckPass_Click() Click.ctrl.Tag = "Step 1" And Click.ctrl.Value = 1 End Sub
  6. O

    Update table with incremental

    Hi Guys, Any clue to update the table with incremental number? With rst Do Until .EOF If (![Remark] = "Rework") Then Rework = Rework + 1 Else End If .MoveNext Loop End With For R = 1 To 19 CurrentDb.Execute "INSERT INTO Issuetbl (Part_Number, Serial_Number, Job_Number , Step...
  7. O

    If FAIL then update FAIL.

    Alright, thank you very much Micron! Appreciate your help on this.
  8. O

    If FAIL then update FAIL.

    Hi Micron, I've solved the summary issue by changing the steps. Do you have any idea to increase the "Rework" as below?
  9. O

    If FAIL then update FAIL.

    My apologize, 1st - Open checklistform. 2nd - Input any part number , job number and Distinct Serial number. 3rd - Step 1, Question 1 to 12, put at least 1 FAIL 4th - Step 2 , Question 1 to 7 , put all pass 5th - Submit it. 6th - Open Issuetbl, check the data. Summary not update to FAIL...
  10. O

    If FAIL then update FAIL.

    Hi Micron, Yes, all the control are not bound. What to do to replicate the issue in a database you've never seen before and no instructions?? << i dont really get it. can you give me an example?
  11. O

    If FAIL then update FAIL.

    Hi essaytee, Sorry to make you confuse. I haven't work on the step 3 yet. I'm working on step 1 and 2... What i want is if there is a FAIL in step 1 or 2, table summary field need to update to "FAIL".
  12. O

    If FAIL then update FAIL.

    Anyone help? I still stuck ......
  13. O

    If FAIL then update FAIL.

    I'm still stuck... Attach herewith the file. Hopefully can solve it. I've solve the step 1 summary to FAIL, but Step 2 summary still remain PASS.
  14. O

    If FAIL then update FAIL.

    Hi Micron, Im using procedure coding. Type mismatch. sSQL = "Update Issuetbl Set [Issuetbl].[Summary_Result] = 'Fail' WHERE [Issuetbl].[Serial_Number] = '" & Forms!checklist!txtSN & "' IN (Select Serial_Number from issuetbl AS T where T.Result LIKE " * Fail * ")" MsgBox (sSQL)...
  15. O

    If FAIL then update FAIL.

    Hi Micron, I've tried this an it is not working. The code only will update the summary result to FAIL if the result column contain FAIL. For the result column is pass , it will not update to FAIL for the same S/N.
Top Bottom