초기화함수 관련 질문

VBA
작성자
달타냥
작성일
2020-11-20 12:56
조회
581

강의를 듣고 질문 드립니다.

최근 크롤링 올려주신 부분 강의 잘 듣고 많이 부분 참조하여 응용하고 있습니다.

먼저 감사드립니다.

근데 마지막 초기화 코드에서 모든 이미지를 지우는 부분이 있는데, 약간의 문제가 발생했습니다.

데이터 유효성 "목록보기" 로 입력처리를 하였고 초기화 코드를 실행하여 모든 이미지를 삭제하였는데,

간혹 목록보기 옆 화살표가 없어지는 증상이 발생하더군요?

이 부분 약간의 버그인가요? 아니면 버튼처럼 목록보기도 예외처리를 해야 하는지요?

만약 예외처리를 해야 한다면 어떻게 하는지요?

 

Sub Football_init()
Dim Shp As Shape

For Each Shp In Sheet3.Shapes
If Left(Shp.Name, 6) <> "Button" Then Shp.Delete      '버튼을 제외하고 삭제, 하지만 목록보기 버튼? 까지 삭제가 됩니다.
Next

With Sheet3
.Range(.Cells(4, 1), .Cells(23, 11)).ClearContents
.Range(.Cells(4, 1), .Cells(23, 11)).RowHeight = 30
End With

End Sub

 

 

 

 

 

 

 

 

 

초기화오류.jpg

회원등급 : 11레벨
포인트 : 805 EP
총질문 : 6 개 (마감율 : 17%)
채택답변 : 0 개
전체 3

  • 2020-11-20 16:14

    @달타냥 님 안녕하세요.

    목록보기 버튼의 도형 이름에 "Button" 이 포함되도록 변경해주시면 됩니다.^^


  • 2020-11-26 12:53

    안녕하세요? 답변 감사드립니다.

    직접 만든 도형이나, 셀 같은 경우에는 Shp.Name이 변경 하여 제외 시켰는데,

    엑셀에서 제공해주는 "목록보기 버튼"의 아래삼각형 버튼은 어떻게 이름을 바꿔야 하는지 모르겠습니다. ???


  • 2020-11-26 14:03

    debug.print Shp.Name  해보니, 목록보기 버튼이 지워질때 에러를 띄우네요.

    Shp

    응용 프로그램 정의 오류 또는 개체 정의 오류입니다

     
    목록버튼 드롭다운버튼 이미지는 저장을 하면 다시 생성 되더라구요..


