Greetings,

I am a novice at programming and have been reading the FAQs trying
to solve a problem I have.

I need to fill in a column's various "blank cell" of several hundred
rows in the following manner:

1. Select cell of column with text (is the name of individual
working project)

2. Copy cell and paste in all empty cells below text of that
column.

3. Upon reaching next cell in column with text, stop pasting,
select the cell with new text, repeat steps 1-3.

I figured I needed a fail safe like: If blank cells = 15, end sub.
Otherwise it would keep running.

I have started with Excel "record a Macro" function and got the below

Sub FILLinBLANKS()
'
' FILLinBLANKS Macro
' Macro recorded 6/10/2005
'
' Keyboard Shortcut: Ctrl+j
'
Cell.Select
Selection.Copy
Range("B13").Select
ActiveSheet.Paste
Range("B14").Select
ActiveSheet.Paste
Range("B15").Select
ActiveSheet.Paste
End Sub

but of course it is putting stuff in B13:B15. and not doing what I
need it do with looping, copying text cell, filling in blank cells of
the column below the text cell, then selecting the next text cell in
column after the blanks are filled, and repeating process.

thanks for any replies,

bluestar
"ben"


--
Bluestar
------------------------------------------------------------------------
Bluestar's Profile: http://www.excelforum.com/member.php...o&userid=24326
View this thread: http://www.excelforum.com/showthread...hreadid=379295