Copy a Cell if equal to a certain value - Excel VBA

[beasley101]

Help!

This may be a simple answer but I'm really struggling as I am quite new to vba.


Basically, I have an invoice value and a supplier ID on one sheet and I am trying to write a macro to lookup an invoice number relating to the value and supplier ID on another sheet. All the supplier ID's that I am interested in start with the value 3.

The way I am doing it is I am starting at the top of a list, and doing a while loop to work through the list until the value in the invoice column is nothing.

fvalue = invoice value
svalue = supplier ID

On another sheet I have the invoices listed with supplier ID and invoice amounts and I am trying to search for the value in this sheet. Once it has found the value I want it to check that it is the correct supplier ID. If it is then I want it to copy the cell in the same row column C and paste it next to the data in the original sheet.

Here is the code.

Please Login or Register  to view this content.

This is the part that isnt working:

Please Login or Register  to view this content.

I am using Range at the minute because I can't work out how to paste it back to the respective row.

Please Help!

Thanks!

[NeedForExcel]

I haven't studied your code as I am a bit in a hurry.

However, Try this. It should work -

Please Login or Register  to view this content.

You can also do it like this -

Please Login or Register  to view this content.