Identify Cells with Negative Values

Hello,

Below is a piece of code that I have that has been working very well to cut specified values from a given range and pasting the values to a new location.

The problem that I now have that instead of looking up a text string, I need to copy all cells with a negative value to a new location.

The columns and ranges are in the below code, I just can't seem to come up with a way to call out the "negative value cells"

I would greatly appreciate any suggestions.

Thank you!

Please Login or Register  to view this content.

I didn't really get a chance to disect the code, but for reference, using Autofilter to call out negative numbers would look like this:

Please Login or Register  to view this content.

See if you can incorporate that. If not, try posting a sample of the workbook in addition to the code for us to work with.