Here is the easiest way that I know of in straight excel (no vba). You could
record a macro to do this if you want. In the first blank cell beneath a
populated cell create a formula such as =A1 assuming you are in cell a 2.
Copy this formula. Select the range 6000 plus rows by how ever many columns.
Hit F5 or Ctrl+G. Select Special. Select Blanks. This will select all of the
blank cell. Now just paste. You may want to copy and paste special values the
entire selection.

HTH

"BOB" wrote:

Hi
Im new to VB and need to accomplish the following.
My spread sheet (a .txt file that I am importing) has 6000+ lines. If any
of the data from one line to the next is duplicated the cell is blank
Example:

cat feline black female
white male
tabby

So across the used range. if the cell is blank I would like to copy in the
same entry as the cell above it
to give:

cat feline black female
cat feline white male
cat feline tabby male

Thanks for all replies