도와주세요 VBA 엑셀 카톡

VBA
작성자
윤종진
작성일
2021-04-22 20:57
조회
62

Private Sub Worksheet_Change(ByVal Target As Range)

Dim 사용자명 As String: 사용자명 = "A1:A10" '<<- 사용자명이 입력된 넓은 범위를 입력하세요.
Dim 보낼메세지 As String: 보낼메세지 = "B1" '<<- 보낼메세지가 입력된 셀주소를 입력하세요.
Dim Rng As Range

If Target.Address(False, False) = 보낼메세지 Then
' 사용자명 범위의 셀을 하나씩 돌아가며 각각의 사용자에게 메세지를 전송합니다.
For Each Rng In Range(사용자명)
' 사용자명이 빈칸이 아닐 경우에만 메세지를 전송합니다.
If Rng.Value <> "" Then Send_Kakao Rng, Range(보낼메세지)
Next
End If

End Sub
Private Sub Worksheet_Change(ByVal Target As Range)

Dim 사용자명 As String: 사용자명 = "A1" '<< - 사용자명이 입력된 셀 주소를 입력하세요.
Dim 보낼메세지 As String: 보낼메세지 = "A1" '<< - 보낼메세지가 입력된 셀주소를 입력하세요.
Dim 결과출력 As String: 결과출력 = "A1" '<< - 결과를 출력할 셀 주소를 입력하세요

If Target.Address(False, False) = 사용자명 Or Target.Address(False, False) = 보낼메세지 Then
Send_Kakao Range(사용자명), Range(보낼메세지), Range(결과출력)
End If

End Sub

회원등급 : 새싹등급
포인트 : 54 EP
총질문 : 1 개 (마감율 : 0%)
채택답변 : 0 개
전체 1

