cell values based on one bold cell

[AlenKovacevic]

Hi all,

Basically, what I would like to do is to fill in column A with the values in bold that are in column B.

My first sheet looks like this:

But I would like my sheet to look like this (without using typing of course):

I guess there is some kind of formula or VBA that I could use for that (I have a sheet of 10k rows)?

Many thanks for the help, will be highly appreciated and will save me a lot of time!

Alen

 

[gaz_chops]

If the preceding cell is always blank, try

=IF(OR(B2="",B3=""),"",IF(ISNUMBER(B2),B2,A2))

 

[Fluff]

This also assumes you want the first value after a blank cell

Sub AlenKovacevic()
   Dim Rng As Range
   
   For Each Rng In Range("B:B").SpecialCells(xlConstants).Areas
      Rng.Offset(, -1).Value = Rng.Resize(1).Value
   Next Rng
End Sub

 

[Fluff]

Cross posted How to fill in a cell based on the last bold cell of another column? [SOLVED]

While we do allow Cross-Posting on this site, we do ask that you please mention you are doing so and provide links in each of the threads pointing to the other thread (see rule 13 here along with the explanation: Forum Rules). This way, other members can see what has already been done in regards to a question, and do not waste time working on a question that may already be answered.