Copy row from one sheet to other based on 2 conditions [Closed]

Report
-
Posts
5
Registration date
Saturday March 21, 2015
Status
Member
Last seen
May 11, 2021
-
Hello,
Any assistance would be very much appreciated I'm just getting into macros and coding.

I'm trying to copy a list from sheet 4 and input the information based on multiple different criterias on sheet 1 I'm using this coding so far which works great for that one but I have seven more sections on sheet 1 starting on I14 and I25 how do I move the pasted information to that location?
Set I = Sheets("Employee Inventory")
Set e = Sheets("EEs")
Dim d
Dim j
d = 12
j = 2
Do Until IsEmpty(i.Range("Q" & j))
If i.Range("Q" & j) = "TERM" and i.Range("S" & j) ="X" Then
d = d + 1
e.Rows(d).Value = i.Rows(j).Value
End If
j = j + 1
Loop

Any suggestions or a whole different coding would be appreciated
Thanks!

1 reply

Posts
5
Registration date
Saturday March 21, 2015
Status
Member
Last seen
May 11, 2021
17
Hi ,
I recommend you examine this example that made with Vba Codes :

Deploy Data To Pages According To Values (Ok Or Cancel) On The Column

Subscribe To Our Newsletter!

The Best of CCM in Your Inbox

Subscribe To Our Newsletter!