如果在 MS excel 中单元格值为空或零，则创建一个删除特定单元格并向上移动行的按钮

Creating a button that deletes specific cells and shift row up if cell value is empty or zero in MS excel

我正在尝试在 excel 电子表格中创建一个按钮，它可以删除一行中的 4 个单元格，并在特定单元格中的值为零或 empty.I 有效时向上移动底部的 4 个单元格在其他语言中，我知道基本的 excel 公式，但我对 VBA 知之甚少。我不确定如果正确放置 ms office 讨论是否堆栈溢出。

这里有一篇值得一看的好文章：https://analysistabs.com/vba-code/range/m/delete/

你能提供更多细节吗？例如A1 = 0，则删除A2:A4并向上移动?

If A1 = 0 Then 
  Range("A2:A4").Delete Shift:=xlToUp

如果您正在寻找仅适用于您当前选择的单元格的按钮，您可以尝试：

If ActiveCell = 0 Then
  Range(ActiveCell.Offset(0,1), ActiveCell.Offset(0,4)).Delete Shift:=xlToUp