女sub是什么属性 VBA编程，如何选择上一个或下一个单元格，如此简单

No.1

vba编程中，对单元格操作女sub是什么属性，首先要择单元。

如何准确地选择单元格，就成为编程中最重要的第一步工作。

vba给我们提供了一些很有用的帮助。

下面，介绍一下，如何选择当前已经选择的区域的上一个或下一个单元格。

听上去有点迷糊，实际上就是选择上一个或下一个单元的操作。

类似于Tab键和Shift+Tab键的功能。

用到的属性有如下两个：

No.2

Next属性，选择下一个单元格。

Previous属性：选择上一个单元格。

例如，当前活动单元格为A1，那么Next属性返回B1单元格对象。

Previous属性不返回任何单元，返回一个错误。

对，就是这么任性。

返回一个Range对象，所以，可以对返回的对象进行任何修改和设置。

这就涉及到Range对象的功能了。

下图为例进行介绍：

No.3

本例中任意选择一个单元格，然后单击按钮，可实现选择当前单元格之前或之后的单元格，并对单元格内容赋值为+1或-1运算。

功能很简单，可以实现任何操作，如把当前地址添加到单元格内。

如果是有实际意义的值，也可以应用相关的运算操作。

下面看一下代码：

下一个单元格：

Private Sub GetNextRange()
Dim s As Worksheet
Set s = ThisWorkbook.ActiveSheet
s.Select
Dim r As Range
Set r = ActiveCell 'Range("B" & Cells.Rows.Count)
If r.Column = Cells.Columns.Count Then Exit Sub
With r.Next
   .Value = r.Value + 1
   .Interior.Color = RGB(122, 211, 11)
End With
End Sub

上一个单元格：

Private Sub GetPreviousRange()
Dim s As Worksheet
Set s = ThisWorkbook.ActiveSheet
s.Select
Dim r As Range
Set r = ActiveCell 'Range("B" & Cells.Rows.Count)
If r.Column = 1 Then Exit Sub
With r.Previous
    .Value = r.Value - 1
    .Interior.Color = RGB(12, 111, 211)
End With
End Sub

No.4

选择单元格是一种很有用的操作，在Excel运行机制里面，首先要确定对象，然后再对此对象属性设置或功能计算。

没有对象，就不能执行任何运算女sub是什么属性，结果也自然毫无意义。

就比如，你要传达一个信息，首先要找到被传达的某人，然后再说明要传达的信息内容。

如果，这个步骤反了，走在大街上，不停地说着别人听不明白的话，可能会被误认为一个疯子吧！

所以，确定某一单元格的工作，很有必要。

限 时 特 惠： 本站每日持续更新海量各大内部创业教程，加站长微信免费获取积分，会员只需38元，全站资源免费下载 点击查看详情
站 长 微 信： thumbxmw