PC Review


Reply
Thread Tools Rate Thread

How to copy automatically from sheetx to sheet1

 
 
Macbet
Guest
Posts: n/a
 
      2nd Sep 2007
Every day I have to write data to different worksheets.
So there is written as example in
sheet2 E80 value = 40.00
sheet3 E34 value = 25.50
sheet4 E78 value = 140.75

I would like to have this data automatically copied to
sheet1
Columns B2 = sheet2 E80
Columns B3 = sheet3 E34
Columns B4 = sheet4 E78

By the next daily entry the row will increase
And should copy
Columns B2 = sheet2 E81
Columns B3 = sheet3 E35
Columns B4 = sheet4 E79

Has somebody an idea, how to do this with excel?

Thanks in advance
macbet

 
Reply With Quote
 
 
 
 
Boris
Guest
Posts: n/a
 
      2nd Sep 2007
On Sat, 01 Sep 2007 23:28:59 -0700, Macbet wrote:

> Every day I have to write data to different worksheets.
> So there is written as example in
> sheet2 E80 value = 40.00
> sheet3 E34 value = 25.50
> sheet4 E78 value = 140.75
>
> I would like to have this data automatically copied to
> sheet1
> Columns B2 = sheet2 E80
> Columns B3 = sheet3 E34
> Columns B4 = sheet4 E78
>
> By the next daily entry the row will increase
> And should copy
> Columns B2 = sheet2 E81
> Columns B3 = sheet3 E35
> Columns B4 = sheet4 E79
>
> Has somebody an idea, how to do this with excel?
>
> Thanks in advance
> macbet


Hi Macbet,

try this code:
---
Function GetLastCell(rRange As Variant) As Variant
GetLastCell = rRange.Cells(rRange.Rows.Count, 1).End(xlUp)
End Function
---

It will get you the last data of first column in given range, so if you use
it like this:

B2: =GetLastCell(Sheet2!E:E)
B3: =GetLastCell(Sheet3!E:E)
B4: =GetLastCell(Sheet4!E:E)

you will get your data.
You can substitute smaller range (I've used entire E columns) if you have
some another data below in those columns.

Regards,
B.
 
Reply With Quote
 
JE McGimpsey
Guest
Posts: n/a
 
      2nd Sep 2007
One way:

B2: =INDEX(Sheet2!E:E, COUNTA(Sheet2!E:E))

assuming no blank rows in Sheet2!E:E (adjust the count as necessary if
there are blanks, e.g.:

=INDEX(Sheet2!E:E, COUNTA(Sheet2!E:E)+3)

if 3 blank rows.


In article <(E-Mail Removed)>,
Macbet <(E-Mail Removed)> wrote:

> Every day I have to write data to different worksheets.
> So there is written as example in
> sheet2 E80 value = 40.00
> sheet3 E34 value = 25.50
> sheet4 E78 value = 140.75
>
> I would like to have this data automatically copied to
> sheet1
> Columns B2 = sheet2 E80
> Columns B3 = sheet3 E34
> Columns B4 = sheet4 E78
>
> By the next daily entry the row will increase
> And should copy
> Columns B2 = sheet2 E81
> Columns B3 = sheet3 E35
> Columns B4 = sheet4 E79
>
> Has somebody an idea, how to do this with excel?
>
> Thanks in advance
> macbet

 
Reply With Quote
 
Macbet
Guest
Posts: n/a
 
      3rd Sep 2007
Thanks a lot
Have used the function from Boris
and implemented the formula from McGimpsey

it works !!
Thanks again

 
Reply With Quote
 
=?Utf-8?B?S2FuaGFpeWE=?=
Guest
Posts: n/a
 
      3rd Sep 2007
Hi,
I would like to do this same operation with a little difference. I need to
copy data
from sheets on various client machines to my server machine. How can I do
that?

"Macbet" wrote:

> Every day I have to write data to different worksheets.
> So there is written as example in
> sheet2 E80 value = 40.00
> sheet3 E34 value = 25.50
> sheet4 E78 value = 140.75
>
> I would like to have this data automatically copied to
> sheet1
> Columns B2 = sheet2 E80
> Columns B3 = sheet3 E34
> Columns B4 = sheet4 E78
>
> By the next daily entry the row will increase
> And should copy
> Columns B2 = sheet2 E81
> Columns B3 = sheet3 E35
> Columns B4 = sheet4 E79
>
> Has somebody an idea, how to do this with excel?
>
> Thanks in advance
> macbet
>
>

 
Reply With Quote
 
 
 
Reply

Thread Tools
Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

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


Similar Threads
Thread Thread Starter Forum Replies Last Post
Copy from file1 sheet1/file2 sheet1 last blank row =?Utf-8?B?VGFzaGE=?= Microsoft Excel Programming 2 22nd Aug 2007 08:24 PM
How do I automatically (using a formula like =SHEET1!A$1) referen. =?Utf-8?B?UnluYXJkdA==?= Microsoft Excel Worksheet Functions 1 23rd Feb 2005 07:00 PM
how can i call a sub() automatically when someone click on sheet1 =?Utf-8?B?U2FhZGk=?= Microsoft Excel Worksheet Functions 2 7th Jan 2005 08:37 PM
copy sheet1 from bookA to bookB =?Utf-8?B?TWFuZnJlZA==?= Microsoft Excel Misc 2 6th Apr 2004 11:16 AM
If I write numbers in C4 sheet1 I want to copy Dag Johansen Microsoft Excel Worksheet Functions 5 28th Jul 2003 07:40 AM


Features
 

Advertising
 

Newsgroups
 


All times are GMT +1. The time now is 05:13 AM.