Macro to add values to named range in a certain column

[smiley3141]

Hello everyone.

I have many payment schedules that all have the same format. The range for each of the schedules has a defined name such as Customer1245. The left column of each Customer schedule is the date that a payment is due. In that row, the sixth column to the right (including the first one) is the date that the payment was received. The eighth column to the right is the check number.

Say that the value in cell A1 is "Customer1245", the value in cell B1 is the date the payment is due. The value in C1 is the date the payment was received and the value in cell D1 is the check number. Is there some way to take this information and have the Customer chart for Customer 1245 updated correctly?

Thank you for your assistance. In case it matters, I have Excel 2007.

 

[smiley3141]

Correction!

The sixth column to the right is the date the payment was received and the SEVENTH column to the right is the check number.

 

[smiley3141]

I found a solution that works, as long as I change the problem a little. For each of the Customer tables, I insert a column to the right of the date. The values in this column simply number the rows in the Customer Table. Then, since I now know the row number of the named range which needs to be changed, I can use this.

To do so, Instead of only having a few cells in the range "A1:D1", I will pull the entire row data into my spreadsheet. After updating the payment as I see fit, the following Code works:

Sub change_CustomerTable_values()
'This macro changes the values in the row we want
Range("Customer1245").Rows(10).Value = Range("Customer_Payments").Value
End Sub

The above assumes that you want to change the 10th row the Customer1245 Table and that the values you want to put in those cells are a named range called "Customer_Payments")