Add paste value only

[justvba]

Hi I need to paste only the values but when I add it to my code it always gives me an error.

With Rng
.AutoFilter , field:=1, Criteria1:=STBT_Group_1.Value
.Offset(1).SpecialCells(xlCellTypeVisible).Range(Cells(i, "A"), Cells(LASTROW, "D")).Copy _
Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Offset(1)
.AutoFilter
End With

 

[njimack]

You need separate commands for the copy and paste...

With Rng
.AutoFilter , field:=1, Criteria1:=STBT_Group_1.Value
.Offset(1).SpecialCells(xlCellTypeVisible).Range(Cells(i, "A"), Cells(LASTROW, "D")).Copy 
Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Offset(1).PasteSpecial xlPasteValues
.AutoFilter
End With

 

[justvba]

It still has all of the borders, color, and % I just want the text and numbers.

 

[njimack]

My code should just be pasting values, but if you've already run your previous code, you'll need to apply the formatting to the destination cells so that they're formatted as you want.

It still has all of the borders, color, and % I just want the text and numbers.