# Copy all the rows with values "Questioned", "TechHold", and "OnHold" in Column A of Sheetname "Activity Tracker"

#### papajups

##### Board Regular
Hi All,

Good day!

I'm a beginner in Excel that's why I would like to seek for your help and expertise regarding below concern. I tried to search for answers as well from existing posts but I wasn't able to find one. I'm hoping that you can help me.

What I wish to happen is to copy all the rows with values "Questioned", "OnHold", and "TechHold" in Column A of Sheet "Activity Tracker" and paste it all in column B3 of Sheetname "Pending Asia".

Any help will be highly appreciated. Thanks a lot in advance!

regards,

papajups

### Excel Facts

Format cells as date
Select range and press Ctrl+Shift+3 to format cells as date. (Shift 3 is the # sign which sort of looks like a small calendar).

#### farmerscott

##### Well-known Member
Hello,

do you mean that you want the information pasted into Col B starting at row 3?

thx

FarmerScott

#### farmerscott

##### Well-known Member
try the following. Adjust the Col number (in red) to suit your range-

Code:
``````Sub extract_Questioned_OnHold_TechHold()
Dim x As Integer
Dim y As Integer
y = 3
lr = Worksheets("Activity Tracker").Cells(Rows.Count, "A").End(xlUp).Row

For x = 1 To lr
If Cells(x, 1).Value = "Questioned" Or Cells(x, 1).Value = "OnHold" Or Cells(x, 1).Value = "TechHold" Then
Range(Cells(x, 1), Cells(x, [COLOR=#ff0000]12[/COLOR])).Copy Worksheets("Pending Asia").Range("B" & y)
y = y + 1

End If
Next x
End Sub``````

FarmerScott

#### papajups

##### Board Regular
Hi FarmerScott,

You are really great!

With all sincerity in me, thank you so much. This will really help me a lot.

Again, my deepest appreciation.

best regards,
papajups

Replies
15
Views
666
Replies
1
Views
278
Replies
4
Views
253
Replies
0
Views
157
Replies
0
Views
123

1,172,173
Messages
5,879,463
Members
433,434
Latest member
skk0048

### We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.

### Which adblocker are you using?

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

### Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

### Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back