오늘은 데이터를 단순 처리, Wangpei 펭 교사 VBA 과정을 학습의 첫 번째 날
연습 1
의 F는 "부인" "각하"또는 불리는 E 내용에서 1.
C를 코드 명 "기술"을 표시 열에서 할 열 B의 내용에 따라 - "LG", "교양"- "WK", "금융"- "CJ".
열 D는, 행은 빈 이름 삭제
다음과 같이 원시 데이터가되었다 :
다음과 같은 치료 효과는 다음과 같습니다
VBA 코드;
서브 출리 ()
"난은 정수형으로 정의
정수 같이 희미 I
주기에 대해 정의 된 '
26 2 단계 I = -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
Next
최종 하위
코드는 너무 간단하다, 그래서 쓰기