Hard code the workbook name in macro

B

Bruce

I have a macro to delete a worksheet.
When its run multiple excel files are open. To be sure it doens't accidently
delete the sheet from the wrong file, how can I hardcode the workbook name
into my macro. Assume my workbook is called myFile.xls

Bruce

Sub DelSheets()
Sheets("Sheet2").Delete
End Sub
 
M

Mike H

Hi,

Try this with the name changed to your other workbook

Workbooks("Otherbook.xls").Sheets("Sheet2").Delete

Mike
 
J

Joel

When you open the workbook set an object to the workbook

set bk = workbooks.open(filename:=book1.xls)

set sourceSht = bk.sheets("sheet1")
MyName = Sourcesht.Range("A1")

bk.close savechanges:=false
 
Top