Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
.cells help
Haven't tested it, but probably because you are using the default value property. Try this
Offset(2, (columncount)).Formula = "=SUM(" & .Cells(6, columncount).Address & ":" & .Cells(200, columncount).Address & ")""" and adjust the other one similarly -- HTH RP (remove nothere from the email address if mailing direct) "Carl Brehm" wrote in message ... Why does the following return an error 1004? .Offset(2, (columncount)).Formula = "=SUM(" & .Cells(6, columncount) & ":" & .Cells(200, columncount) & ")""" With Range("weekending")(1, 1) .Offset(0, (columncount)).Value = monthdate 'assigns weekending date to column heading on Worksheet("vendor_totals") .Offset(1, (columncount)).Value = Sheets("sheet1").Range("h1").Value 'assigns sq footage value for week .Offset(2, (columncount)).Formula = "=SUM(" & .Cells(6, columncount) & ":" & .Cells(200, columncount) & ")""" 'assign formula SUM(current column row6: current column row 200) End With -- Carl Brehm Lake Lafourche Bird House Hebert, LA Keets, Tiels, GN Lories, Quakers Mitred Conures, TAG's, Bourkes Lovebirds, Cherry Head Conures Prince of Whales Wholesale Cages to Breeders & Pet Stores |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
.cells help
Returns same 1004 not defined error
The other 2 .offset lines work fine. Is there another way to go about this? Offset(2, (columncount)).Formula = "=SUM(" & .Cells(6, columncount) & ":" & .Cells(200, columncount) & ")""" With Range("weekending")(1, 1) .Offset(0, (columncount)).Value = monthdate 'assigns weekending date to column heading on Worksheet("vendor_totals") .Offset(1, (columncount)).Value = Sheets("sheet1").Range("h1").Value 'assigns sq footage value for week .Offset(2, (columncount)).Formula = "=SUM(" & .Cells(6, columncount) & ":" & .Cells(200, columncount) & ")""" 'assign formula SUM(current column row6: current column row 200) End With -- Carl Brehm Lake Lafourche Bird House Hebert, LA Keets, Tiels, GN Lories, Quakers Mitred Conures, TAG's, Bourkes Lovebirds, Cherry Head Conures Prince of Whales Wholesale Cages to Breeders & Pet Stores "Bob Phillips" wrote in message ... Haven't tested it, but probably because you are using the default value property. Try this Offset(2, (columncount)).Formula = "=SUM(" & .Cells(6, columncount).Address & ":" & .Cells(200, columncount).Address & ")""" and adjust the other one similarly -- HTH RP |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Excel: match two cells in one sheet to two cells in another and return a third cells value | Excel Worksheet Functions | |||
compare 2 column cells and return the adjacent columns cells data of the cell | Excel Worksheet Functions | |||
Compare 1 cell to column of cells returning adjacent cells info? | Excel Worksheet Functions | |||
display a range of cells editible cells based on matching date | Excel Worksheet Functions | |||
trying to create an (almost) circular formula between cells and data validated cells with lists | Excel Worksheet Functions |