日记首页
|
列表
|
添加日记
|
管理登陆
标题：关于Xldown和Xlup的用法（Excel VBA）
<span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">Xldown和xlup是一对组合，用于寻找某个区间中的非空单元格。</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">首先我们在单元格的前7行填入如下数据：</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">A1单元格：</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">A2单元格：2</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">A3单元格：3</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">A4单元格：4</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">A5单元格：</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">A6单元格：6</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">A7单元格：7</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">A8单元格：</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">A9单元格：</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">A10单元格：</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">A1，A5，A8，A9，A10留空。</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">代码一：</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">Worksheets("Sheet1").Range("A1").Select</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">Selection.End(xlDown).Select</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">——最终被选中的单元格是A2</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">代码二：</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">Worksheets("Sheet1").Range("A2").Select</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">Selection.End(xlDown).Select</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">——最终被选中的单元格是A4</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">代码三：</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">Worksheets("Sheet1").Range("A10").Select</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">Selection.End(xlUp).Select</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">——最终被选中的单元格是A7</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">通过这三个例子，我们可以更好地理解xlDown和xlUp的用法。</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">xlDown:从被选中的单元格向下寻找，如果被选中单元格为空，则一直向下走到第一个非空单元格；如果被选中单元格为非空，则向下走到最后一个非空单元格。</span><br style="box-sizing: inherit; color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;"><span style="color: rgb(68, 68, 68); font-family: "Microsoft YaHei", Helvetica, Arial, "Lucida Grande", Tahoma, sans-serif; font-size: 16px; text-indent: 32px;">xlUp:只需要将 xlDown的规则倒过来，就是xlUp的规则</span>
