Copy

accessman2

Registered User.
Local time
Today, 15:43
Joined
Sep 15, 2005
Messages
335
Hi,

.Worksheets(1).Cells(10, 1) = 2
.Worksheets(1).Cells(11, 1) = 3
.Worksheets(1).Cells(12, 1) = "=sum(" & .Worksheets(1).Cells(10, 1).Address & ":" & .Worksheets(1).Cells(11, 1).Address & ")"


.Worksheets(1).Cells(10, 2) = 1
.Worksheets(1).Cells(11, 2) = 6
.Worksheets(1).Cells(12, 1).Copy
.Worksheets(1).Cells(12, 2).PasteSpecial xlPasteFormats

It cannot copy the format to there because it has the dollor sign, =Sum($A$15:$A$16)

Which command code can represent =Sum(A15:A16)?

Thanks.
 
Howdy. Can you give a little more? Are you wanting to just sum the two cells above the active cell?
________
Yamaha sr500
 
Last edited:

Users who are viewing this thread

Back
Top Bottom