VBA Compare 2 sheets and output difference to 3rd sheet
Closed
jmah
-
Updated on Oct 17, 2019 at 12:06 PM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 - Oct 22, 2019 at 11:43 AM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 - Oct 22, 2019 at 11:43 AM
Related:
- Compare two worksheets and paste differences to another sheet - excel vba free download
- Kmspico free download - Download - Other
- Gta 5 download apk pc - Download - Action and adventure
- Minecraft java edition free download - Download - Sandbox
- Minecraft bedrock free download pc - Download - Sandbox
- Fc 24 free download - Download - Sports
1 response
TrowaD
Posts
2921
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
December 27, 2022
552
Oct 17, 2019 at 12:04 PM
Oct 17, 2019 at 12:04 PM
Hi Jmah,
The following code will do as requested:
Best regards,
Trowa
The following code will do as requested:
Sub RunMe() Dim mFind As Range For Each cell In Sheets("Sheet2").Range("H1", Sheets("Sheet2").Range("H" & Rows.Count).End(xlUp)) Set mFind = Sheets("Sheet1").Columns("H").Find(cell.Value) If mFind Is Nothing Then cell.EntireRow.Copy Sheets("Sheet3").Range("H" & Rows.Count).End(xlUp).Offset(1, -7) End If Next cell End Sub
Best regards,
Trowa
Oct 21, 2019 at 07:19 PM
It works perfectly. Is there anyway you can make it so it only copies and pastes the values that are over 20,000 in row R. Thanks.
-Jmah
Oct 22, 2019 at 11:43 AM
Sure, for that we need to change the 6th code line:
into:
Best regards,
Trowa