Excel Macros
Closed
sreenivasulu
Posts
1
Registration date
Monday August 26, 2013
Status
Member
Last seen
August 26, 2013
-
Aug 26, 2013 at 06:16 AM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen January 16, 2023 - Aug 26, 2013 at 11:53 AM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen January 16, 2023 - Aug 26, 2013 at 11:53 AM
Related:
- Excel Macros
- Macros in excel download - Download - Spreadsheets
- Excel date format dd.mm.yyyy - Guide
- Spell number in excel without macro - Guide
- Excel online macros - Guide
- Screenshot in excel - Guide
1 response
TrowaD
Posts
2921
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
January 16, 2023
549
Aug 26, 2013 at 11:53 AM
Aug 26, 2013 at 11:53 AM
Hi Sreenivasulu,
Here you go:
Best regards,
Trowa
Here you go:
Sub RunMe() Dim lRow, x As Integer lRow = Range("D" & Rows.Count).End(xlUp).Row For Each cell In Range("D1:D" & lRow) x = 0 Do x = x + 1 If cell.Value = Range("A" & x).Value And _ cell.Offset(0, 1).Value = Range("B" & x).Value Then cell.Offset(0, 2).Value = Range("C" & x).Value End If Loop Until x = lRow Next cell End Sub
Best regards,
Trowa