Problem when insert sheets by macro
"Mike H" wrote:
Hi,
Im confused. The line I gave you will insert sheets in ascending numerical
order to the right of the sheet you started on. What do you want it to do?
Mike
"Harshad" wrote:
Dear MIke,
Thank you,
But still sheet 4 comes before sheet3.
Harshad
"Mike H" wrote:
Maybe
Sheets.Add after:=ActiveSheet
Mike
"Harshad" wrote:
When i run following macro on the sheet 1, all the sheet comes in reverse
direction, means, sheet6, sheet5, sheet4,....Sheet1. i want it as sheet1,
sheet2, sheet3, sheet4, sheet5, sheet6.............etc
The macro i got from this discussion group is as:
Sub Sheet_addition()
Dim i As Long
On Error GoTo endit
Application.ScreenUpdating = False
For i = 1 To 52
Sheets.Add
Next i
endit:
Application.ScreenUpdating = True
End Sub
|