Blank fields

[Guest]

Hi,

I have a work sheet set up with blank fields of varying distances (e.g. see
below example, 1 line gap, 3 line gap) between a large amount of data in a
specifc column, where blank fields exist in the column I'd like to copy the
last data above it to populate the blank field. I've been trying to use
isblank for this command but have had no success. Can anyone advise an
appropriate formula?

Row Column A
1 10000003
2 10000104
3 (would like to insert 10000104 here)
4 10000187
5 (would like to insert 10000187 here)
6 (would like to insert 10000187 here)
7 (would like to insert 10000187 here)
8 10000244

Tks

David

 

[Don Guillett]

try this idea
Sub fillinblanksfromabove()
For Each c In Range("a3:a12")
If c = "" Then c.Value = c.Offset(-1)
Next
End Sub

 

[Guest]

Hi Don,

Tks for this, it works perfectly!

Tks

David

 

[Don Guillett]

Glad to help

 

[Lori]

For a non-code method: choose edit-goto-special-blanks and type =A2
followed by ctrl+enter. Then copy-paste special values on the range

 

[Guest]

I have similar problem. The code below did not work for me. I have data
copied on sheet 2 from sheet 1 and want to display non-blank and non-zero
cells.

Thanks,
Upasana