i am wondering why this doesn't work

this copies one cell just fine:
With Workbooks(fname).Worksheets("data")
Range("c4").Value = .Range("c4")
End With

this copies one cell to the range in c:
With Workbooks(fname).Worksheets("data")
Range("c4:C9").Value = .Range("c4")
End With

this does nothing. i was trying to streamline the copying process, but this
doesn't work. how would i do this?
With Workbooks(fname).Worksheets("data")
Range("c4:C9").Value = .Range("c4:c9")
End With

--


Gary

With Workbooks(fname).Worksheets("data")
.Range("C4:C9").Copy Destination:= Range("C4")
End With


--
Cheers
Nigel



"Gary Keramidas" <GKeramidasATmsn.com wrote in message
...
i am wondering why this doesn't work

this copies one cell just fine:
With Workbooks(fname).Worksheets("data")
Range("c4").Value = .Range("c4")
End With

this copies one cell to the range in c:
With Workbooks(fname).Worksheets("data")
Range("c4:C9").Value = .Range("c4")
End With

this does nothing. i was trying to streamline the copying process, but
this
doesn't work. how would i do this?
With Workbooks(fname).Worksheets("data")
Range("c4:C9").Value = .Range("c4:c9")
End With

--


Gary

Hi Gary,

Use Copy

With Workbooks(fname).Worksheets("data")
Range("C4:C9").Copy .Range("c4")
End With


--

HTH

RP
(remove nothere from the email address if mailing direct)


"Gary Keramidas" <GKeramidasATmsn.com wrote in message
...
i am wondering why this doesn't work

this copies one cell just fine:
With Workbooks(fname).Worksheets("data")
Range("c4").Value = .Range("c4")
End With

this copies one cell to the range in c:
With Workbooks(fname).Worksheets("data")
Range("c4:C9").Value = .Range("c4")
End With

this does nothing. i was trying to streamline the copying process, but
this
doesn't work. how would i do this?
With Workbooks(fname).Worksheets("data")
Range("c4:C9").Value = .Range("c4:c9")
End With

--


Gary

that's what i ended up doing, thanks nigel

--


Gary


"Nigel" wrote in message
...
With Workbooks(fname).Worksheets("data")
.Range("C4:C9").Copy Destination:= Range("C4")
End With


--
Cheers
Nigel



"Gary Keramidas" <GKeramidasATmsn.com wrote in message
...
i am wondering why this doesn't work

this copies one cell just fine:
With Workbooks(fname).Worksheets("data")
Range("c4").Value = .Range("c4")
End With

this copies one cell to the range in c:
With Workbooks(fname).Worksheets("data")
Range("c4:C9").Value = .Range("c4")
End With

this does nothing. i was trying to streamline the copying process, but
this
doesn't work. how would i do this?
With Workbooks(fname).Worksheets("data")
Range("c4:C9").Value = .Range("c4:c9")
End With

--


Gary