[2주차] 스터디 및 미션

VBA 4주 완성
작성자
DanP
작성일
2022-07-29 23:41
조회
51

1. 열심히 공부한 흔적이 담긴 사진을 남겨주세요!
(위쪽 카메라 버튼을 클릭해서 이미지를 삽입할 수 있습니다)

 

 

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

- 변수 선언을 통해 메모리의 지정된 크기를 줄여 속도를 향상시키고, 대소문자의 구분으로 코팅의 오탈자를 방지한다.

- 개체는 value가 아니기에set으로 변수 할당

- Worksheet의 순서 (Worksheet index #, Worksheet tab name)로 코팅해서 관련 sheet 지정

 

 

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

ActiveWorkSheet에서 이름지정의 이해가 어려웠는데, 이 강의를 통해 Worksheetsindex # or tab name으로 지정하는 기준을 알게되었습니다.

 

 

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

Sub CreateToC()

Dim WB As Workbook
Dim WS As Worksheet
Dim i As Long

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

For i = 2 To WB.Worksheets.Count

WS.range("C" & i - 1).Value = WB.Worksheets(i).Name
WS.Hyperlinks.Add WS.range("C" & i - 1), "", WB.Worksheets(i).Name & "!A1"

Next

End Sub

 

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

 

 

Function MyXLookUp(lookup_value, lookup_range As Range, return_range As Range)

'=MyXLookup(찾을값, 찾을범위, 출력범위)

 

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

 

 

 

회원등급 : 9레벨
포인트 : 674 EP
전체 0

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