今天是学习王佩丰老师VBA课程的第一天，简单处理数据
练习1，
1.根据E内容，在F称呼“先生”或者“女士”，
2.根据B列内容，在C列显示代号“理工”-“LG”，“文科”-“WK”，“财经”-“CJ”。
3.根据D列，删除姓名为空的行
原料数据如下：
处理效果如下：
VBA代码;
Sub chuli()
‘定义i为整数类型
Dim i As Integer
’定义for循环
For i = 26 To 2 Step -1
‘根据条件生成先生与女士
If Range("E" & i) = "男" Then
Range("F" & i) = "先生"
Else
Range("F" & i) = "女士"
End If
’根据条件生成代号
If Range("B" & i) = "理工" Then
Range("C" & i) = "LG"
ElseIf Range("B" & i) = "文科" Then
Range("C" & i) = "WK"
ElseIf Range("B" & i) = "财经" Then
Range("C" & i) = "CJ"
End If
‘删除姓名为空的行
If Range("D" & i) = "" Then
Rows(i & ":" & i).Select
Selection.Delete shift:=xlUp
End If
NextEnd Sub
代码太简单，就这么写吧