ActiveCell in selected Range

Hi,

I try to create my own function, which get values from two cells:

Please Login or Register  to view this content.

This code works, but I need to write this function manually in every cell.

When I write

Formula:

Please Login or Register  to view this content.

for example into cell C6 and try to copy it from C6 to G10 it does not work correctly because ActiveCell.Row and ActiceCell.Column are still the same (ActiveCell does not change when I select several cells).

How can I change my code?

please try :
quantity = Cells(row(),2).Value
price = Cells(5, column()).Value

Originally Posted by ikboy

please try :
quantity = Cells(row(),2).Value
price = Cells(5, column()).Value

Sorry, amend to ...application.row()

Please Login or Register  to view this content.

does not work

from polish forum:

Please Login or Register  to view this content.

works great !