G

#### Guest

reimbursements due,using the following code:

Function Calc_ME_Charges()

'Initialize variables

x = 12

y = 6

ME_total = 0

'Loop through Travel Expenses

For Each Cells(x, y) In Cells(21, 24)

If Cells(x, y).Value = "ME" Then

ME_total = ME_total + Cells(x + 1, y + 1).Value

y = y + 3

'Check for end of row

If y = 27 Then

x = x + 1

'Reset y to beginning of row

y = 6

End If

End If

Loop

I get a Visual Basic Compile Error: Variable Required - Can't Assign to

this expression, and I am unable to close out of VB. The result on the cells

in the Excel Spreadsheet is #NAME?. Any suggestions or ideas to resolve

would be appreciated.

Thanks!