macro to autofill values only

[tomdi469]

hello all

i am using code to fill down a column. the code works great if the cells only contain values and not formulas.if its a formula then it fills the formulas series when i just want the value copied down. my goal here is to fill the blank cells created when i use the subtotal function. i have tried the different autofill options to no avail.here is the code

Dim LastRow As Long 
     
    LastRow = Sheet2.Cells(Sheet2.Rows.Count, 4).End(xlUp).Row 
     
    Sheet2.Range("a4").AutoFill Destination:=Range("a4:a" & LastRow), Type:=4 
    Sheet2.Range("c4").AutoFill Destination:=Range("c4:c" & LastRow), Type:=4 
    Sheet2.Range("e4").AutoFill Destination:=Range("e4:e" & LastRow), Type:=4 
    Sheet2.Range("f4").AutoFill Destination:=Range("f4:f" & LastRow), Type:=4 
    Sheet2.Range("g4").AutoFill Destination:=Range("g4:g" & LastRow), Type:=4  

looking for that magic solution i so often find here

am using 2007 by the way

thanks much

[SystemsAccountant]

What about using Goto Special?

[JBeaucaire]

Post up a good sample of the data that is causing you problems, and show a "desired result" on another page to make the goal clear. That will help us fully visualize your issue.

GO ADVANCED and use the paperclip icon to attach a workbook.