엑셀 VBA 음성 출력 문의드립니다 ㅠㅠ

VBA
작성자
안건용
작성일
2023-08-03 09:52
조회
1155
엑셀버전 : 엑셀2016

운영체제 : 윈도우10

질문 요약 : 조건부 VBA 사운드 출력에 대한 도움 요청

안녕하세요,

현재 창고 내 입고검수 엑셀 툴을 만들고 있는데,

모델 일치 행에서(일치)이면 띵 (X)이면 Beep

입고 판독 행에서 P3,P4,P5가 모두 PASS로 값이 바뀌면 “all pass“로 음성이 자동 출력되게 하고 싶은데,

인터넷을 아무리 뒤져봐도 해결할 수 가 없네요 ㅠ

도움 주시면 정말 감사드리겠습니다

신고
스크랩
공유
전체 6

  • 2023-08-03 09:58

    입고검수 sheet - QRcode란은 QR을 스캔하면 아래와 같이 값이 입력됩니다.

    이 값으로 품번, 수량 분류 후 입고 예정 정보와 매칭하는 로직입니다.

    QR*202307180400100C221122SNWH96596AR000
    QR*202307180400100C221122SNWH96597T4050
    QR*202307180400100C221122SNWH96595CU000

  • 2023-08-03 10:15

    @안건용 님 음성출력은 이렇게 사용합니다.

    Application.Speech.Speak "구우웃"
    Application.Speech.Speak "실패"
    Application.Speech.Speak "좋았어!모두합격"

     


    • 2023-08-03 10:20

      @원조백수 님 혹시 조건부 코드 도움 좀 받을 수 있을까요??ㅠ 사례하겠습니다


      • 2023-08-03 10:49

        @안건용 님 함수를 사용하면 약간 딜레이가 있기는 합니다만,,,

        아래와 같이 UDF를 만들고

        Function SoundOut(sText As String)
            Application.Speech.Speak sText, True
            SoundOut = sText
        End Function

        수식을 수정하여 적용합니다.

        =soundout(IF(COUNTIF($M$8:$M$10,E6),"일치",IF(COUNTIF($M$8:$M$10,E6),"일치","X")))

        만약, 이 수식을 복사해서 붙여 넣으면,,,, 시끄럽겠죠??

        붙여 넣은게 100개면 100번 소리가 날 겁니다, 테스트 했더니 아직도 소리가 납니다. ㅋㅋㅋ

        그래서 Form 같은데서 검증용으로 사용하고, OK가 되면 셀에 입력되도록 하는 것이 좋습니다.

         


        • 2023-08-04 11:42

          @원조백수 님 먼저 답변 감사드립니다! 이 수식을 쓰면 말씀 주신대로 셀 수 만큼 음성이 출력되네요 ㅠㅠ

          그러면 "일치"값 일 때만 출력할 수 있는 방법도 있을까요?


          • 2023-08-04 15:28
            채택된 답변

            @안건용

            Function SoundOut(sText As String)
                If sText = "일치" Then Application.Speech.Speak sText, True
                SoundOut = sText
            End Function

             


