若空白单元格上下两个最近的非空单元格内容一致，则空白区域填充相同内容

一列数据，当空白单元格（区域）上下最近的两个非空单元格内容一致时，则空白单元格（区域）填充为一致的内容，否则就空着。希望大佬指点一下，VBA，感谢！