code not working correctly

G

Guest

Can anyone tell me why this code is not working? It always gives me a VB
error when it gets to: Range.Select = ("A2:I27")

All I want to do is copy that range from one excel file to another file.

Private Sub CommandButton1_Click()
'phil
ChDir "\\eeroch1nas02\home\CapursoP\Stats\temp"
Workbooks.Open Filename:= _
"\\eeroch1nas02\home\CapursoP\Stats\temp\Agent work share.xls"
Windows("Agent work share.xls").Activate
Sheets("Phil").Select
Range.Select = ("A2:I27")
Selection.Copy
Windows("Agent work share totals template - Version 2.xls").Activate
Sheets("Phil").Select
Range("A2").Select
ActiveSheet.Paste
Range("J2").Select
Windows("Agent work share.xls").Activate
Application.CutCopyMode = False
ActiveWindow.Close
End Sub


Thanks,
Phil
 
H

Helmut Weber

Range("A2:I27").Select

--

Helmut Weber

Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"
 
G

Gord Dibben

Is that I27 as in "eye" or l27 as in "ell" or have you perhaps entered a 1


Gord Dibben MS Excel MVP
 

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