Sheet Copy After:

[asmenut]

I have a workbook that contains 5 sheets. From time to time the user will
need to add a sheet after the active sheet.

I know that there is a "Before" option, but is there a way that I can code
(VBA) a way to insert the new sheet "After" the activesheet?

[Bernie Deitrick]

asmenut,

There is an "After" option, too:

ActiveSheet.Copy After:=ActiveSheet

HTH,
Bernie
MS Excel MVP

"asmenut" <[email protected]> wrote in message
news:[email protected]...
> I have a workbook that contains 5 sheets. From time to time the user will
> need to add a sheet after the active sheet.
>
> I know that there is a "Before" option, but is there a way that I can code
> (VBA) a way to insert the new sheet "After" the activesheet?

[Ron de Bruin]

Hi

Try this

Worksheets.Add after:=Worksheets(ActiveSheet.Index)


--
Regards Ron de Bruin
http://www.rondebruin.nl



"asmenut" <[email protected]> wrote in message
news:[email protected]...
>I have a workbook that contains 5 sheets. From time to time the user will
> need to add a sheet after the active sheet.
>
> I know that there is a "Before" option, but is there a way that I can code
> (VBA) a way to insert the new sheet "After" the activesheet?

[Bernie Deitrick]

I'm sorry, I had a slight brain-freeze, and morphed your question from
adding to copying. I should have shown:

Sheets.Add Type:="Worksheet", After:=ActiveSheet

HTH,
Bernie
MS Excel MVP

"Bernie Deitrick" <deitbe @ consumer dot org> wrote in message
news:[email protected]...
> asmenut,
>
> There is an "After" option, too:
>
> ActiveSheet.Copy After:=ActiveSheet
>
> HTH,
> Bernie
> MS Excel MVP
>
> "asmenut" <[email protected]> wrote in message
> news:[email protected]...
> > I have a workbook that contains 5 sheets. From time to time the user
will
> > need to add a sheet after the active sheet.
> >
> > I know that there is a "Before" option, but is there a way that I can
code
> > (VBA) a way to insert the new sheet "After" the activesheet?
>
>

[Dave Peterson]

Or this...

Worksheets.Add after:=ActiveSheet

(maybe better if you have non-worksheets in the workbook)

Ron de Bruin wrote:
>
> Hi
>
> Try this
>
> Worksheets.Add after:=Worksheets(ActiveSheet.Index)
>
> --
> Regards Ron de Bruin
> http://www.rondebruin.nl
>
> "asmenut" <[email protected]> wrote in message
> news:[email protected]...
> >I have a workbook that contains 5 sheets. From time to time the user will
> > need to add a sheet after the active sheet.
> >
> > I know that there is a "Before" option, but is there a way that I can code
> > (VBA) a way to insert the new sheet "After" the activesheet?

--

Dave Peterson

[Ron de Bruin]

You are right Dave (as always<g>)

--
Regards Ron de Bruin
http://www.rondebruin.nl



"Dave Peterson" <[email protected]> wrote in message
news:[email protected]...
> Or this...
>
> Worksheets.Add after:=ActiveSheet
>
> (maybe better if you have non-worksheets in the workbook)
>
> Ron de Bruin wrote:
>>
>> Hi
>>
>> Try this
>>
>> Worksheets.Add after:=Worksheets(ActiveSheet.Index)
>>
>> --
>> Regards Ron de Bruin
>> http://www.rondebruin.nl
>>
>> "asmenut" <[email protected]> wrote in message
>> news:[email protected]...
>> >I have a workbook that contains 5 sheets. From time to time the user
>> >will
>> > need to add a sheet after the active sheet.
>> >
>> > I know that there is a "Before" option, but is there a way that I can
>> > code
>> > (VBA) a way to insert the new sheet "After" the activesheet?
>
> --
>
> Dave Peterson

[Dave Peterson]

Youngster!

Ron de Bruin wrote:
>
> You are right Dave (as always<g>)
>
> --
> Regards Ron de Bruin
> http://www.rondebruin.nl
>
> "Dave Peterson" <[email protected]> wrote in message
> news:[email protected]...
> > Or this...
> >
> > Worksheets.Add after:=ActiveSheet
> >
> > (maybe better if you have non-worksheets in the workbook)
> >
> > Ron de Bruin wrote:
> >>
> >> Hi
> >>
> >> Try this
> >>
> >> Worksheets.Add after:=Worksheets(ActiveSheet.Index)
> >>
> >> --
> >> Regards Ron de Bruin
> >> http://www.rondebruin.nl
> >>
> >> "asmenut" <[email protected]> wrote in message
> >> news:[email protected]...
> >> >I have a workbook that contains 5 sheets. From time to time the user
> >> >will
> >> > need to add a sheet after the active sheet.
> >> >
> >> > I know that there is a "Before" option, but is there a way that I can
> >> > code
> >> > (VBA) a way to insert the new sheet "After" the activesheet?
> >
> > --
> >
> > Dave Peterson

--

Dave Peterson

[Ron de Bruin]

> Youngster!

LOL

--
Regards Ron de Bruin
http://www.rondebruin.nl



"Dave Peterson" <[email protected]> wrote in message
news:[email protected]...
> Youngster!
>
> Ron de Bruin wrote:
>>
>> You are right Dave (as always<g>)
>>
>> --
>> Regards Ron de Bruin
>> http://www.rondebruin.nl
>>
>> "Dave Peterson" <[email protected]> wrote in message
>> news:[email protected]...
>> > Or this...
>> >
>> > Worksheets.Add after:=ActiveSheet
>> >
>> > (maybe better if you have non-worksheets in the workbook)
>> >
>> > Ron de Bruin wrote:
>> >>
>> >> Hi
>> >>
>> >> Try this
>> >>
>> >> Worksheets.Add after:=Worksheets(ActiveSheet.Index)
>> >>
>> >> --
>> >> Regards Ron de Bruin
>> >> http://www.rondebruin.nl
>> >>
>> >> "asmenut" <[email protected]> wrote in message
>> >> news:[email protected]...
>> >> >I have a workbook that contains 5 sheets. From time to time the user
>> >> >will
>> >> > need to add a sheet after the active sheet.
>> >> >
>> >> > I know that there is a "Before" option, but is there a way that I
>> >> > can
>> >> > code
>> >> > (VBA) a way to insert the new sheet "After" the activesheet?
>> >
>> > --
>> >
>> > Dave Peterson
>
> --
>
> Dave Peterson