View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
JLGWhiz JLGWhiz is offline
external usenet poster
 
Posts: 3,986
Default Selection.EntireRow - Filtered

Using what you already have. Just select column C of the filtered range and
use this modified code:

Set serng = Selection
serng.Copy
ActiveSheet.Range("A2").Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats,
Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False


"Bam" wrote:

Hi,

I am trying to copy (selected) filtered data from one sheet to another.

Previously I have used Selection.EntireRow which copies a selection of
filtered rows.

I now need to just copy from Column C to Column AO - Not the EntireRow -
With only the rows that i select.

I have been using this...

Set serng = Selection.EntireRow
serng.Copy
ActiveSheet.Range("A2").Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats,
Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False

But I ultimately only want it to copy from Column C and skip A & B.

How do I just copy partial rows?

Thanks,
Bam