Sub シートを1番左に追加する()

    Worksheets.Add before:=Worksheets(1)

End Sub