전체 16,952
번호 카테고리 제목 작성자 작성일 추천 조회
알림
[📚진짜쓰는 실무엑셀] 2024년 엑셀 공부, 이 책 한권으로 마스터하세요! (291)
오빠두엑셀 | 2022.02.03 | 추천 554 | 조회 849098
오빠두엑셀 2022.02.03 554 849098
공지사항 문서서식
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (197)
오빠두엑셀 | 2021.10.28 | 추천 304 | 조회 31575
오빠두엑셀 2021.10.28 304 31575
74662 VBA
New LISTBOX 목록 상자를 만들려고 하는데 ...
땡이 | 17:34 | 추천 0 | 조회 39
땡이 17:34 - 39
74660 함수/공식
New 엑셀처리 속도 관련 질문 (2)
캐쿨이 | 16:15 | 추천 0 | 조회 52
캐쿨이 16:15 - 52
74655
New 데이터 유효성검사 그룹화 하여 여러시트 값 넣기 해결방법 알려주세요 첨부파일 (1)
훅가 | 14:30 | 추천 0 | 조회 51
훅가 14:30 - 51
74654 함수/공식
New 필요 없는 열 숨기기 조건부서식 엑셀파일첨부파일 (1)
JL2 | 14:22 | 추천 0 | 조회 47
JL2 14:22 - 47
74653 VBA
New Form의 CommandButton에서 Module에 있는 매크로 사용방법 문의 첨부파일 (3) 답변완료
땡이 | 13:55 | 추천 0 | 조회 45
땡이 13:55 - 45
74651 문서서식
New 엑셀 번역 기능 질문 입니다. (1)
Foxtail011 | 13:26 | 추천 0 | 조회 51
Foxtail011 13:26 - 51
74649 함수/공식
New 이중 데이터 유효성 질문드립니다. 엑셀파일 (3)
반흔 | 11:43 | 추천 0 | 조회 65
반흔 11:43 - 65
74648 파워쿼리/피벗
New 파워쿼리 구분기호 사라짐 (1)
Byun_inn | 11:37 | 추천 0 | 조회 53
Byun_inn 11:37 - 53
74643 파워쿼리/피벗
New 파워쿼리 구분 키워드 설정 관련 첨부파일 (10) 답변완료
Byun_inn | 09:43 | 추천 0 | 조회 69
Byun_inn 09:43 - 69
74641 함수/공식
New 선택된 셀에 색상넣기 (셀에 만 적용) 수식 변경 부탁드립니다. (8)
갓바위 龍 | 09:19 | 추천 0 | 조회 65
갓바위 龍 09:19 - 65
74639 함수/공식
New 데이터유효성 검사를 통해 40배수의 수만 입력 (10)
쿠노이 | 00:21 | 추천 0 | 조회 83
쿠노이 00:21 - 83
74638 피벗테이블
New 피벗테이블 날짜 그룹화 원치 않는 범위가 뜹니다. (1)
단팥빵 | 2024.10.31 | 추천 0 | 조회 66
단팥빵 2024.10.31 - 66
74633 문서서식
New 안녕하세요 게임 시스템 테이블 작성 배우고 있는데 기초적인 부분을 잘 모르겠어서 질문 드립니다! 첨부파일 (1) 답변완료
코니 | 2024.10.31 | 추천 0 | 조회 88
코니 2024.10.31 - 88
74632 기능/도구
New 챗gpt 연동해서 이미지로 된 표의 데이터를 가져오려고 합니다.
김수현 | 2024.10.31 | 추천 0 | 조회 91
김수현 2024.10.31 - 91
74628 구글시트
New IMPORTRANGE 함수에서 칸을 늘리면 사라지는데 고정하는 방법은 없을까요? (3)
야망이 | 2024.10.31 | 추천 0 | 조회 89
야망이 2024.10.31 - 89
74627 문서서식
New 조건부 서식 문의 엑셀파일첨부파일 (8)
배고픈짐승 | 2024.10.31 | 추천 0 | 조회 110
배고픈짐승 2024.10.31 - 110
74626 파워쿼리/피벗
New [파워쿼리] 여러 파일 한번에 불러올 때 데이터 유실 첨부파일 (3)
naa**** | 2024.10.31 | 추천 0 | 조회 76
naa**** 2024.10.31 - 76
74625 VBA
New 시트이동시 유저폼 실행방법 문의 (3) 답변완료
땡이 | 2024.10.31 | 추천 0 | 조회 81
땡이 2024.10.31 - 81
74621 기능/도구
New 4개의 열 에서 같은 이름 가로로 정렬 (4)
Bukonge | 2024.10.31 | 추천 0 | 조회 83
Bukonge 2024.10.31 - 83
74618 VBA
New 유저폼에 바코드스캔시 입력속도 개선방법? (6) 답변완료
땡이 | 2024.10.31 | 추천 0 | 조회 73
땡이 2024.10.31 - 73
74616 함수/공식
New Rawdata 첨부파일 (4)
HIHUGO | 2024.10.31 | 추천 0 | 조회 84
HIHUGO 2024.10.31 - 84
74604 문서서식
New 간트차트 조건부서식 이용 문의 엑셀파일첨부파일 (3)
배고픈짐승 | 2024.10.30 | 추천 0 | 조회 93
배고픈짐승 2024.10.30 - 93
74599 함수/공식
New 이런 경우에는 무슨 함수를 써야할까요..? (3)
iwnqn | 2024.10.30 | 추천 0 | 조회 124
iwnqn 2024.10.30 - 124
74598 문서서식
New 엑셀 유효성 검사 뛰어 쓰기 문제 엑셀파일 (2) 답변완료
퉁퉁이 | 2024.10.30 | 추천 0 | 조회 86
퉁퉁이 2024.10.30 - 86
74592 함수/공식
New 여러 값들 중에서 원하는 값을 찾고 싶어요 도와주세요! 첨부파일 (9) 답변완료
저도해볼게요 | 2024.10.30 | 추천 0 | 조회 113
저도해볼게요 2024.10.30 - 113
74589 구글시트
New 한셀에 줄바꿈으로 있는 여러데이터를 한셀에 한데이터 들어가게끔 일괄로 하고 싶습니다 첨부파일 (4) 답변완료
스톤스톤 | 2024.10.30 | 추천 0 | 조회 73
스톤스톤 2024.10.30 - 73
74585 VBA
New UserForm 크기질문 첨부파일 (5) 답변완료
땡이 | 2024.10.30 | 추천 0 | 조회 90
땡이 2024.10.30 - 90
74583 함수/공식
New XLOOKUP 함수의 다중조건을 잘 모르겠습니다 첨부파일 (6)
qlcc**** | 2024.10.30 | 추천 0 | 조회 113
qlcc**** 2024.10.30 - 113
74582 함수/공식
New filter 함수에 대해 문의드립니다 (5)
김은상 | 2024.10.30 | 추천 0 | 조회 85
김은상 2024.10.30 - 85
74581 구글시트
New 구글폼 견적서 자동화 관련, 폼에서 입력된 이미지 파일을 견적서에 넣는 방법 좀 알려주시면 감사하겠습니다.
| 2024.10.30 | 추천 0 | 조회 71
2024.10.30 - 71