Add different formulas to blank cells in different columns only if text value exist in another column

[tropics123]

Hi guys, not sure if this is even a possibility, but here goes....

I'm looking for a vba to insert 4 different formulas in only the blank cells of columns D, E, F, G only if there's a text value in column B. If column B is blank then stop adding formulas.

Thank for you any help on this!

 

[Fluff]

Something like

Sub tropics123()
   With Range("D2", Range("B" & Rows.Count).End(xlUp).Offset(, 2))
      .SpecialCells(xlBlanks).FormulaR1C1 = "=rc1&rc2"
      .Offset(, 1).SpecialCells(xlBlanks).FormulaR1C1 = "=rc2&rc3"
   End With
End Sub