Forum Discussion

Brass Contributor

Jul 11, 2022

Adding a new sheet macro.

So I have been using this Macro to add a sheet in a excel spreadsheet for sometime, and it works well.... Sub Add_New_Equipment() ' ' Add_newjobsheet Macro ' ' Sheets("Original").Select Sheet...

Macros and VBA

HansVogelaar

MVP

Jul 11, 2022

Budman361530

Sub Add_New_Equipment()
    With Sheets("Original")
        .Visible = xlSheetVisible
        .Copy Before:=Sheets(2)
        .Visible = xlSheetHidden
    End With
    Sheets("Equipment List").Select
End Sub

Budman361530

Brass Contributor

Jul 17, 2022

Hans,
Just had a few minutes to play with this and it works well. Thank you for the assistance.