전체 7,355
번호 카테고리 제목 작성자 작성일 추천 조회
알림
[🏆 VBA 4주 완성 특별 스터디] 1기 - 우수 졸업생 및 후기, 축하합니다! (6)
오빠두엑셀 | 2022.07.31 | 추천 8 | 조회 1244
오빠두엑셀 2022.07.31 8 1244
공지사항 함수/공식
[신규 기능 업데이트!] 👉 이제 게시글 작성시 스크린샷 복/붙이 가능합니다! 😎 (2)
오빠두엑셀 | 2022.08.04 | 추천 4 | 조회 108
오빠두엑셀 2022.08.04 4 108
공지사항 함수/공식
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (88)
오빠두엑셀 | 2021.10.28 | 추천 117 | 조회 6200
오빠두엑셀 2021.10.28 117 6200
41174 함수/공식
New 엑셀 다른시트에서 날짜에 맞춰서 값 불러오기 수식을 어떻게 짜야할지 모르겠어요. 첨부파일 (6)
민호 | 15:37 | 추천 0 | 조회 28
민호 15:37 - 28
41173 함수/공식
New 오빠두에서 제공하는 견적서에 외화를 추가하고 싶습니다. (1)
농푸 | 15:36 | 추천 0 | 조회 17
농푸 15:36 - 17
41170 문서서식
New (초보질문)채우기 색만 복사 붙여넣기 하는 방법 좀 알려주세요~ 엑셀파일첨부파일 (4) 답변완료
추바카 | 12:57 | 추천 0 | 조회 29
추바카 12:57 - 29
41167 기능/도구
New 고급필터 결과값 셀에 형식을 주려면 어떻게 해야 할까요? (1)
| 06:38 | 추천 0 | 조회 24
06:38 - 24
41162 VBA
New 달력 유저폼에서 유저폼 X 하면 현재 날짜 변경 없으면 합니다. 엑셀파일첨부파일 (2) 답변완료
033cola | 2022.08.13 | 추천 0 | 조회 35
033cola 2022.08.13 - 35
41159 함수/공식
New 해당 조건 개수찾기 Max 함수 예제 엑셀파일 (1)
Kim Si Yoon | 2022.08.13 | 추천 0 | 조회 26
Kim Si Yoon 2022.08.13 - 26
41148 VBA
New 셀에서 특정 위치에 있는 문자의 색상을 변경하는 방법 첨부파일 (2) 답변완료
:+:하늘비:+: | 2022.08.13 | 추천 0 | 조회 47
:+:하늘비:+: 2022.08.13 - 47
41147 문서서식
New 엑셀에서 픽셀에 의미에 대해서 질문드립니다. 첨부파일 (5) 답변완료
월마리아 | 2022.08.13 | 추천 0 | 조회 48
월마리아 2022.08.13 - 48
41145 함수/공식
New 이런 경우는 어떻게 해야할까요? 첨부파일 (3) 답변완료
Utaeks | 2022.08.13 | 추천 1 | 조회 47
Utaeks 2022.08.13 1 47
41141 함수/공식
New 어떤 함수를 써야할까요? 첨부파일 (4)
머지않아VBA고수 | 2022.08.13 | 추천 0 | 조회 46
머지않아VBA고수 2022.08.13 - 46
41140 VBA
New 매크로 파일 저장방법이 따로 있나요?파일목록이 추가될때마다 저장확인창이 하나씩 늘어나요ㅠㅠ 첨부파일 (1)
pjc**** | 2022.08.13 | 추천 0 | 조회 22
pjc**** 2022.08.13 - 22
41132 함수/공식
New 함수를 간단히 할 수 있을까요? 엑셀파일 (3)
안동근 | 2022.08.12 | 추천 0 | 조회 46
안동근 2022.08.12 - 46
41129 기능/도구
New 빠른 실행 도구 모음에서 명령 레이블 표시 또는 숨기기 첨부파일 (9) 답변완료
fabikim | 2022.08.12 | 추천 0 | 조회 44
fabikim 2022.08.12 - 44
41126 VBA
New VBA 자동화 용어 및 규칙 등의 작동원리 해석 문의 엑셀파일 (2) 답변완료
pjc**** | 2022.08.12 | 추천 0 | 조회 49
pjc**** 2022.08.12 - 49
41123 함수/공식
New 어떤 함수가 입력된건지 알고싶어요.(함수가 가려져 있는건지 여부도 알고싶네요) 첨부파일 (2) 답변완료
일개회사원 | 2022.08.12 | 추천 0 | 조회 44
일개회사원 2022.08.12 - 44
41117 피벗테이블
New 데이터 모델 관련 오류인데 어떤 오류인지 도저히 모르겠습니다ㅠ 첨부파일 (2) 답변완료
ㅎㅎ | 2022.08.12 | 추천 0 | 조회 39
ㅎㅎ 2022.08.12 - 39
41116 피벗테이블
New 피벗테이블 슬라이서 문의 첨부파일 (1)
조동호 | 2022.08.12 | 추천 0 | 조회 31
조동호 2022.08.12 - 31
41114 함수/공식
New Lookup 함수사용시 출력되는 날짜의 형식오류 첨부파일 (3)
조민양 | 2022.08.12 | 추천 0 | 조회 31
조민양 2022.08.12 - 31
41112 피벗테이블
New 엑셀 피벗테이블 필터부분을 가리는 방법을 알고 싶습니다! 첨부파일 (3)
이재호 | 2022.08.12 | 추천 0 | 조회 29
이재호 2022.08.12 - 29
41107 함수/공식
New 중첩 이프 함수 해결 방법 / 중첩 if 해결 방법 / 다중조건 첨부파일 (2) 답변완료
떡상가즈아 | 2022.08.12 | 추천 0 | 조회 40
떡상가즈아 2022.08.12 - 40
41106 함수/공식
New 2X2 엑셀 값 비교하는 함수가 가능할까요? 첨부파일 (1)
클루 | 2022.08.12 | 추천 0 | 조회 38
클루 2022.08.12 - 38
41099 파워쿼리/피벗
New 여러개의 데이터 파일(같은 양식)을 데이터연결하여 하나의 파일로 관리(주기 관리)하는 방법 엑셀파일 (4) 답변완료
pjc**** | 2022.08.12 | 추천 -1 | 조회 67
pjc**** 2022.08.12 -1 67
41096 피벗테이블
New 피벗테이블 날짜 슬라이서 제작시 오류 첨부파일 (4)
naver_616841992e55a | 2022.08.12 | 추천 0 | 조회 37
naver_616841992e55a 2022.08.12 - 37
41095 VBA
New 매크로 관련 질문이예요. 도움 부탁드립니다. (3)
AANNNDDDYY | 2022.08.12 | 추천 0 | 조회 47
AANNNDDDYY 2022.08.12 - 47
41094 함수/공식
New 수식의 이름관리자가 열리지 않습니다 (6)
abbado | 2022.08.12 | 추천 0 | 조회 41
abbado 2022.08.12 - 41
41090 VBA
New 길이 계산 관련 문의 드립니다. 첨부파일 (2)
심우민 | 2022.08.11 | 추천 -1 | 조회 49
심우민 2022.08.11 -1 49
41087 문서서식
New 셀 초록색 표시 오류 해결 유튜브를 봤습니다. (1)
이성일 | 2022.08.11 | 추천 0 | 조회 34
이성일 2022.08.11 - 34
41086 함수/공식
New 어떤 수식 사용해야되는지 알려주세요ㅜ 첨부파일 (4)
🍒 | 2022.08.11 | 추천 0 | 조회 58
🍒 2022.08.11 - 58
41083 VBA
New VBA LISTBOX 활용에 대한 궁금증 엑셀파일 (3) 답변완료
박성원 | 2022.08.11 | 추천 0 | 조회 41
박성원 2022.08.11 - 41
41080 함수/공식
New index, match 함수 사용해서 일치하는 날짜 찾기 첨부파일 (2)
033cola | 2022.08.11 | 추천 0 | 조회 34
033cola 2022.08.11 - 34