VBA - Autofill To Last Row of Data

[aeddipa]

I'm trying to write a macro that allows me to autofill columns D:G starting always starting at D7 and going until there is no more data found in columns A:C in any subsequent rows. So, in this example the last piece of data is row 578, but next time it may be 800. How do I write the autofill so that it continue until no matter data is left?

Thanks!

Range("D6").Select
    Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=False
    Range("D7:G7").Select
    Application.CutCopyMode = False
    [B]Selection.autofill Destination:=Range("D7:G578")
[/B]    Columns("F:G").EntireColumn.AutoFit
    Columns("D:D").EntireColumn.AutoFit

 

[jim may]

Cool AlphaFrog - Sorry I didn't see your code line, only saw OP's reference to Col B...

 

[aeddipa]

Appreciate the breakdown. Definitely helped out. I knew most of the lines of code, but not too familiar with the asterisk wildcard.