Sub won't work on change event

I apologize, shg. I was in a hurry yesterday afternoon.

I have pulled all the sensitive data out of the workbook, and attached a sample to this message. I thought this approach might be easier for both of us.

The macro works beautifully if you enter the 3 digit location number, and then click the "Get Data" button. My goal is to have the macro run anytime the user changes the location number in D4, (now on version 3 ). I don't currently have the macro stored anywhere except a standard module.

I have all pages locked, with no password, and all but the main page are hidden. The macro unlocks them and unhides them to copy the data, but then locks and hides them again before ending.

Thanks again for all your help!