[2주차] DIM, SET, FOR, IF 만 알면된다.

VBA 4주 완성
작성자
scjsc
작성일
2022-07-16 20:00
조회
36

1. 열심히 공부한 흔적이 담긴 사진을 남겨주세요!

 

2. 이번 스터디에서 새롭게 알게되거나 유익했던 내용을 3가지로 요약해주세요!

  1. Dim/Set/For/If 는 중요하다.
  2. Dim사용 = 통합문서, 시트, 범위
    Dim  통합문서 as WorkBook
    Dim 시트 as WorkSheet
    Dim  범위  as Range
  3. If 조건문=함수와 유사한 구조

3. 이번 스터디를 진행하면서 특별히 좋았던 점이나 부족했던 점이 있다면 자유롭게 남겨주세요.

이제 어려워지는 것 같습니다. 복습에 좀 더 노력하겠습니다.

4. 열심히 학습한 결과파일이나 스크린샷, 코드가 있다면 자유롭게 올려주세요.

  1. 시트목차 작성 매크로
    Sub CreateToC()Dim WB As Workbook
    Dim WS As Worksheet
    Dim i As Long

    Set WB = ThisWorkbook
    Set WS = WB.Worksheets("목차")

    For i = 1 To WB.Worksheets.Count
    WS.Range("C" & i).Value = WB.Worksheets(i).Name
    WS.Hyperlinks.Add WS.Range("C" & i), "", WB.Worksheets(i).Name & "!A1"

    Next

    End Sub

  2. 찾기-바꾸기 매크로
    Sub FindReplace()Dim WS As Worksheet
    Dim FindValue As String
    Dim ReplaceValue As String
    Dim Rng As Range
    Dim R As Range

    Set WS = ThisWorkbook.Worksheets("확진자경로")
    FindValue = WS.Range("J4").Value
    ReplaceValue = WS.Range("J5").Value

    Set Rng = Selection

    For Each R In Rng
    If R.Value = FindValue Then
    R.Value = ReplaceValue
    R.Interior.Color = 65535
    End If

    Next

    End Sub

  3. 보너스미션 - Xlookup 함수 만들기
    Function MyXLookUp(lookup_value, lookup_range As Range, return_range As Range)Dim i As Long

    For i = 1 To lookup_range.Rows.Count
    If lookup_range.Cells(i).Value = lookup_value Then
    MyXLookUp = return_range.Cells(i).Value
    Exit Function
    End If

    Next

    End Function

회원등급 : 2레벨
포인트 : 75 EP
전체 0

전체 1,208
번호 카테고리 제목 작성자 작성일 추천 조회
알림
[📚교재 출간 안내] 「진짜쓰는 실무엑셀」 , 드디어 출간되었습니다! (135)
오빠두엑셀 | 2022.02.03 | 추천 392 | 조회 68706
오빠두엑셀 2022.02.03 392 68706
40636 VBA 4주 완성
4주차 VBA강의 노트 엑셀파일첨부파일
이명환 | 2022.07.30 | 추천 0 | 조회 179
이명환 2022.07.30 - 179
40631 VBA 4주 완성
[4주차]VBA 4주 학습 첨부파일
이상민 | 2022.07.30 | 추천 0 | 조회 59
이상민 2022.07.30 - 59
40630 VBA 4주 완성
[3주차]VBA 4주 교육 첨부파일
이상민 | 2022.07.30 | 추천 0 | 조회 47
이상민 2022.07.30 - 47
40627 VBA 4주 완성
[2주차]VBA 4주 완성 학습 첨부파일
이상민 | 2022.07.30 | 추천 0 | 조회 47
이상민 2022.07.30 - 47
40622 VBA 4주 완성
[4주차] VBA 4주차 스터디 노트 엑셀파일첨부파일 (1)
사랑2 | 2022.07.30 | 추천 0 | 조회 50
사랑2 2022.07.30 - 50
40621 VBA 4주 완성
[4주차]엑셀 VBA 4주완성 엑셀파일첨부파일
최동국 | 2022.07.30 | 추천 0 | 조회 37
최동국 2022.07.30 - 37
40618 VBA 4주 완성
[4주차] 스터디 노트, 미션 첨부파일
달구름 | 2022.07.30 | 추천 0 | 조회 46
달구름 2022.07.30 - 46
40616 VBA 4주 완성
[4주차] VBA 4주 완성 특별스터디 4강 엑셀파일첨부파일
Gladiolus | 2022.07.30 | 추천 0 | 조회 47
Gladiolus 2022.07.30 - 47
40615 VBA 4주 완성
[3주차] VBA 4주 완성 특별스터디 3강 엑셀파일첨부파일
Gladiolus | 2022.07.30 | 추천 0 | 조회 35
Gladiolus 2022.07.30 - 35
40614 VBA 4주 완성
[2주차] VBA 4주 완성 특별스터디 2강 엑셀파일첨부파일
Gladiolus | 2022.07.30 | 추천 0 | 조회 41
Gladiolus 2022.07.30 - 41
40612 VBA 4주 완성
[1주차] VBA 4주 완성 특별스터디 1강 엑셀파일
Gladiolus | 2022.07.30 | 추천 0 | 조회 61
Gladiolus 2022.07.30 - 61
40609 VBA 4주 완성
[4주차] VBA 4주 완성 스터디노트 첨부파일
ㅊH 운ㅓ | 2022.07.30 | 추천 0 | 조회 38
ㅊH 운ㅓ 2022.07.30 - 38
40607 VBA 4주 완성
[4주차] 스터디 첨부파일
girls**** | 2022.07.30 | 추천 0 | 조회 37
girls**** 2022.07.30 - 37
40596 VBA 4주 완성
[3주차] 스터디 및 미션 첨부파일
DanP | 2022.07.29 | 추천 0 | 조회 36
DanP 2022.07.29 - 36
40595 VBA 4주 완성
[3주차] VBA 4주 완성 첨부파일
| 2022.07.29 | 추천 0 | 조회 36
2022.07.29 - 36
40592 VBA 4주 완성
[4주차] VBA 4주 완성 첨부파일
익명 | 2022.07.29 | 추천 0 | 조회 39
익명 2022.07.29 - 39
40591 VBA 4주 완성
[2주차] 스터디 및 미션 첨부파일
DanP | 2022.07.29 | 추천 0 | 조회 54
DanP 2022.07.29 - 54
40589 VBA 4주 완성
콜렉션및 배열등 엑셀파일첨부파일
브랑카 | 2022.07.29 | 추천 0 | 조회 36
브랑카 2022.07.29 - 36
40588 VBA 4주 완성
[3주차] VBA 4주 완성 노트 및 과제 엑셀파일첨부파일
토토니 | 2022.07.29 | 추천 0 | 조회 42
토토니 2022.07.29 - 42
40586 VBA 4주 완성
[4주차]VBA 4주 완성 엑셀파일첨부파일
ㅇㅇ나두 | 2022.07.29 | 추천 0 | 조회 40
ㅇㅇ나두 2022.07.29 - 40
글쓰기