Search results

I am new to writing loops and still trying to grasp it. Using VBA I need to loop thru a table and add the values in a field, how can I do this? I know I can write a query to do the same thing but I want to learn how to using code. Any help is greatly appreciated.

JANR thank you very much for your help, your solution worked perfectly. vbaInet thank you for your advice as well.

Hello All, I have a text box where the user enters an invoice number and I am checking table "dbo_Tbl_AP" to make sure the invoice doesn't already exist. If the Invoice exists I want to show the label "lbl_Add_Duplicate_Invoice" and force the focus back to the text box "txtADD_Invoice". When I...

I am trying to populate a List Box with a SQL Statement when a Combo Box has changed. Below is the code I am using but when I click in the Combo Box and select a value nothing happens. Any help is greatly appreciated.... Private Sub All_Cmb_Group_Change() All_List_Not_Worked.RowSource =...

I tried the below and it still won't work Private Sub All_Cmb_Group_Change() Dim strSQL As String strSQL = "SELECT [Self Pay AP].[MEDICAL RECORD], Sum([Self Pay AP].[Current Inv Balance]) AS [SumOfCurrent Inv Balance] " & _ "FROM [Self Pay AP] " & _ "WHERE ((([Self Pay AP].[MEDICAL RECORD])...

I have a list box that I want to populate once a ComboBox is changed. Below is the code I am using but it won't work or throw an error message. Any idea what I may be doing wrong? Private Sub All_Cmb_Group_Change() All_List_Not_Worked.RowSource = "SELECT [Self Pay AP].[MEDICAL RECORD]...

Tried adding the .value like below and it still didn't work If (Check_Add_New_Auditor_User.Value = False _ And Check_Add_New_Error_Code.Value = False _ And Check_Misc_Issue.Value = False) = True Then MsgBox "Please Check a Reason for this Email" Else even tried If...

I am trying to make sure the user selects at least one of the Reason Check Boxes before sending and email. When I leave all three Reason check boxes unchecked the email still sends, I can't figure out what I am doing wrong..... I am using the If And statements and have it set to throw up a...

That Worked! thank you all for your help, I appreciate it.

Yes cmb_Greeting1 is a combo box that lists "YES", "NO", "N/A". If cmb_Greeting1 = "YES" I want to put the value 5 in the rs![Points] field else 0

trying to update the last field below using if statement but i keep getting the else without if error...... My syntax looks right.... I searched this forum and all of the examples that worked seem to match what I have... Any ideas what I am doing wrong! rs.AddNew 'Enter Greeting Stats...

I want to set the RowSource of a ComboBox based on what the value is in another ComboBox. Example: Select Case ComboBox1 Case "CodingList" ComboBox2.RowSource = QryCodingList Case "DataEntryList" ComboBox2.RowSource = QryDataEntryList Case "UserList"...

Thanks Goh, I appreciate the help, I will give it a go.

All, I have a subform that is the result of a query. I want to set the default to a text box on the subform based on the value in another field on the same subform. Below is a dlookup using the table that the subform query is based on: =DLookUp("[Self Pay AP]![Date Worked]","[SELF PAY...

I have an Access 2010 Front End Db that has a SQL Server Back End. If I publish the Db to SharePoint can I still keep the SQL Server Back End? When users enter data thru the Published Db will it still update the SQL Server?

Thanks Bob, I went with the DAO option you suggested since it didn't require much alteration to my code. I want to learn more about ADO and how to write data to SQL Server using it, can you recomend any good sources?

Hi all, This is my first time trying to set up Access Front End with SQL Server Back End. How can I write the Data on my Access form to a Linked SQL Server table? I tried the below code but get runtime error '3622' Private Sub Cmd_Coding_Save_And_Enter_New_Record_Click() Dim Rs As Recordset...

How do I referrence a specific table by name to change the connection string? I have tried [tblatb].Connect = "ODBC;DRIVER=SQL Server;SERVER=addwddtls7b1\billinganalytic2;Trusted_Connection=No;Database=DeepDiveGroup5;uid=admin;pwd=admin;"

Bob, thank you for the code and recommendation I appreciate your help....I thought about looping thru the collection by didn't know how

Hi All, I have a form setup for importing text files based on which check box is checked. I keep getting runtime error 3044 "invalid path" I am using the UNC path for each file. Any idea where I am messing up? Private Sub Command32_Click() 'When Check Box is Checked Import that Groups...