with activecell.rows
.autofill .resize(1)
end with

これなにか間違ってる？