Search results for query: *

Sorry Remou, I copy the wrong sub in the 1st post The code is : '----This code always works Private Sub CmbClient_AfterUpdate() [Analisi_Cass_Dare].Form.Filter = "Ragione_sociale ='" & Me.CmbClient & "'" [Analisi_Cass_Dare].Form.FilterOn = True...

Hi all, In my DB i had a form with 2 unbound and unlinked subforms (the subforms are unlinked each other). The mainform is only a container that have two subfrm. In the main form I have one unbound combo to filter both subfrms with the same parameter. I use the filter property to set the filter...

Thanks AceMan...you're my guro ;) I've moved the public variable to a module before You've posted. All worked. But now, I follow your suggestion and put a save button on popup form to set Pub vars and then a close btn to quit the form. Thanks all PS now I have a new question....i will post...

I known that I typed the wrong name of var in the code posted... I want to know if i'm in the right way! Thanks

Hi all, I Have a form with a click button that prompt a message box for choosing to send the value of some controls in the form to an addnew DAO(VbNo) or open a popup form(unbound) and change some value to send to the addnew DAO (VbYes). As Well, I haven't found the right solution searching in...

AceMan, do you speak italian? So when i'm in difficoul with english i use italian whit you ;)

Thanks a lot for helping me, PHV and TheAceman. I add the 2 red lines and now code works well. It do the right thing If Not RS.EOF Then Dim strSql Do While Not RS.EOF strSql = "INSERT INTO riepilogo_mov_dare (id_acq)" _ & " SELECT Acquisti.id_acq FROM Acquisti " _...

Here the actual code Private Sub btn1_Click() Dim strSql As String Set RS = Me.RecordsetClone Do While Not RS.EOF strSql = "INSERT INTO riepilogo_mov_dare (id_acq)" _ & " SELECT Acquisti.id_acq FROM Acquisti " _ & " WHERE id_acq = " & RS.id_acq CurrentDb.Execute strSql, dbFailOnError...

Now on click the code create over 300.000 records in the table whit the same id_acq (the first in the continuos form#1)

You're right PHV. The id_acq is numeric. I try your change but Access crashes. :(

Private Sub Comando45_Click() I try to figure out the problem with this code: Private Sub btn1_Click() Dim strSql As String Set RS = Me.RecordsetClone Do While Not RS.EOF strSql = "INSERT INTO riepilogo_mov_dare (id_acq)" _ & " SELECT Acquisti.id_acq FROM Acquisti " _ & " WHERE id_acq =...

Thanks TheAceMan1...can you be more explicit I'm newbie of VBA. Hope this help you... I need on click event (btn#x) to open a form(#3) and send all view records. Then adding new record in the form#3(on open) I relate information to all records present in the subform (sended from form#1). Thanks

Hi all, I have a search form(#1) to retrive some records. As well, when I filter records with combos I get a list of records. I create a button to send a single record to another form(#2) and It works well. But I need, sometimes, to send all filtered records to a subform in onother form(#3)...

Solved...I had 2 field with the same name ;)

Hi all! I try the running sum that i've find in the faq faq702-5248. The problem is that when I use the code in a subform the running sum doesn't work. I get #Error in the unbound control. Then I create a form whit the same origin and the same control to see if I do all corectly. So, running...

Try this: Forms![Formname]![ctlname] = DSum("[nameFieldtosum]", "[tbloforigin]", "[RelID]= Forms![formname]![RelID]") The first part is the control in the form in which you want displayed the sum (Forms![Formname]![ctlname]). Then [nameFieldtosum], is the field where it does the sum...

It works great too :D

TAM1.... Rigth ;) Thanks again ;)

I Apologyze for misanderstanding!! :) Both id_ord & id_ordine are long interger (PK). I make an error in the first post, so id_ord & id_ordine are the same control in my form. As well the correct code is: Dim flg As Integer If Not IsNull(DLookup("[id_ord]", "tbl1"...

Hi TAM1, I correct the expression first, but the code not works well. I get the same problem that I would like to solve. "If record exist in tbl1 it disable only btn1 but not btn2" I want disable both button if a record exist in one table. Sorry if I was not clear before :( Thanks