filldown with formula
Hello,
i have the following code and it works, however it does not filldown the formula. It fillsdown the result of the formula only. I need it to filldown the formula from the original activecell. thanks in advance for any help. Set c = ActiveCell mc = Application.Count(Range(c.Offset(0, -1), c.Offset(0, -1).End(xlDown))) MsgBox mc c.Offset(0, 0).Resize(mc) = c.Offset(0) |
filldown with formula
Hello
Using FillDown, this should do it: LastRow = ActiveCell.Offset(0, -1).End(xlDown).Row Col = ActiveCell.Column FormulaRow = ActiveCell.Row Range(Cells(FormulaRow, Col), Cells(LastRow, Col)).FillDown Regards, Per "Peruanos72" skrev i meddelelsen ... Hello, i have the following code and it works, however it does not filldown the formula. It fillsdown the result of the formula only. I need it to filldown the formula from the original activecell. thanks in advance for any help. Set c = ActiveCell mc = Application.Count(Range(c.Offset(0, -1), c.Offset(0, -1).End(xlDown))) MsgBox mc c.Offset(0, 0).Resize(mc) = c.Offset(0) |
filldown with formula
Thanks Per Jessen. The code worked perfectly and is very clean.
"Per Jessen" wrote: Hello Using FillDown, this should do it: LastRow = ActiveCell.Offset(0, -1).End(xlDown).Row Col = ActiveCell.Column FormulaRow = ActiveCell.Row Range(Cells(FormulaRow, Col), Cells(LastRow, Col)).FillDown Regards, Per "Peruanos72" skrev i meddelelsen ... Hello, i have the following code and it works, however it does not filldown the formula. It fillsdown the result of the formula only. I need it to filldown the formula from the original activecell. thanks in advance for any help. Set c = ActiveCell mc = Application.Count(Range(c.Offset(0, -1), c.Offset(0, -1).End(xlDown))) MsgBox mc c.Offset(0, 0).Resize(mc) = c.Offset(0) |
All times are GMT +1. The time now is 01:09 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com