VBA之活动单元格

不论你点击一个单元格还是选择一个区域，你最先点击的单元格就是活动单元格

 1 '活动单元格：activecell,工作表中活动单元格只有一个
 2 Sub activecells()
 3 a = activecell.Address  '取得活动单元格地址
 4 Cells(2, 3).Activate    '激活指定单元格
 5 End Sub
 6 
 7 'selection光标所选区域
 8 Sub 光标所选区域()
 9     Selection = 1 '把所选的区域都赋值为1
10 End Sub
11 
12 Sub 在selection中的改变活单元格() '在一个区域里逐个激活单元格
13 For i = 1 To Selection.Count '利用 for循环 和 区域.count
14     Selection(i).Activate '没什么用
15 Next
16 End Sub
17 Sub 运用()
18 Dim i As Range
19 For Each i In Selection
20     If i = "" Or i = "缺勤" Then
21         i = "×"
22     End If
23 Next i
24 End Sub
25 
26 '小结：selection的好处在于，可以很自由灵活选择你想要处理的单元格区域
27 
28 
29 
30 Sub 自己写()
31 Dim text As Range
32 For Each text In Selection 'for each in 真正的有用，可以改单元格内容
33     If text = "" Or text = "缺勤" Then
34     text = "x"
35     End If
36     Next
37 End Sub

 

转载于:https://www.cnblogs.com/gilgamesh-hjb/p/7363699.html