highlight minus values and copy to another sheet

[Hasson]

hello !
I would search for the minus values into column STOCK , then should highlighted by red into sheet RP and copy the data contain highlighted minus values to sheet OUTPUT with considering every time it will increase data or changes in sheet RP
the data before

RESULT.xlsm
	A	B	C	D	E	F	G
1	ITEM	BRAND	MANF	REF	BUYING	selling	stock
2	1	QQW-1	MM CLA1	23M-1	200	210	-10
3	2	QQW-2	TH NM-1	CLA2 VBG	120	100	20
4	3	QQW-3	CV CLA3	TAI	200	20	180
5	4	QQW-4	M*12.5	CLA4 TR	300	120	180
6	5	QQW-5	CLA5	EG	120	150	-30
7	6	QQW-6	M230	TU	200	210	-10
8	7	QQW-7	S**	CLA7 US	250	100	150
9	8	QQW-8	CLA8	UK	300		300
10	9	QQW-9	CLA9	N BR	120		120
11	10	QQW-10	BN CLA10	IT	150		150
12	11	QQW-10	CLA10 IT	BN -MM	100		100
13	12	QQW-11	LVD	CH	120		120
14	13	QQW-12	CLA12	JA	120		120
RP

Cell Formulas
Range	Formula
G2:G14	G2	=E2-F2

and after for two sheets
sheet RP

sheet OUTPUT

 

[kokano90]

hello !
I would search for the minus values into column STOCK , then should highlighted by red into sheet RP and copy the data contain highlighted minus values to sheet OUTPUT with considering every time it will increase data or changes in sheet RP
the data before

Sub ABC()
Dim Rng As Range
With Sheets("PR")
    Set Rng = .Range("A1").CurrentRegion
    Rng.AutoFilter 7, "<0"
    Rng.Copy Sheets("OUTPUT").Range("A1")
End With
End Sub

 

[Hasson]

thanks but as I said

every time it will increase data or changes in sheet RP

then should change in sheet OUTPUT . so if the data contain minus values change to non minus then should be delete from sheet OUTPUT if it's already existed in sheet OUTPUT and if I add new data contain minus then should copy to sheet OUTPUT. as to using way of filter I know this is better way than the others ,but I would show all of data in sheet RP after copy filtered data into sheet OUTPUT without show filtering arrow ,also where is the highlighted minus values into sheet RP? last thing you have typo about sheet name RP not PR.

 

[Hasson]

can any body help?