Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
Bam Bam is offline
external usenet poster
 
Posts: 48
Default Selection.EntireRow - Filtered

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
  #2   Report Post  
Posted to microsoft.public.excel.programming
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

  #3   Report Post  
Posted to microsoft.public.excel.programming
Bam Bam is offline
external usenet poster
 
Posts: 48
Default Selection.EntireRow - Filtered

That only copies the data in Column C when I need the Range From C:AO.

I may be confusing the issue by even mentioning a filter.

Say i select
R3C18
R20C18
R30C18
(The column number will usually be the same in my selection).

How do i then copy
Range(R3C3:R3C41) To Sheet1!$A2
Range(R20C3:R20C41) To Sheet1!$A3
Range(R30C3:R30C41) To Sheet1!$A4
Etc..for each cell selected.

Any help would be great.

Bam.

"JLGWhiz" wrote:

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

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,986
Default Selection.EntireRow - Filtered

Maybe you can find something at one of these sites to help.

http://www.kayodeok.btinternet.co.uk...excelhowto.htm

http://www.rondebruin.nl/tips.htm

"Bam" wrote:

That only copies the data in Column C when I need the Range From C:AO.

I may be confusing the issue by even mentioning a filter.

Say i select
R3C18
R20C18
R30C18
(The column number will usually be the same in my selection).

How do i then copy
Range(R3C3:R3C41) To Sheet1!$A2
Range(R20C3:R20C41) To Sheet1!$A3
Range(R30C3:R30C41) To Sheet1!$A4
Etc..for each cell selected.

Any help would be great.

Bam.

"JLGWhiz" wrote:

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

  #5   Report Post  
Posted to microsoft.public.excel.programming
Bam Bam is offline
external usenet poster
 
Posts: 48
Default Selection.EntireRow - Filtered

Maybe it's in there but I'm unable to find where?

Anyone else with a suggestion?

Thanks,
Bam.

"JLGWhiz" wrote:

Maybe you can find something at one of these sites to help.

http://www.kayodeok.btinternet.co.uk...excelhowto.htm

http://www.rondebruin.nl/tips.htm

"Bam" wrote:

That only copies the data in Column C when I need the Range From C:AO.

I may be confusing the issue by even mentioning a filter.

Say i select
R3C18
R20C18
R30C18
(The column number will usually be the same in my selection).

How do i then copy
Range(R3C3:R3C41) To Sheet1!$A2
Range(R20C3:R20C41) To Sheet1!$A3
Range(R30C3:R30C41) To Sheet1!$A4
Etc..for each cell selected.

Any help would be great.

Bam.

"JLGWhiz" wrote:

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



  #6   Report Post  
Posted to microsoft.public.excel.programming
JMB JMB is offline
external usenet poster
 
Posts: 2,062
Default Selection.EntireRow - Filtered

Perhaps

Intersect(Selection.EntireRow, Range("C:AO")).Copy
Range("A2").PasteSpecial Paste:=xlPasteValuesAndNumberFormats, _
operation:=xlNone, SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False


"Bam" wrote:

Maybe it's in there but I'm unable to find where?

Anyone else with a suggestion?

Thanks,
Bam.

"JLGWhiz" wrote:

Maybe you can find something at one of these sites to help.

http://www.kayodeok.btinternet.co.uk...excelhowto.htm

http://www.rondebruin.nl/tips.htm

"Bam" wrote:

That only copies the data in Column C when I need the Range From C:AO.

I may be confusing the issue by even mentioning a filter.

Say i select
R3C18
R20C18
R30C18
(The column number will usually be the same in my selection).

How do i then copy
Range(R3C3:R3C41) To Sheet1!$A2
Range(R20C3:R20C41) To Sheet1!$A3
Range(R30C3:R30C41) To Sheet1!$A4
Etc..for each cell selected.

Any help would be great.

Bam.

"JLGWhiz" wrote:

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

  #7   Report Post  
Posted to microsoft.public.excel.programming
Bam Bam is offline
external usenet poster
 
Posts: 48
Default Selection.EntireRow - Filtered

Thankyou JMB - Works Perfect!


"JMB" wrote:

Perhaps

Intersect(Selection.EntireRow, Range("C:AO")).Copy
Range("A2").PasteSpecial Paste:=xlPasteValuesAndNumberFormats, _
operation:=xlNone, SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False


"Bam" wrote:

Maybe it's in there but I'm unable to find where?

Anyone else with a suggestion?

Thanks,
Bam.

"JLGWhiz" wrote:

Maybe you can find something at one of these sites to help.

http://www.kayodeok.btinternet.co.uk...excelhowto.htm

http://www.rondebruin.nl/tips.htm

"Bam" wrote:

That only copies the data in Column C when I need the Range From C:AO.

I may be confusing the issue by even mentioning a filter.

Say i select
R3C18
R20C18
R30C18
(The column number will usually be the same in my selection).

How do i then copy
Range(R3C3:R3C41) To Sheet1!$A2
Range(R20C3:R20C41) To Sheet1!$A3
Range(R30C3:R30C41) To Sheet1!$A4
Etc..for each cell selected.

Any help would be great.

Bam.

"JLGWhiz" wrote:

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

  #8   Report Post  
Posted to microsoft.public.excel.programming
JMB JMB is offline
external usenet poster
 
Posts: 2,062
Default Selection.EntireRow - Filtered

Glad to help - thanks for the feedback

"Bam" wrote:

Thankyou JMB - Works Perfect!


"JMB" wrote:

Perhaps

Intersect(Selection.EntireRow, Range("C:AO")).Copy
Range("A2").PasteSpecial Paste:=xlPasteValuesAndNumberFormats, _
operation:=xlNone, SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False


"Bam" wrote:

Maybe it's in there but I'm unable to find where?

Anyone else with a suggestion?

Thanks,
Bam.

"JLGWhiz" wrote:

Maybe you can find something at one of these sites to help.

http://www.kayodeok.btinternet.co.uk...excelhowto.htm

http://www.rondebruin.nl/tips.htm

"Bam" wrote:

That only copies the data in Column C when I need the Range From C:AO.

I may be confusing the issue by even mentioning a filter.

Say i select
R3C18
R20C18
R30C18
(The column number will usually be the same in my selection).

How do i then copy
Range(R3C3:R3C41) To Sheet1!$A2
Range(R20C3:R20C41) To Sheet1!$A3
Range(R30C3:R30C41) To Sheet1!$A4
Etc..for each cell selected.

Any help would be great.

Bam.

"JLGWhiz" wrote:

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

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Selection.EntireRow.AutoFit Al Excel Programming 2 April 17th 08 01:55 PM
Selection EntireRow Insert Rob Excel Programming 4 March 24th 08 08:32 PM
Autofilter - delete filtered selection Albert Excel Programming 12 February 2nd 08 11:53 AM
Sum only filtered selection pkunAAC Excel Discussion (Misc queries) 3 July 13th 05 04:45 PM
Filtered data selection using vba sudhendra Excel Programming 8 February 9th 04 01:53 PM


All times are GMT +1. The time now is 11:38 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"