• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

How to Delete Multiple Sheets for other Workbooks

Hi,
I created a macro to consolidate Multiple sheets into to one sheet its is working fine.

But my doubt is how to delete multiple sheets expect one sheet named ("Price_Update_sheet") and
I need to fill down a formula till last column.

Pls help on same macro file enclosed i wrote this but not working.

Code:
 Set s1 = Sheets("Price_Update_sheet")
 lr = [Sheet1].Cells(Rows.Count, 1).End(xlUp).Row
    Sheet1.Activate
    Range("AA2").FormulaR1C1 = "=IF(RC[-8]<>"""",(RC[-8]-RC[-15])/RC[-15],"""")"
    Range("AA2:AA" & lr).FillDown

Thanks
Jawahar
 

Attachments

  • PRP Sheet Consolidate.xlsb
    18.5 KB · Views: 4
Hi, as your attachment does not match your 'explaination' so well elaborate your need in order all is crystal clear, nothin' to guess ...​
 
Back
Top