Copy sum of values from one sheet to another
Closed
bj
-
Oct 19, 2010 at 12:59 PM
venkat1926 Posts 1863 Registration date Sunday June 14, 2009 Status Contributor Last seen August 7, 2021 - Oct 20, 2010 at 09:26 PM
venkat1926 Posts 1863 Registration date Sunday June 14, 2009 Status Contributor Last seen August 7, 2021 - Oct 20, 2010 at 09:26 PM
Related:
- Copy sum from one sheet to another
- Little alchemy cheat sheet - Guide
- Google sheet right to left - Guide
- Excel copy data from one sheet to another automatically - Guide
- How to screenshot excel sheet - Guide
- Cmd network commands cheat sheet - Guide
3 responses
venkat1926
Posts
1863
Registration date
Sunday June 14, 2009
Status
Contributor
Last seen
August 7, 2021
811
Oct 20, 2010 at 06:21 AM
Oct 20, 2010 at 06:21 AM
quote
sLastRow = oSheet1.Cells(oBook1.Worksheets(1).rows.count, "O").end(Excel.XlDirection.xlUp)
dLastRow = oSheet2.Range("A6").End(Excel.XlDirection.xlToRight)
dLastRow.Copy(sLastRow)
unquote
Yo;u have not explained what you want to do It is difficult to GUESS what you are thinking to do just from the code statements you have given .please repost
sLastRow = oSheet1.Cells(oBook1.Worksheets(1).rows.count, "O").end(Excel.XlDirection.xlUp)
dLastRow = oSheet2.Range("A6").End(Excel.XlDirection.xlToRight)
dLastRow.Copy(sLastRow)
unquote
Yo;u have not explained what you want to do It is difficult to GUESS what you are thinking to do just from the code statements you have given .please repost
Hi Venkat,
I have sheet1 which has a column "O". I need to sum the values in this coulumn.
I have sheet2 which has row index "6". I need to append the sum (calculated earlier in sheet1 ) to row 6 of sheet2. Row 6 already has some values. I need to append the sum of values in Column "O" in sheet1 to sheet2. And this I need to do for every month.
Please give some pointers on the same.
Thanks.
I have sheet1 which has a column "O". I need to sum the values in this coulumn.
I have sheet2 which has row index "6". I need to append the sum (calculated earlier in sheet1 ) to row 6 of sheet2. Row 6 already has some values. I need to append the sum of values in Column "O" in sheet1 to sheet2. And this I need to do for every month.
Please give some pointers on the same.
Thanks.
venkat1926
Posts
1863
Registration date
Sunday June 14, 2009
Status
Contributor
Last seen
August 7, 2021
811
Oct 20, 2010 at 09:26 PM
Oct 20, 2010 at 09:26 PM
my sample workbook with sheet1 and sheet2 download from this webpage
http://www.speedyshare.com/files/24796632/BJ.xls
I ran this macro (the macro is in standard module of this workbook)
see whether you got what you want.(see sheet2cell O6) You said every month. what does that signify. do you have different workbook for different month
use the same macro
http://www.speedyshare.com/files/24796632/BJ.xls
I ran this macro (the macro is in standard module of this workbook)
see whether you got what you want.(see sheet2cell O6) You said every month. what does that signify. do you have different workbook for different month
use the same macro
Sub test()
Dim j As Double, r As Range
With Worksheets("sheet1")
Set r = Range(.Range("O2"), .Range("O2").End(xlDown))
'MsgBox r.Address
j = WorksheetFunction.Sum(r)
'MsgBox j
End With
With Worksheets("sheet2")
.Cells(6, "O") = j
End With
End Sub
