View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
Jacob Skaria Jacob Skaria is offline
external usenet poster
 
Posts: 8,520
Default Copy if adjacent Cell has data

Add extension if the workbook is saved....

Workbooks("book1").Sheets("Sheet1").Range("A2") =
Workbooks("book2").Sheets("Sheet1").Range("B2")

If this post helps click Yes
---------------
Jacob Skaria


"Jeff Gross" wrote:

Sorry but I didn't make myself clear. I am copying from a different
worksheet into A2 if there is any data in B2.

Jeff.

"Patrick Molloy" wrote:

if Range("B2").Value <"" then Range("A2")=Range("B2").Value

"Jeff Gross" wrote in message
...
I need to copy text into a cell "A2" if there is any data in "B2". B2
contains a formula but will appear blank if its source has nothing.

Any ideas?

Jeff