![如何在 VBA 中选择当前选定单元格下方的所有空单元格,直到第一个非空单元格](https://linux22.com/image/1354052/%E5%A6%82%E4%BD%95%E5%9C%A8%20VBA%20%E4%B8%AD%E9%80%89%E6%8B%A9%E5%BD%93%E5%89%8D%E9%80%89%E5%AE%9A%E5%8D%95%E5%85%83%E6%A0%BC%E4%B8%8B%E6%96%B9%E7%9A%84%E6%89%80%E6%9C%89%E7%A9%BA%E5%8D%95%E5%85%83%E6%A0%BC%EF%BC%8C%E7%9B%B4%E5%88%B0%E7%AC%AC%E4%B8%80%E4%B8%AA%E9%9D%9E%E7%A9%BA%E5%8D%95%E5%85%83%E6%A0%BC.png)
我正在尝试编写一个宏,复制当前单元格并将文本粘贴到其下方的每个空单元格中,直到到达第一个非空单元格。
因此,如果我在单元格 B2 中输入“Apple”,在单元格 B8 中输入“Orange”,在单元格 B11 中输入“Banana”,则当我选择 B2 并运行宏时,单元格 B3:B7 将填充“Apple”,而当我选择 B8 运行宏时,单元格 B9:B10 将填充“Orange”。
答案1
您确定要使用宏来完成这项简单的任务吗?请尝试以下操作,看看它是否适合您:
C
在样本表中插入一个新列,其中包含“苹果”、“橙子”和“香蕉”- 输入
=IF(B2<>"",B2,C1)
公式C2
- 选择
C2
并向下拖动/填充公式,以获得所需的行数