Thread: Help with this
View Single Post
  #8   Report Post  
Posted to microsoft.public.excel.programming
Dave Peterson Dave Peterson is offline
external usenet poster
 
Posts: 35,218
Default Help with this

Or should you have written:

I tok a punt.



Bob Phillips wrote:

I took a punt.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Bob Umlas" wrote in message
...
You understood "lop the range"?


"Bob Phillips" wrote in message
...
For Each cell In Range("B1:B2")
cell.Value = Chr(34) & cell.Offset(0, -1) & """"
Next cell


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Chris" wrote in message
...
How can I lop the range?

"Bob Umlas" wrote:

Range("A1","A2") doesn't have a value. It's equivalent to

Range("A1:A2")
which also doesn't have a value. Try entering this formula in cell

C5:
=A1:A2
You get #VALUE!
You need to loop through the ranges & surround each individual cell

with
the
quotes.
Also - why did you use Chr(34) in one case and """" in the other? -

just
curious.

"Chris" wrote in message
...
Hi,
Why do I get the error with this

Sub test()

Range("B1", "B2").Value = Chr(34) & Range("A1", "A2").Value

&
""""

End Sub

Type mismatch. I am trying to take all data in one column and

apply
double
quotes and put it in a second column.

Thanks









--

Dave Peterson