Hello
I have been writing a code to select all the sheets in my workbook and then delete the cells in which data has to be input to create a new blank template every time to reuse.
I named the range in which data can be input as "NeedDel" whose scope is restricted to the sheet itself.
The purpose of this code is that it will delete the data contained in the range "NeedDel" and make it blank to be used to create a new blank template.
I wrote the following code:
But it didn't work as expected can you please help
I have been writing a code to select all the sheets in my workbook and then delete the cells in which data has to be input to create a new blank template every time to reuse.
I named the range in which data can be input as "NeedDel" whose scope is restricted to the sheet itself.
The purpose of this code is that it will delete the data contained in the range "NeedDel" and make it blank to be used to create a new blank template.
I wrote the following code:
Code:
Sub NeedDel()
Sheets("Summary_Sheet_FC").Range("NeedDel").Select
Sheets("Summary_Sheet_INR").Range("NeedDel").Select
Sheets("Procured_Parts_&_Matls_3").Range("NeedDel").Select
Sheets("Process_4").Range("NeedDel").Select
Sheets("Logistics_&_Others_5").Range("NeedDel").Select Selection.ClearContents
Sheets("Summary_Sheet_FC").Range("M8").Select
End Sub
But it didn't work as expected can you please help
Last edited: