Search results

  1. M

    endless loop

    Here's my code, can anyone determine my I am getting an error that says "Compile Error: Loop Without Do" Yet I am sure I have tied up all the Loops with ending statements... Function Calculate_Fees_part_2() Dim db As DAO.Database Dim rs1 As DAO.Recordset Set db = CurrentDb() Set rs1 =...
  2. M

    Querying multiple occurances of data in a column

    Apologies for taking so long to back, couldn't of asked for better help you little stars you. Many many thanks.
  3. M

    Querying multiple occurances of data in a column

    Hi there, This will hopefully take someone only a minute to answer but as for me I'am a bit of a beginner and have searched quite hard but cannot find an answer. I have a table with a number of columns, for arguements sake its a simple customer details table with ID, first_name, surname...
  4. M

    conditional formmating along with vba code

    Hi, I have a form that has a few texts boxes that have conditional formmating on them. When check boxes are ticked certain text boxes are hightlighted using the conditional formmating. The problem I have now is that I want write code that records which text boxes are highlighted. I have tried...
  5. M

    vba update data in column

    the above code works, sorry, but it was taking a while to update and the form displaying th results needed refreshing. Ty.
  6. M

    vba update data in column

    Quick update on the code I have so far: 'declare database, recordset, columns, fields as objects Dim dbRequests As Object Dim recordsetItems As Object Dim fieldColumns As Object Dim fldEnumerator As Object 'set up Database, recordset...
  7. M

    vba update data in column

    Hi, I have code witch Sets up everything for my Database Access but I am having trouble being able to retieve data. My codes looks like this: 'declare database, recordset, columns, fields as objects Dim dbRequests As Object Dim recordsetItems As Object Dim...
  8. M

    Calling from a function.

    thankyou, knew it was simple...lol Private Sub Command145_Click() Me.lblUserName1.Caption = ReturnUserName() End Sub
  9. M

    Calling from a function.

    God I feel soo think :mad:...I am beating all round the bush to do this, I have forgotten how to do it thou...here go's: I have this code in my module, called 'Module1', as below: Option Compare Database Public Declare Function GetUserName Lib "advapi32.dll" _ Alias "GetUserNameA"...
Back
Top Bottom