Copy Column Data

[IanT]

I have a column of data where the first record has a value, then the next records will not for so many records, then there is a value, this continues. How can I take the first value copy it into the blank fields until a value is found then that value is copied until the next value is found etc!


Thanks....

 

[namliam]

Something like:

dim rs as dao.recordset
dim myvar as String ' (assuming string)
set rs = currentdb.openrecordset("Select * from yourtable")
Do while not rs.eof
   If not isnull(rs!YourColumn) then
       myvar = rs!YourColumn
   else
       rs.edit
       rs!YourColumn = myvar
       rs.update
    endif
    rs.movenext
loop

Good luck!

P.s. Let me ask the obvious... WHY!???