Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Error while moving sheet
Hello;
I'm getting Run-time error '9': Subscript out of range with this code on line with *. Dim FName As String FName = BP & "-" & EP & ".xls" Path = "C:\TS\" If Not FileExists(FName) Then ActiveWorkbook.SaveAs FileName:=Path & FName, _ FileFormat:=xlNormal, Password:="++++", WriteResPassword:="++++" ActiveWorkbook.Close Else Workbooks.Open FileName:=Path & FName, Password:="++++", WriteResPassword:="++++" ActiveWindow.ActivateNext * Sheets(1).Move After:=Workbooks(" & FName & ").Sheets(Sheets.Count) ActiveWorkbook.Close (True) End If When I enter actual file name it is fine. PLease help, Irek |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Error while moving sheet
Irek where do you have BP and EP dim'd and there strings set? i am thinking the BP and EP strings are not passing to this module |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Error while moving sheet
This is not the whole sub, and BP and EP do recalculate correctly
in Immediate window I see ? FName Aug,01-Aug,15.xls "stevebriz" wrote in message ups.com... Irek where do you have BP and EP dim'd and there strings set? i am thinking the BP and EP strings are not passing to this module |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Error while moving sheet
Hello wrote: This is not the whole sub, and BP and EP do recalculate correctly in Immediate window I see ? FName Aug,01-Aug,15.xls "stevebriz" wrote in message ups.com... Irek where do you have BP and EP dim'd and there strings set? i am thinking the BP and EP strings are not passing to this module if you remove the ".xls" from Fname does it open ok? |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Error while moving sheet
"stevebriz" wrote in message oups.com... Hello wrote: This is not the whole sub, and BP and EP do recalculate correctly in Immediate window I see ? FName Aug,01-Aug,15.xls "stevebriz" wrote in message ups.com... Irek where do you have BP and EP dim'd and there strings set? i am thinking the BP and EP strings are not passing to this module if you remove the ".xls" from Fname does it open ok? Thx Steve This is from the macro recorder: Sheets("Jolanta").Move After:=Workbooks("Aug,01-Aug,15.xls").Sheets(1) so .xls should be fine. Need to dig up dipper. Irek |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Error while moving sheet
try this Sheets(1).Move After:=Workbooks(FName).Sheets(Sheets.Count) |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
formula for moving information from one sheet to another sheet | Excel Discussion (Misc queries) | |||
moving from one sheet to another from a cell of a sheet | Excel Worksheet Functions | |||
moving informatiion from one sheet to a total sheet | Excel Discussion (Misc queries) | |||
Error when moving sheet | Excel Programming | |||
Error when moving sheet | Excel Programming |