Getting the amend function/code to work correctly

**terry_pro** · 10-03-2008, 03:55 AM

Hi can anybody help me to solve this problem, it has bee driving me mad over the last few days.

I have started to build a user form that (will) allow myself to update a database at various stages of our projects. everything seems to be working apart from the update/amend function. When i search for a project and make any amendments as soon as i hit the update button it copies it to a completely random cell and doesnot overwrite the existing row.

I have attached the files, it would be great if someone could take a look and help me, i am new to VBA so not quite with it yet.

Thanks guys/girls

**royUK** · 10-03-2008, 04:11 AM

have you looked at the code in the Databaseform example here

http://www.excel-it.com/vba_examples.htm

You use .Find to find a range - r, but then you use ActiveCell to update. I don't think your code actually activates r.

I would declare r above the procedures in the userform module to make it available to all procedures, then use r.Offset instead of AciveCell.Offset

**terry_pro** · 10-03-2008, 06:36 AM

Hi thanks for the response Roy,

I have looked at the sources you mentioned, but i cant see how i can amend the code without having to start afresh. I think ? like i said i am new to this and it has pretty much been hit and miss.

I have tried a few other things but dont seem to be getting any luck.

**terry_pro** · 10-14-2008, 03:47 AM

If anyone can look and see where im going wrong wih this code im almost where i need to be, i will even make a donation to anyone who can help ?

**royUK** · 10-14-2008, 03:57 AM

I can't see where you actually set c as a range. You use .Find to find r.

I think you are making your code way over complicated, the code could be shortened considerably.