Windows.Activate

S

Steph

Hello all. The code below opens a file, copies the data on a specific sheet
from the opened file, then reactivates the original workbook and pastes the
data. It then goes back to the opened file and closes the file.

When a co-worker runs this code, we get a subscript out of range error on
the line :
Windows("Salary Non").Activate

When I run the code under a different logon, it works fine with no errors.
Is there something that may be logon specific that would cause this code to
fail for one user and not another? And is there a better way to accomplish
this that may eliminate the problem, meaning different syntax or different
commands?

Thanks so much!!

Sub Open_SN()
Set model = ActiveWorkbook
Workbooks.Open Filename:="\\server\folder1\folder2\folder3\Salary Non.xls"
Sheets("Format").Cells.Copy
model.Activate
SN.Select 'Sheet name set in properties window in VBE
Cells.Select
ActiveSheet.Paste
Windows("Salary Non").Activate
Application.CutCopyMode = False
ActiveWorkbook.Close
End Sub
 
G

Guest

always use

Windows("Salary Non.xls").Activate

this will work on all computers.

whether it works or not without the extension is an option in folder options
about displaying known file extensions.
 
S

Steph

Thanks guys!!

Tom Ogilvy said:
always use

Windows("Salary Non.xls").Activate

this will work on all computers.

whether it works or not without the extension is an option in folder
options
about displaying known file extensions.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top