전체 2,913
번호 카테고리 제목 작성자 작성일 추천 조회
2901 VBA
New 다른 시트의 값을 참조하여 원하는 시트에서 검색하여 값을 찾아서 넣고 싶습니다. 첨부파일
안동코비 | 09:00 | 추천 0 | 조회 5
안동코비 09:00 0 5
2900 함수/공식
New 엑셀 KakaoAddress 관련 질문입니다. 첨부파일
구루보 | 08:52 | 추천 0 | 조회 3
구루보 08:52 0 3
2899 함수/공식
New 엑셀 문의드립니다.ㅜㅜ 도와주세요. 첨부파일 (1)
주주난 | 2021.05.06 | 추천 0 | 조회 34
주주난 2021.05.06 0 34
2898 기능/도구
New 엑셀공유파일 셀위치 변경 (3) 답변완료
소람 | 2021.05.06 | 추천 0 | 조회 26
소람 2021.05.06 0 26
2897 VBA
New Worksheet Change (또는 SelectionChange)를 Disable하는 매크로 (주석 처리 말고) (2) 답변완료
나는나 | 2021.05.06 | 추천 0 | 조회 20
나는나 2021.05.06 0 20
2896 함수/공식
New 회사들의 구매이력을 한번에 정리하는 방법 (6) 답변완료
젤리 | 2021.05.06 | 추천 1 | 조회 32
젤리 2021.05.06 1 32
2895 함수/공식
New 열에 날짜(월)를 지정해놓고 비어있으면 표시되도록 가능할까요? 첨부파일
꼬꼭꼬 | 2021.05.06 | 추천 0 | 조회 21
꼬꼭꼬 2021.05.06 0 21
2894 함수/공식
New 엑셀 숫자 사이의 알파벳 O -> 숫자 0으로 변환 (2)
#Su | 2021.05.06 | 추천 0 | 조회 26
#Su 2021.05.06 0 26
2893 VBA
New Update_Cbo 관련 첨부파일
루카스 | 2021.05.06 | 추천 0 | 조회 12
루카스 2021.05.06 0 12
2892 문서서식
New 사진자동넣기 첨부파일 (1)
eende**** | 2021.05.06 | 추천 0 | 조회 45
eende**** 2021.05.06 0 45
2891 함수/공식
New index, match 관련 조언이 필요합니다. (2)
LJH | 2021.05.06 | 추천 0 | 조회 33
LJH 2021.05.06 0 33
2890 함수/공식
New SUMPRODUCT 응용함수 질문 (재업로드) 첨부파일 (3)
ddddj31 | 2021.05.05 | 추천 2 | 조회 37
ddddj31 2021.05.05 2 37
2889 VBA
New 구글링에도 없던데 VBA 크롤링 관련 문의 드립니다. (2)
VBA열공 | 2021.05.05 | 추천 0 | 조회 33
VBA열공 2021.05.05 0 33
2888 피벗테이블
New 안녕하세요. 첨부파일 (4) 답변완료
임종복 | 2021.05.05 | 추천 0 | 조회 31
임종복 2021.05.05 0 31
2887 함수/공식
New 시트별 자료와 값을 연동하는 방법 첨부파일
코이노니아 | 2021.05.05 | 추천 0 | 조회 40
코이노니아 2021.05.05 0 40
2886 피벗테이블
New 해찾기 문제에서 제약식 설정하기 첨부파일
| 2021.05.05 | 추천 0 | 조회 27
2021.05.05 0 27
2885 문서서식
New 표를 그림으로 붙여넣기 시 오류?안나게 하는방법 (2) 답변완료
월마리아 | 2021.05.05 | 추천 0 | 조회 44
월마리아 2021.05.05 0 44
2884 VBA
New 네이버 연관검색 & 부동산 크롤링 프로그램이 갑자기 안됩니다. (1)
꽃가마 | 2021.05.04 | 추천 0 | 조회 25
꽃가마 2021.05.04 0 25
VBA
New Re:네이버 연관검색 & 부동산 크롤링 프로그램이 갑자기 안됩니다.
꽃가마 | 2021.05.04 | 추천 0 | 조회 23
꽃가마 2021.05.04 0 23
2883 함수/공식
New [생산관리] 재고-단품 수량을 수주량에 색상으로 구분 표현 첨부파일 (6) 답변완료
sbrlover | 2021.05.04 | 추천 0 | 조회 62
sbrlover 2021.05.04 0 62
2882 함수/공식
New 달력 업무 일지 자동 입력
한마음 | 2021.05.04 | 추천 0 | 조회 49
한마음 2021.05.04 0 49
2881 피벗테이블
New 해찾기 문제에서 제약식 설정 첨부파일 (2)
| 2021.05.04 | 추천 0 | 조회 26
2021.05.04 0 26
2880 VBA
New 조건에 맞는 행 제거하기 첨부파일 (3)
ArkGie | 2021.05.04 | 추천 0 | 조회 47
ArkGie 2021.05.04 0 47
2879 함수/공식
New 원하는 데이터 추출, 표시하는 방법! (2)
LJH | 2021.05.04 | 추천 0 | 조회 57
LJH 2021.05.04 0 57
2878 함수/공식
New 금액이 이름과 은행명에 따라 자동으로 입력되는 방법을 알고 싶습니다 첨부파일 (1)
50 | 2021.05.04 | 추천 -2 | 조회 52
50 2021.05.04 -2 52
2877 함수/공식
백분율 관련 공식을 어떻게 작성해야할지 모르겠네요 ㅠㅠ (1)
naver_60889c2ca519d | 2021.05.04 | 추천 0 | 조회 38
naver_60889c2ca519d 2021.05.04 0 38
2876 함수/공식
엑셀 KakaoAddress 관련 질문입니다. (3) 답변완료
구루보 | 2021.05.04 | 추천 0 | 조회 39
구루보 2021.05.04 0 39
2875 함수/공식
GETPIVOTDATA 함수 REF 오류 (3)
미리감사thank | 2021.05.03 | 추천 0 | 조회 33
미리감사thank 2021.05.03 0 33
2874 VBA
[VBA] inputBox 를 통한 제품검색 vlookup 질문입니다. (8)
제펠 | 2021.05.03 | 추천 1 | 조회 43
제펠 2021.05.03 1 43
2873 VBA
안녕하세요 참조에러의 위치를 찾을 수 있을까요? (4)
칭구 | 2021.05.03 | 추천 0 | 조회 49
칭구 2021.05.03 0 49
2872 기능/도구
순환참조 팝업 해결문의 첨부파일 (3)
현정이 | 2021.05.03 | 추천 0 | 조회 41
현정이 2021.05.03 0 41