how to move sheets from one workbook to another

  • Thread starter Thread starter vicky
  • Start date Start date
V

vicky

I need a vba code to MOVE the COPY of sheets from input.xls To
thisworkbook . "VBA code For Moving The Copy oF sheeets"
 
Sub test()
ActiveSheet.Copy after:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
End Sub

HTH. Best wishes Harald
 
hey thanks ... hey can you give a vba code to delete all the sheets
whose sheet name are not
coloured .......
 
Code like that is really dangerous.
Where is the coloring? Sheet names in colored spreadsheet cells, or colored
sheet tabs?
 
hey i got figure it out thru macro recording. thanks ....
For Each wksSheet In ThisWorkbook.Sheets
If wksSheet.Tab.ColorIndex = -4142 Then
wksSheet.Delete
End If
 
Back
Top