Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 44
Default How can I transfer a required data from sheet 1 to sheet 2 automat

How can I transfer a required / certain data from sheet one to another sheet
two automatically in a same file

example

SHEET ONE

A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
2 8550 2000 DEC 1000 2000
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
5 8550 2000 DEC 1000 2000
6 6750 5555 JAN 6000 111 PANDING
..
..
..
..

I want to shift only that line which F column is reflecting = Panding.

Like result on sheet two in following condition
A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
6 6750 5555 JAN 6000 111 PANDING
..
..
..
..

quick response will be highly appreciated.

Regards
Malik Nadeem
Karachi - Pakistan
cell # 0092 300 2556512
  #2   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 9,101
Default How can I transfer a required data from sheet 1 to sheet 2 automat

Try this code

Sub movedata()

Sh2RowCount = 1
With Sheets("Sheet1")
LastRow = .Cells(Rows.Count, "A").End(xlUp).Row
Set ReflectRange = .Range("F1:F" & LastRow)

For Each cell In ReflectRange
If cell.Value = "PANDING" Then
.Rows(cell.Row).Copy _
Destination:=Sheets("Sheet2"). _
Rows(Sh2RowCount)
Sh2RowCount = Sh2RowCount + 1
End If
Next cell
End With

End Sub

"Malik Nadeem" wrote:

How can I transfer a required / certain data from sheet one to another sheet
two automatically in a same file

example

SHEET ONE

A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
2 8550 2000 DEC 1000 2000
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
5 8550 2000 DEC 1000 2000
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

I want to shift only that line which F column is reflecting = Panding.

Like result on sheet two in following condition
A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

quick response will be highly appreciated.

Regards
Malik Nadeem
Karachi - Pakistan
cell # 0092 300 2556512

  #3   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 44
Default How can I transfer a required data from sheet 1 to sheet 2 aut

thanks for your reply sorry for being late in my response
shall i use this through VB in excel?

also please advise is there any other option like following formula.
=INDEX(Sheet1!$A$2:$IV$4000, ???????????)

thanks for your continued support/help

regards
Malik Nadeem


"Joel" wrote:

Try this code

Sub movedata()

Sh2RowCount = 1
With Sheets("Sheet1")
LastRow = .Cells(Rows.Count, "A").End(xlUp).Row
Set ReflectRange = .Range("F1:F" & LastRow)

For Each cell In ReflectRange
If cell.Value = "PANDING" Then
.Rows(cell.Row).Copy _
Destination:=Sheets("Sheet2"). _
Rows(Sh2RowCount)
Sh2RowCount = Sh2RowCount + 1
End If
Next cell
End With

End Sub

"Malik Nadeem" wrote:

How can I transfer a required / certain data from sheet one to another sheet
two automatically in a same file

example

SHEET ONE

A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
2 8550 2000 DEC 1000 2000
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
5 8550 2000 DEC 1000 2000
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

I want to shift only that line which F column is reflecting = Panding.

Like result on sheet two in following condition
A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

quick response will be highly appreciated.

Regards
Malik Nadeem
Karachi - Pakistan
cell # 0092 300 2556512

  #4   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 9,101
Default How can I transfer a required data from sheet 1 to sheet 2 aut

worksheet functions cannot move data. Worksheet functions can only get data
from other locations. The code I gave you is a VBA macro.

"Malik Nadeem" wrote:

thanks for your reply sorry for being late in my response
shall i use this through VB in excel?

also please advise is there any other option like following formula.
=INDEX(Sheet1!$A$2:$IV$4000, ???????????)

thanks for your continued support/help

regards
Malik Nadeem


"Joel" wrote:

Try this code

Sub movedata()

Sh2RowCount = 1
With Sheets("Sheet1")
LastRow = .Cells(Rows.Count, "A").End(xlUp).Row
Set ReflectRange = .Range("F1:F" & LastRow)

For Each cell In ReflectRange
If cell.Value = "PANDING" Then
.Rows(cell.Row).Copy _
Destination:=Sheets("Sheet2"). _
Rows(Sh2RowCount)
Sh2RowCount = Sh2RowCount + 1
End If
Next cell
End With

End Sub

"Malik Nadeem" wrote:

How can I transfer a required / certain data from sheet one to another sheet
two automatically in a same file

example

SHEET ONE

A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
2 8550 2000 DEC 1000 2000
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
5 8550 2000 DEC 1000 2000
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

I want to shift only that line which F column is reflecting = Panding.

Like result on sheet two in following condition
A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

quick response will be highly appreciated.

Regards
Malik Nadeem
Karachi - Pakistan
cell # 0092 300 2556512

  #5   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 44
Default How can I transfer a required data from sheet 1 to sheet 2 aut

dear Joel,

thank you for your prompt response. my knowledeg of VBA macro is very
limited. can you sent me an email address where i can forward my file which
will clearify my requirments

for example i would like to copy only that data from sheet one to sheet 3
which does not have any value in "pending" colum.

thanks in advance for your great support in help.

Regards
Malik Nadeem


"Joel" wrote:

worksheet functions cannot move data. Worksheet functions can only get data
from other locations. The code I gave you is a VBA macro.

"Malik Nadeem" wrote:

thanks for your reply sorry for being late in my response
shall i use this through VB in excel?

also please advise is there any other option like following formula.
=INDEX(Sheet1!$A$2:$IV$4000, ???????????)

thanks for your continued support/help

regards
Malik Nadeem


"Joel" wrote:

Try this code

Sub movedata()

Sh2RowCount = 1
With Sheets("Sheet1")
LastRow = .Cells(Rows.Count, "A").End(xlUp).Row
Set ReflectRange = .Range("F1:F" & LastRow)

