| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Worksheet add
I am using the following to add worksheets to the active workbook.
ActiveWorkbook.Worksheets.Add This works except it always adds to the far left. How do I add new worksheets so that they go from left to right? What I have done is written a macro that adds up to 15 worksheets and allows the user to input the header, Tab name and then formats the header and footer for each new sheet. This makes left to right most usful. Thanks |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Worksheet add
don't use both of these, just 2 examples
Sub test() Dim wsnew As Worksheet Set wsnew = Worksheets.Add(after:=Worksheets(Worksheets.Count) ) Set wsnew = Worksheets.Add(after:=Worksheets("Sheet2")) End Sub -- Gary "lwm" wrote in message ... I am using the following to add worksheets to the active workbook. ActiveWorkbook.Worksheets.Add This works except it always adds to the far left. How do I add new worksheets so that they go from left to right? What I have done is written a macro that adds up to 15 worksheets and allows the user to input the header, Tab name and then formats the header and footer for each new sheet. This makes left to right most usful. Thanks |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Worksheet add
hi
see if this might work for you ActiveWorkbook.Sheets.Add After:= _ Worksheets(Worksheets.Count) regards FSt1 "lwm" wrote: I am using the following to add worksheets to the active workbook. ActiveWorkbook.Worksheets.Add This works except it always adds to the far left. How do I add new worksheets so that they go from left to right? What I have done is written a macro that adds up to 15 worksheets and allows the user to input the header, Tab name and then formats the header and footer for each new sheet. This makes left to right most usful. Thanks |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Worksheet add
Thank you both for youre quick and helpfull responses.
"FSt1" wrote: hi see if this might work for you ActiveWorkbook.Sheets.Add After:= _ Worksheets(Worksheets.Count) regards FSt1 "lwm" wrote: I am using the following to add worksheets to the active workbook. ActiveWorkbook.Worksheets.Add This works except it always adds to the far left. How do I add new worksheets so that they go from left to right? What I have done is written a macro that adds up to 15 worksheets and allows the user to input the header, Tab name and then formats the header and footer for each new sheet. This makes left to right most usful. Thanks |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Worksheet add
you're welcome
regards FSt1 "lwm" wrote: Thank you both for youre quick and helpfull responses. "FSt1" wrote: hi see if this might work for you ActiveWorkbook.Sheets.Add After:= _ Worksheets(Worksheets.Count) regards FSt1 "lwm" wrote: I am using the following to add worksheets to the active workbook. ActiveWorkbook.Worksheets.Add This works except it always adds to the far left. How do I add new worksheets so that they go from left to right? What I have done is written a macro that adds up to 15 worksheets and allows the user to input the header, Tab name and then formats the header and footer for each new sheet. This makes left to right most usful. Thanks |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| automatically appending newly added data on worksheet to a master list worksheet | Links and Linking in Excel | |||
| plot graph from multiple worksheet as embedded chart object on every worksheet | Charts and Charting in Excel | |||
| plot graph from multiple worksheet as embedded chart object on every worksheet | New Users to Excel | |||
| Upload multiple text files into 1 excel worksheet + put the filename as the first column in the worksheet | Excel Worksheet Functions | |||
| Attaching a JET database to an Excel Worksheet OR storing large binary data in a worksheet | Excel Programming | |||
Hybrid Mode
