Intersect target range error

the purpose for this automation is to show BALANCED invoice from "GL" (Data worksheet)

when I select balance amount shows in column "H", it shows the same amount in column "I", meaning the amount and invoice I want to apply, after that I click " receipt voucher", it link to printing format of receipt voucher to show those I select. which works fine

I want to add one trick to restrict amount implied in column "I" , which amount applied should not bigger than outstanding amount (which in column "H"), and here is the problem comes.

it works great after I write code initially, however after I change the "customer" and then click "GET OUTSTANDING" to refresh the data, it pop up errors

I did some web browse, seem the issue related to Intersect target range function which the target can not refer to the range I want.I have no idea how to solve this problem, really appreciate your kindly help. Please kindly refer to Excel attached for better understanding my question.

Hi,

Here are some possible answers:

1. Your Irr variable come up zero, so Range("I13", "I" & lrr) is invalid.
2. Private Subs should only work on their own sheets. ? Rea http://www.cpearson.com/excel/Scope.aspx
3. You might need to change If target > target.Offset(0, -1).Value to If target.value > target.Offset(0, -1).Value
4. ByVal might need to be changed to ByRef at the top of the Sub.

Give these a try.

Hi Andy

Try changing this Line of Code..

Please Login or Register  to view this content.