For Each cell In ReflectRange
If cell.Value = "PANDING" Then
.Rows(cell.Row).Copy _
Destination:=Sheets("Sheet2"). _
Rows(Sh2RowCount)
Sh2RowCount = Sh2RowCount + 1
End If
Next cell
End With

End Sub

"Malik Nadeem" wrote:

How can I transfer a required / certain data from sheet one to another sheet
two automatically in a same file

example

SHEET ONE

A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
2 8550 2000 DEC 1000 2000
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
5 8550 2000 DEC 1000 2000
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

I want to shift only that line which F column is reflecting = Panding.

Like result on sheet two in following condition
A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

quick response will be highly appreciated.

Regards
Malik Nadeem
Karachi - Pakistan
cell # 0092 300 2556512



  #6   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 9,101
Default How can I transfer a required data from sheet 1 to sheet 2 aut

You can e-mail the file at the following address



"Malik Nadeem" wrote:

dear Joel,

thank you for your prompt response. my knowledeg of VBA macro is very
limited. can you sent me an email address where i can forward my file which
will clearify my requirments

for example i would like to copy only that data from sheet one to sheet 3
which does not have any value in "pending" colum.

thanks in advance for your great support in help.

Regards
Malik Nadeem


"Joel" wrote:

worksheet functions cannot move data. Worksheet functions can only get data
from other locations. The code I gave you is a VBA macro.

"Malik Nadeem" wrote:

thanks for your reply sorry for being late in my response
shall i use this through VB in excel?

also please advise is there any other option like following formula.
=INDEX(Sheet1!$A$2:$IV$4000, ???????????)

thanks for your continued support/help

regards
Malik Nadeem


"Joel" wrote:

Try this code

Sub movedata()

Sh2RowCount = 1
With Sheets("Sheet1")
LastRow = .Cells(Rows.Count, "A").End(xlUp).Row
Set ReflectRange = .Range("F1:F" & LastRow)

For Each cell In ReflectRange
If cell.Value = "PANDING" Then
.Rows(cell.Row).Copy _
Destination:=Sheets("Sheet2"). _
Rows(Sh2RowCount)
Sh2RowCount = Sh2RowCount + 1
End If
Next cell
End With

End Sub

"Malik Nadeem" wrote:

How can I transfer a required / certain data from sheet one to another sheet
two automatically in a same file

example

SHEET ONE

A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
2 8550 2000 DEC 1000 2000
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
5 8550 2000 DEC 1000 2000
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

I want to shift only that line which F column is reflecting = Panding.

Like result on sheet two in following condition
A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

quick response will be highly appreciated.

Regards
Malik Nadeem
Karachi - Pakistan
cell # 0092 300 2556512

  #7   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 44
Default How can I transfer a required data from sheet 1 to sheet 2 aut

thanks joel
email has been forwarded to you.

"Joel" wrote:

You can e-mail the file at the following address



"Malik Nadeem" wrote:

dear Joel,

thank you for your prompt response. my knowledeg of VBA macro is very
limited. can you sent me an email address where i can forward my file which
will clearify my requirments

for example i would like to copy only that data from sheet one to sheet 3
which does not have any value in "pending" colum.

thanks in advance for your great support in help.

Regards
Malik Nadeem


"Joel" wrote:

worksheet functions cannot move data. Worksheet functions can only get data
from other locations. The code I gave you is a VBA macro.

"Malik Nadeem" wrote:

thanks for your reply sorry for being late in my response
shall i use this through VB in excel?

also please advise is there any other option like following formula.
=INDEX(Sheet1!$A$2:$IV$4000, ???????????)

thanks for your continued support/help

regards
Malik Nadeem


"Joel" wrote:

Try this code

Sub movedata()

Sh2RowCount = 1
With Sheets("Sheet1")
LastRow = .Cells(Rows.Count, "A").End(xlUp).Row
Set ReflectRange = .Range("F1:F" & LastRow)

For Each cell In ReflectRange
If cell.Value = "PANDING" Then
.Rows(cell.Row).Copy _
Destination:=Sheets("Sheet2"). _
Rows(Sh2RowCount)
Sh2RowCount = Sh2RowCount + 1
End If
Next cell
End With

End Sub

"Malik Nadeem" wrote:

How can I transfer a required / certain data from sheet one to another sheet
two automatically in a same file

example

SHEET ONE

A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
2 8550 2000 DEC 1000 2000
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
5 8550 2000 DEC 1000 2000
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

I want to shift only that line which F column is reflecting = Panding.

Like result on sheet two in following condition
A B C D E F €¦€¦€¦€¦€¦€¦€¦€¦.
1 4550 1000 APRIL 15000 4550 PANDING
3 6750 5555 JAN 6000 111 PANDING
4 4550 1000 APRIL 15000 4550 PANDING
6 6750 5555 JAN 6000 111 PANDING
.
.
.
.

quick response will be highly appreciated.

Regards
Malik Nadeem
Karachi - Pakistan
cell # 0092 300 2556512

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
how to transfer data from sheet to sheet with new range? Jon Excel Discussion (Misc queries) 6 August 20th 07 06:36 PM
How to Automatically transfer specific Data from Sheet 1 to Sheet Jman Excel Worksheet Functions 12 May 10th 07 05:35 AM
How do I transfer data from 1 sheet to another? Syd Excel Worksheet Functions 2 June 7th 06 05:45 PM
Transfer data from one sheet to another Cody Excel Discussion (Misc queries) 1 November 28th 05 02:36 AM
Transfer data from sheet to sheet Jenn Excel Discussion (Misc queries) 4 January 20th 05 03:07 PM


All times are GMT +1. The time now is 04:29 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"