首页 > 解决方案 > VBA Excel在出现空白行后选择内容

问题描述

出现空白行后如何选择数据?

我不知道代码,我只想在图像中显示我想要实现的目标。

情况与以下查询相反:

选择范围内的单元格,直到行为空白

在此处输入图像描述

标签: excelvba

解决方案


这只会选择在第一个空白实例和最后一个实例之间找到的单元格。如果您需要更改,请修改该行Set Target_End


Sub Try()

Dim ws As Worksheet: Set ws = ThisWorkbook.Sheets("Sheet1")
Dim Target_Start As Range, Target_End As Range

Set Target_Start = ws.Cells.Find("", SearchOrder:=xlByColumns).Offset(1)
Set Target_End = Target_Start.End(xlDown).End(xlToRight)

ws.Range(Target_Start, Target_End).Select

End Sub

在此处输入图像描述


推荐阅读