VBA를 위해하고있는 경우, 첫째 날을 사용하는 학습

오늘은 데이터를 단순 처리, Wangpei 펭 교사 VBA 과정을 학습의 첫 번째 날
연습 1
의 F는 "부인" "각하"또는 불리는 E 내용에서 1.
C를 코드 명 "기술"을 표시 열에서 할 열 B의 내용에 따라 - "LG", "교양"- "WK", "금융"- "CJ".
열 D는, 행은 빈 이름 삭제
다음과 같이 원시 데이터가되었다 :
VBA를 위해하고있는 경우, 첫째 날을 사용하는 학습

다음과 같은 치료 효과는 다음과 같습니다
VBA를 위해하고있는 경우, 첫째 날을 사용하는 학습

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

최종 하위

코드는 너무 간단하다, 그래서 쓰기

추천

출처blog.51cto.com/3143377/2423457