Sheets. Item(“ID”) If WS. Cells(xlCellType=1, 1). Value <> “" Then WS. Cells(xlCellType=1, 1). Value = “" End If Next WS Write Cells(xlSheetType=1,1,C(“id”, “") ) “", Sheet. Range(“A1:C7”), “,” Next WS End Sub I had to put in the whole sheet number, and for this code it's okay. But I was getting an error that the cell was deleted when I added and deleted sheets from my system. If anyone knows what the code is doing wrong, please let me know. How to Add multiple Worksheets to Excel using the Copy, Paste, or Import options (8 steps) Add Multiple Worksheets to Excel using the Copy and Paste or Import options · In a text box, type the first names of all the cells in the table or workbook you want to add to Excel, including the table and workbook names, and press Enter. This will create a new file which you should save in the same folder as the file you are working with. Step 2: Make sure Excel runs and has all your worksheets open, by visiting My Computer. How to Find All the Tabs on a Workbook (Video) · Press CTRL+F and type “tabs” in the Find text box. · For each tab, press CTRL+L to display the next name in the line. · When you're finished, you'll see the list of tabs.