View Single Post
  #7   Report Post  
Posted to microsoft.public.excel.programming
WolfgangPD WolfgangPD is offline
external usenet poster
 
Posts: 16
Default autofill empty cells with a macro in excel

Thanks Mike! I was trying to adjust the range. You just made my morning.
And quite possibly my whole week!

"Mike Fogleman" wrote:

Sub ABC()
Dim rng As Range
Set rng = Cells(Rows.Count, "K").End(xlUp)
Range("L2:N2").AutoFill Range("L2:N2").Resize(rng.Row - 1, 3)
End Sub


Mike F
"WolfgangPD" wrote in message
...
I am unable to figure this out. I have headers in row one. The formulas I
need copied don't start until row 2. Thanks!

"WolfgangPD" wrote:

Ok, I just figured it out. I have headers in row one so how can I
subtract
one?

"WolfgangPD" wrote:

Thanks Tom. That worked but is seems to copy the formula to one extra
row.
Not a big deal. I'm just curious why.

"Tom Ogilvy" wrote:

Assume the formulas are in row 1

Sub ABC()
Dim rng as Range
Set rng = Cells(Rows.Count, "K").End(xlUp)
Range("L1:N1").AutoFill Range("L1:N1").Resize(rng.Row, 3)
End Sub

--
Regards,
Tom Ogilvy


"WolfgangPD" wrote:

I have a macro set-up to copy information into columns A:K. This
information
will change each time. There is a formula in L,M and N. I would
like a macro
that would copy the formulas down to the final row of the info in
column K.
Any suggestions?