概念
excel 自动把手动操作的动作记录下来,然后翻译成VBA代码,保存成为一个宏
录制方法
-
打开工作簿 ->开发工具选项 ->点击录制宏
-
手动操作,结束点击停止宏,Visual Basic生成一段录制的代码
具体操作案例
'录制宏
'把注销掉的卡号删除,把余额为负数卡号标红
Option Explicit
Sub 会员卡()
Dim N
For N = 13 To 2 Step -1
If Cells(N, 4) = "注销" Then '如果状态=注销,删除
Rows(N & ":" & N).Select '字符串连接 假如N=3,(N & ":" & N)就转化为(3:3)
Selection.Delete Shift:=xlUp '注销状态删除
ElseIf Cells(N, 5) < 0 Then '如果余额为负数,标记红颜色
Cells(N, 5).Select 'CELLS()返回的就是一个Range对象,Range("E4").Select
With Selection.Font '余额负数标记红颜色
.Color = -16776961
.TintAndShade = 0
End With
End If
Next N
End Sub