ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   How to copy automatically from sheetx to sheet1 (https://www.excelbanter.com/excel-programming/396757-how-copy-automatically-sheetx-sheet1.html)

Macbet

How to copy automatically from sheetx to sheet1
 
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


Boris[_2_]

How to copy automatically from sheetx to sheet1
 
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.

JE McGimpsey

How to copy automatically from sheetx to sheet1
 
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 om,
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


Macbet

How to copy automatically from sheetx to sheet1
 
Thanks a lot
Have used the function from Boris
and implemented the formula from McGimpsey

it works !!
Thanks again


Kanhaiya

How to copy automatically from sheetx to sheet1
 
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




All times are GMT +1. The time now is 07:16 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com