You don't have to use a separate column, you can fill in the blanks right in column B if that's your real goal:
Sub FillInTheBlanks()
'Author: Jerry Beaucaire
'Date: 1/7/2010
'Summary: Fills blank cells in column B with values from column A
Columns("B:B").SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=RC[-1]"
Columns("B:B").Value = Columns("B:B").Value
End Sub
How/Where to install the macro:
1. Open up your workbook
2. Get into VB Editor (Press Alt+F11)
3. Insert a new module (Insert > Module)
4. Copy and Paste in your code (given above)
5. Get out of VBA (Press Alt+Q)
6. Save your sheet
The macro is installed and ready to use. Press Alt-F8 and select FillInTheBlanks from the macro list.
Bookmarks