How do I change this macro to delete a row with one empty cell?

Hi, I need a macro to delete the entire row if the cell in column B is empty. I found a macro for MS Excel (or something) to do exactly the thing I want, but I need something working in LibreOffice Calc. Can somebody “translate” this macro? Or is there a libreoffice substitute to the EntireRow.Delete and SpecialCells(xlCellTypeBlanks) methods?

Sub delete_rows_blank()


End Sub

hey This is not working