Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA Code Activates a workbook only sometimes
Coded a relatively complex program. When I execute the following -
Workbooks("ACT-Reports.xls").Worksheets("Reports").Activate It was working for a few weeks then the only way to do the same thing became - For Each bkTempBooKxx In Workbooks If bkTempBooKxx.Name = "ACT-Reports.xls" Then bkTempBooKxx.Activate For Each shtWork In Worksheets If shtWork.Name = "Reports" Then shtWork.Activate Exit For End If Next Exit For End If Next Set bkACTRpt = ActiveWorkbook Don't understand???? -- Thanks for any suggestions, Gus Evans |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA Code Activates a workbook only sometimes
You can't activate a sheet in a workbook which is not active. So you can go
either way Workbooks("ACT-Reports.xls").Activate Workbooks("ACT-Reports.xls").Worksheets("Reports").Activate or Application.Goto Workbooks("ACT-Reports.xls") _ .Worksheets("Reports").Range("A1") But you don't need to loop to do it. -- Regards, Tom Ogilvy "GusEvans" wrote in message ... Coded a relatively complex program. When I execute the following - Workbooks("ACT-Reports.xls").Worksheets("Reports").Activate It was working for a few weeks then the only way to do the same thing became - For Each bkTempBooKxx In Workbooks If bkTempBooKxx.Name = "ACT-Reports.xls" Then bkTempBooKxx.Activate For Each shtWork In Worksheets If shtWork.Name = "Reports" Then shtWork.Activate Exit For End If Next Exit For End If Next Set bkACTRpt = ActiveWorkbook Don't understand???? -- Thanks for any suggestions, Gus Evans |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA Code Activates a workbook only sometimes
-- Gus Evans "Tom Ogilvy" wrote: You can't activate a sheet in a workbook which is not active. So you can go either way Workbooks("ACT-Reports.xls").Activate Workbooks("ACT-Reports.xls").Worksheets("Reports").Activate or Application.Goto Workbooks("ACT-Reports.xls") _ .Worksheets("Reports").Range("A1") The second command - Workbooks("ACT-Reports.xls").Worksheets("Reports").Activate and the - Application.Goto Workbooks("ACT-Reports.xls") _ .Worksheets("Reports").Range("A1") Both caused a 32809 error! I can't figure it out either! Gus Evans |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
VBA Code Activates a workbook only sometimes
Another comment -
I opened ACT-Reports.xls, then opened Sheet1.xls. went back to ACT-Reports.xls, put the code in a module, then started stepping thru the code, made Sheet1.xls the active workbook, and continued stepping thru the code - got the 32809 error. Gus Evans |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
selection from dropdown list activates hyperlink | Excel Discussion (Misc queries) | |||
Special Menu activates Web Toolbar | Excel Discussion (Misc queries) | |||
Rectangle that activates a macro | Excel Programming | |||
VB activates unwanted function | Excel Programming | |||
Solver activates other worksheets - why? | Excel Programming |